From 18dbfc024eaf503fb3ba100bfea1dddd34392876 Mon Sep 17 00:00:00 2001
From: sater <none@none>
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 c0481395d..7450c73dd 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~