From 2a0a27f00a6a767cb58b6a9409169a4a132894da Mon Sep 17 00:00:00 2001
From: sater <devnull@localhost>
Date: Thu, 20 Dec 1984 15:17:05 +0000
Subject: [PATCH] Routine was wrong, leaving things on the stack in the one bit
 case, the inclusion of slu in this routine was bogus. It is never called
 anyway, so slu is taken out.

---
 mach/pdp/libem/sru.s | 10 ++++------
 1 file changed, 4 insertions(+), 6 deletions(-)

diff --git a/mach/pdp/libem/sru.s b/mach/pdp/libem/sru.s
index c0481395..7450c73d 100644
--- a/mach/pdp/libem/sru.s
+++ b/mach/pdp/libem/sru.s
@@ -1,18 +1,17 @@
 / $Header$
 .text
-.globl sru~,slu~
+.globl sru~
 .globl unknown~
 
 sru~:
 	neg	2(sp)
-slu~:
 	mov	(sp)+,r3
 	cmp	r0,$02
 	bgt	1f
 	mov	2(sp),r1
 	clr	r0
 	ashc	(sp)+,r0
-2:	mov	r1,-(sp)
+	mov	r1,(sp)
 	jmp	(r3)
 1:	cmp	r0,$04
 	bgt	3f
@@ -23,9 +22,8 @@ slu~:
 	ashc	$-1,r0
 	bic	$0100000,r0
 	inc	(sp)
-	beq	4f
-	ashc	(sp)+,r0
-4:	mov	r0,(sp)
+4:	ashc	(sp)+,r0
+	mov	r0,(sp)
 	mov	r1,02(sp)
 	jmp	(r3)
 3:	jmp	unknown~