From 3a7f7f5eb966687894097dc7d7f3d47bfb53d6f3 Mon Sep 17 00:00:00 2001
From: ceriel <none@none>
Date: Thu, 29 Aug 1991 15:08:24 +0000
Subject: [PATCH] use __exit and __write instead

---
 mach/z80/libem/.distr |  3 ---
 mach/z80/libem/LIST   |  1 -
 mach/z80/libem/nop.s  | 10 +++++++++-
 mach/z80/libem/trp.s  | 15 ++++++++++++---
 mach/z80/libem/unim.s |  2 +-
 5 files changed, 22 insertions(+), 9 deletions(-)

diff --git a/mach/z80/libem/.distr b/mach/z80/libem/.distr
index e862ca95b..d2b4f2884 100644
--- a/mach/z80/libem/.distr
+++ b/mach/z80/libem/.distr
@@ -1,5 +1,2 @@
 LIST
-Makefile
-compmodule
-end.s
 libem_s.a
diff --git a/mach/z80/libem/LIST b/mach/z80/libem/LIST
index cc081f7a4..84c1e36dc 100644
--- a/mach/z80/libem/LIST
+++ b/mach/z80/libem/LIST
@@ -39,5 +39,4 @@ inn.s
 xor.s
 nop.s
 outdec.s
-pstrng.s
 ret.s
diff --git a/mach/z80/libem/nop.s b/mach/z80/libem/nop.s
index 016192f0f..ba4a4c767 100644
--- a/mach/z80/libem/nop.s
+++ b/mach/z80/libem/nop.s
@@ -20,8 +20,16 @@
 	ld hl,0
 	add hl,sp
 	call octnr
+	ld de,20
+	push de
 	ld de,1f
-	call pstrng
+	push de
+	ld de,1
+	push de
+	call __write
+	pop de
+	pop de
+	pop de
 	pop iy
 	ret
 1:	.asciz 'test xxxxx 0xxxxxx\r\n'
diff --git a/mach/z80/libem/trp.s b/mach/z80/libem/trp.s
index f153b8e3c..9b3ba6d49 100644
--- a/mach/z80/libem/trp.s
+++ b/mach/z80/libem/trp.s
@@ -37,11 +37,20 @@
 	push de
 	ld iy,1f+6
 	call outdec
-	ld de,1f
-	call pstrng
+	ld iy,13
+	push iy
+	ld iy,1f
+	push iy
+	ld iy,2
+	push iy
+	call __write
+	pop iy
+	pop iy
+	pop iy
 	pop de
 	pop iy
-	jp 0x20
+	push de
+	call __exit
 2:
 	pop hl
 	push bc
diff --git a/mach/z80/libem/unim.s b/mach/z80/libem/unim.s
index fa5e4c598..7b6a1a956 100644
--- a/mach/z80/libem/unim.s
+++ b/mach/z80/libem/unim.s
@@ -11,7 +11,7 @@ unimpld:		! used in dispatch table to
 	ld hl,EILLINS
 9:	push hl
 	call .trp.z
-	jp 20
+	ret
 
 e.mon:
 	ld hl,EMON