changed interface for cs[ab]

diff --git a/mach/m68k2/libem/csa.s b/mach/m68k2/libem/csa.s
index b16313d..13ed3e1 100644 (file)
--- a/mach/m68k2/libem/csa.s
+++ b/mach/m68k2/libem/csa.s
@@ -1,13 +1,11 @@
-.define .csa
+.define .csa2
 .sect .text
 .sect .rom
 .sect .data
 .sect .bss
 
        .sect .text
-.csa:
-       move.l  (sp)+,a0        ! case descriptor
-       move    (sp)+,d0        ! index
+.csa2:
        move.l  (a0)+,a1        ! default address
        sub     (a0)+,d0        ! index - lower bound
        blt     1f

diff --git a/mach/m68k2/libem/csa4.s b/mach/m68k2/libem/csa4.s
index 5105f32..f1b898b 100644 (file)
--- a/mach/m68k2/libem/csa4.s
+++ b/mach/m68k2/libem/csa4.s
@@ -6,8 +6,6 @@
 
        .sect .text
 .csa4:
-       move.l  (sp)+,a0        ! case descriptor
-       move.l  (sp)+,d0        ! index
        move.l  (a0)+,a1        ! default address
        sub.l   (a0)+,d0        ! index - lower bound
        blt     1f

diff --git a/mach/m68k2/libem/csb.s b/mach/m68k2/libem/csb.s
index 5d25385..4a567cc 100644 (file)
--- a/mach/m68k2/libem/csb.s
+++ b/mach/m68k2/libem/csb.s
@@ -1,13 +1,11 @@
-.define .csb
+.define .csb2
 .sect .text
 .sect .rom
 .sect .data
 .sect .bss
 
        .sect .text
-.csb:
-       move.l  (sp)+,a0        ! case descriptor
-       move    (sp)+,d0        ! index
+.csb2:
        move.l  (a0)+,a1        ! default jump address
        move.w  (a0)+,d1        ! # entries
        beq     2f

diff --git a/mach/m68k2/libem/csb4.s b/mach/m68k2/libem/csb4.s
index 7b4e3a2..e1504e2 100644 (file)
--- a/mach/m68k2/libem/csb4.s
+++ b/mach/m68k2/libem/csb4.s
@@ -6,10 +6,8 @@
 
        .sect .text
 .csb4:
-       move.l  (sp)+,a0        ! case descriptor
-       move.l  (sp)+,d0        ! index
        move.l  (a0)+,a1        ! default jump address
-       move.w  (a0)+,d1        ! # entries
+       move.l  (a0)+,d1        ! # entries
        beq     2f
 1:
        cmp.l   (a0)+,d0

diff --git a/mach/m68k2/libem/mon.s b/mach/m68k2/libem/mon.s
index dffaaed..95e7bf4 100644 (file)
--- a/mach/m68k2/libem/mon.s
+++ b/mach/m68k2/libem/mon.s
@@ -12,5 +12,5 @@
        jmp     EXIT
 
        .sect .data
-fmt:   .asciz "system call %d not implemented"
+fmt:   .asciz "system call %d not implemented\n"
 .align 2