some more fixes
authorceriel <none@none>
Fri, 12 Jan 1990 17:02:31 +0000 (17:02 +0000)
committerceriel <none@none>
Fri, 12 Jan 1990 17:02:31 +0000 (17:02 +0000)
mach/vax4/libem/fef.s

index 0329d90..73e848f 100644 (file)
@@ -9,28 +9,29 @@
        movl    (sp)+,r3
        cmpl    r0,$4
        bneq    I1
-       cvtfd   (sp)+,r0
+       cvtfd   (sp),r0
        jsb     Ihulp
-       cvtdf   r0,-(sp)
+       cvtdf   r0,(sp)
+       movl    r2,-(sp)
        jmp     (r3)
 I1:
        cmpl    r0,$8
        bneq    I2
-       movd    (sp)+,r0
+       movd    (sp),r0
        jsb     Ihulp
-       movd    r0,-(sp)
+       movd    r0,(sp)
+       movl    r2,-(sp)
        jmp     (r3)
 I2:
        pushl   $EILLINS
        jmp     .fat
 Ihulp:
-       movl    (sp)+,r2
        tstd    r0
        bneq    1f
-       clrl    -(sp)
-       jmp     (r2)
+       clrl    r2
+       rsb
 1:
-       extzv   $7,$8,r0,-(sp)
-       subl2   $128,(sp)
+       extzv   $7,$8,r0,r2
+       subl2   $128,r2
        insv    $128,$7,$8,r0
-       jmp     (r2)
+       rsb