duskos

commit 3f8655484d558241d49f18bcac28ad62882fe438
parent 275d274ada870a4728351a2980e0c4b1db54618c
Author: Virgil Dupras <hsoft@hardcoded.net>
Date:   Fri, 24 Jun 2022 13:08:09 -0400

Make "emit" into an alias

... defaulting to (emit). This will allow me to add emit capturing capabilities
to the test harness.

Diffstat:
M
dusk.asm
 | 
7
++++++-

1 file changed, 6 insertions(+), 1 deletion(-)
diff --git a/dusk.asm b/dusk.asm
@@ -69,6 +69,7 @@ compiling: resd 1
 curword: resb 0x20	; 1b len, then contents
 iinrd: resd 1		; iin<
 inrd: resd 1		; in<
+emit: resd 1
 	resd PS_SZ
 ps_top:
 	resd RS_SZ
@@ -90,6 +91,7 @@ _start:
 	mov dword [current], word_mainloop
 	mov dword [iinrd], word_bootrd
 	mov dword [inrd], word_iinrd
+	mov dword [emit], word__emit
 	mov eax, SYSCALL_CHDIR
 	mov ebx, rootfspath
 	int 0x80
@@ -211,7 +213,7 @@ defword 'boot<', 5, word_bootrd
 	pspush eax
 	ret
 
-defword 'emit', 4, word_emit
+defword '(emit)', 6, word__emit
 	mov eax, SYSCALL_WRITE
 	mov ebx, 1				; stdout
 	mov ecx, ebp			; buffer: top of PS, little endian
@@ -220,6 +222,9 @@ defword 'emit', 4, word_emit
 	pspop eax
 	ret
 
+defword 'emit', 4, word_emit
+	sysalias emit
+
 defword 'key', 3, word_key
 	pspush 0
 	mov eax, SYSCALL_READ