浏览代码

use __exit and __write instead

ceriel 33 年之前
父节点
当前提交
3a7f7f5eb9
共有 5 个文件被更改,包括 22 次插入9 次删除
  1. 0 3
      mach/z80/libem/.distr
  2. 0 1
      mach/z80/libem/LIST
  3. 9 1
      mach/z80/libem/nop.s
  4. 12 3
      mach/z80/libem/trp.s
  5. 1 1
      mach/z80/libem/unim.s

+ 0 - 3
mach/z80/libem/.distr

@@ -1,5 +1,2 @@
 LIST
-Makefile
-compmodule
-end.s
 libem_s.a

+ 0 - 1
mach/z80/libem/LIST

@@ -39,5 +39,4 @@ inn.s
 xor.s
 nop.s
 outdec.s
-pstrng.s
 ret.s

+ 9 - 1
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'

+ 12 - 3
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

+ 1 - 1
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