fixed for 0 argument

diff --git a/mach/vax4/libem/fef.s b/mach/vax4/libem/fef.s
index 6dc0388..138e0ae 100644 (file)
--- a/mach/vax4/libem/fef.s
+++ b/mach/vax4/libem/fef.s
@@ -9,9 +9,9 @@
        movl    (sp)+,r3
        cmpl    r0,$4
        bneq    I1
-       movf    (sp)+,r0
+       cvtfd   (sp)+,r0
        jsb     Ihulp
-       movf    r0,-(sp)
+       cvtdf   r0,-(sp)
        jmp     (r3)
 I1:
        cmpl    r0,$8
@@ -24,6 +24,11 @@ I2:
        pushl   $EILLINS
        jmp     .fat
 Ihulp:
+       tstd    r0
+       bneq    1f
+       clrl    -(sp)
+       rsb
+1:
        extzv   $7,$8,r0,r2
        subl3   $128,r2,-(sp)
        insv    $128,$7,$8,r0