diff --git a/emul/forth/z80c.bin b/emul/forth/z80c.bin
index 13f40bf..e16eee8 100644
Binary files a/emul/forth/z80c.bin and b/emul/forth/z80c.bin differ
diff --git a/forth/forth.asm b/forth/forth.asm
index 6e5a86d..51f6bf5 100644
--- a/forth/forth.asm
+++ b/forth/forth.asm
@@ -660,21 +660,14 @@ abortUnderflow:
 .name:
 	.db "(uflw)", 0
 
-.fill 41
-
-	.db "BYE"
-	.dw $-QUIT
-	.db 3
-BYE:
-	.dw nativeWord
-	halt
+.fill 50
 
 ; STABLE ABI
 ; Offset: 02aa
 .out $
 ; ( c -- )
 	.db "EMIT"
-	.dw $-BYE
+	.dw $-QUIT
 	.db 4
 EMIT:
 	.dw	compiledWord
diff --git a/forth/z80c.fs b/forth/z80c.fs
index 9ed22b2..1639b10 100644
--- a/forth/z80c.fs
+++ b/forth/z80c.fs
@@ -246,6 +246,10 @@ CODE IMMED?
     DE PUSHqq,
 ;CODE
 
+CODE BYE
+    HALT,
+;CODE
+
 CODE (resSP)
     ( INITIAL_SP == JTBL+28 )
     SP JTBL 28 + @ LDdd(nn),