fix in csb: must be able to handle 0 cases

diff --git a/mach/ns/libem/csb.s b/mach/ns/libem/csb.s
index 56ed675..881fa03 100644 (file)
--- a/mach/ns/libem/csb.s
+++ b/mach/ns/libem/csb.s
@@ -12,6 +12,8 @@
 .csb:
        save[r2,r3]
        movd 4(r1), r2          !number of entries
+       cmpqd 0, r2
+       beq 3f
        movd r1, r3
 1:
        addd 8, r3              !find addres of next index

diff --git a/mach/ns/libem/putchar.s b/mach/ns/libem/putchar.s
index 26fa7f3..2d985de 100644 (file)
--- a/mach/ns/libem/putchar.s
+++ b/mach/ns/libem/putchar.s
@@ -15,6 +15,6 @@
        addr    8(fp),tos
        movqd   1,tos
        bsr     _write
-       asjspb  -12
+       adjspb  -12
        exit    []
        ret     0

diff --git a/mach/ns/libem/trp.s b/mach/ns/libem/trp.s
index 7eebda5..b958aa4 100644 (file)
--- a/mach/ns/libem/trp.s
+++ b/mach/ns/libem/trp.s
@@ -22,7 +22,7 @@
        movqd 0, @.trpreg
        jsr r1
 3:
-       adjspd $-4
+       adjspd -4
        restore [r0, r1]
        ret 4
 2: