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~