From 90c699f4182407387ae9febbb0c51ce464ccaf2f Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Thu, 23 Apr 1987 14:47:28 +0000
Subject: [PATCH] Fixed wrong mlu4.s

---
 mach/pdp/libem/mlu4.s | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/mach/pdp/libem/mlu4.s b/mach/pdp/libem/mlu4.s
index cc312ca22..798bbaa63 100644
--- a/mach/pdp/libem/mlu4.s
+++ b/mach/pdp/libem/mlu4.s
@@ -5,20 +5,18 @@
 
 mlu4~:
 	jsr	pc,save~
-	clr	r0
-	mov	02(sp),r1
+	clr	r1
+	mov	02(sp),r0
 	mov	06(sp),r3
 	mul	r3,r0
 	tst	r3
 	bge	1f
-	ashc	$15.,r0
+	add	02(sp),r0
 1:	mov	02(sp),r3
-	clr	r2
-	mul	04(sp),r2
+	mul	04(sp),r3
 	add	r3,r0
 	mov	06(sp),r3
-	clr	r2
-	mul	(sp),r2
+	mul	(sp),r3
 	add	r3,r0
 	add	$010,sp
 	jmp	retu~
-- 
2.34.1