From: ceriel <none@none>
Date: Tue, 30 Jun 1992 16:39:47 +0000 (+0000)
Subject: No system-calls from libem
X-Git-Tag: release-5-5~436
X-Git-Url: https://git.ndcode.org/public/gitweb.cgi?a=commitdiff_plain;h=f86c403a53150898e1ae799c408bda4841006f6a;p=ack.git

No system-calls from libem
---

diff --git a/mach/pdp/libem/prf.s b/mach/pdp/libem/prf.s
index b10565f2e..da40804da 100644
--- 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 2172c4a5e..fd01117c2 100644
--- 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 3958713e3..ce7d4b437 100644
--- 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 53aa3b767..9685ec85b 100644
--- 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: