No system-calls from libem

diff --git a/mach/pdp/libem/prf.s b/mach/pdp/libem/prf.s
index b10565f..da40804 100644 (file)
--- a/mach/pdp/libem/prf.s
+++ b/mach/pdp/libem/prf.s
@@ -1,7 +1,7 @@
 .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
 .sect .text
 .define prf~
-.extern save~,retu~,hol0,_printf
+.extern save~,retu~,hol0,printf~
 ! $Header$
 
 prf~:

diff --git a/mach/pdp/libem/printf.s b/mach/pdp/libem/printf.s
index 2172c4a..fd01117 100644 (file)
--- a/mach/pdp/libem/printf.s
+++ b/mach/pdp/libem/printf.s
@@ -1,10 +1,8 @@
 .sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
 .sect .text
-.define _printf
+.define printf~
 ! $Header$
 
-write  = 4
-
 printf~:
        mov     r2,-(sp)
        mov     r3,-(sp)
@@ -54,7 +52,7 @@ ready:
        mov     r4,-(sp)
        mov     $buff,-(sp)
        mov     $01,-(sp)
-       jsr     pc,__write
+       jsr     pc,WRITE
        add     $06,sp
        mov     (sp)+,r4
        mov     (sp)+,r3

diff --git a/mach/pdp/libem/strhp.s b/mach/pdp/libem/strhp.s
index 3958713..ce7d4b4 100644 (file)
--- a/mach/pdp/libem/strhp.s
+++ b/mach/pdp/libem/strhp.s
@@ -17,7 +17,7 @@ strhp~:
        bic     $01777,r1
        mov     r1,-(sp)
        mov     r1,2f
-       jsr     pc,__brk
+       jsr     pc,BRK
        tst     (sp)+
        tst     r0
        blt     3f

diff --git a/mach/pdp/libem/trp.s b/mach/pdp/libem/trp.s
index 53aa3b7..9685ec8 100644 (file)
--- a/mach/pdp/libem/trp.s
+++ b/mach/pdp/libem/trp.s
@@ -6,7 +6,7 @@
 
 fat~:
        jsr     pc,trp~
-       jsr     pc,__exit
+       jsr     pc,EXIT
 
 trp~:
        mov     r0,-(sp)
@@ -88,9 +88,9 @@ trp~:
        mov     $013,-(sp)
        mov     $buf,-(sp)
        mov     $2,-(sp)
-       jsr     pc,__write
+       jsr     pc,WRITE
        add     $6,sp
-       jsr     pc,__exit
+       jsr     pc,EXIT
 .sect .data
 retar: .space 16
 retend: