improved ffp.s

diff --git a/mach/m68k2/libem/ffp.s b/mach/m68k2/libem/ffp.s
index d6bd130..ab99094 100644 (file)
--- a/mach/m68k2/libem/ffp.s
+++ b/mach/m68k2/libem/ffp.s
@@ -1,18 +1,39 @@
-.define .cmf8, .cif8, .dvf8, .adf8, .ngf8, .mlf8, .fif8, .fef8, .cff4
+.define .adf4, .adf8, .sbf4, .sbf8, .mlf4, .mlf8, .dvf4, .dvf8
+.define .ngf4, .ngf8, .fif4, .fif8, .fef4, .fef8
+.define .cif4, .cif8, .cuf4, .cuf8, .cfi, .cfu, .cff4, .cff8
+.define .cmf4, .cmf8
 .sect .text
 .sect .rom
 .sect .data
 .sect .bss
 
-.sect .text
-.cmf8:
-.cif8:
-.dvf8:
+!      $Header$
+
+       .sect .text
+.adf4:
 .adf8:
-.ngf8:
+.sbf4:
+.sbf8:
+.mlf4:
 .mlf8:
+.dvf4:
+.dvf8:
+.ngf4:
+.ngf8:
+.fif4:
 .fif8:
+.fef4:
 .fef8:
+.cif4:
+.cif8:
+.cuf4:
+.cuf8:
+.cfi:
+.cfu:
 .cff4:
-       move.w  #EILLINS,-(sp)
-       jmp     .fat
+.cff8:
+.cmf4:
+.cmf8:
+       move.w  #18,-(sp)
+       jsr     .trp
+       rts