Added fake floating point routines

diff --git a/mach/m68020/libem/LIST b/mach/m68020/libem/LIST
index 8479e1a..f8083f2 100644 (file)
--- a/mach/m68020/libem/LIST
+++ b/mach/m68020/libem/LIST
@@ -1,4 +1,5 @@
 libem_s.a
+fakfp.s
 aar.s
 lar.s
 sar.s

diff --git a/mach/m68020/libem/dia.s b/mach/m68020/libem/dia.s
index 470188a..05d88fc 100644 (file)
--- a/mach/m68020/libem/dia.s
+++ b/mach/m68020/libem/dia.s
@@ -29,14 +29,9 @@ del  = 0177
        move.l  d2, -(sp)
        pea     (fmt)
        jsr     (_printf)
-       lea     (8, sp), sp
-       move.l  (28, sp),(sp)
-       move.l  (24, sp),-(sp)
-       jsr     (_printf)
-       lea     (8, sp), sp
+       lea     (12, sp), sp
        movem.l (sp)+, d0/d1/d2/a0
-       move.l  (sp), (4, sp)
-       lea     (4, sp), sp
+       jmp     (_printf)
        rts
 
 1:

diff --git a/mach/m68020/libem/fakfp.s b/mach/m68020/libem/fakfp.s
new file mode 100644 (file)
index 0000000..1c039b6
--- /dev/null
+++ b/mach/m68020/libem/fakfp.s
@@ -0,0 +1,39 @@
+.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
+
+!      $Header$
+
+       .sect .text
+.adf4:
+.adf8:
+.sbf4:
+.sbf8:
+.mlf4:
+.mlf8:
+.dvf4:
+.dvf8:
+.ngf4:
+.ngf8:
+.fif4:
+.fif8:
+.fef4:
+.fef8:
+.cif4:
+.cif8:
+.cuf4:
+.cuf8:
+.cfi:
+.cfu:
+.cff4:
+.cff8:
+.cmf4:
+.cmf8:
+       move.l  #18,-(sp)
+       jsr     .trp
+       rts