diff --git a/blk/288 b/blk/288
index 0ae793b..9891b95 100644
--- a/blk/288
+++ b/blk/288
@@ -4,7 +4,7 @@ PC ORG @ 0x22 + ! ( litWord, 0xf7, tight on the 0x100 limit )
   called, puts the string's address on PS )
     IY PUSHqq, HL POPqq, ( <-- IP )
     E (HL) LDrr, D 0 LDrn,
-    DE INCss, DE INCss,
+    DE INCss,
     DE ADDIYss,
     HL PUSHqq,
     JPNEXT,
diff --git a/blk/382 b/blk/382
index d9a7282..7084dd5 100644
--- a/blk/382
+++ b/blk/382
@@ -4,7 +4,7 @@
     AGAIN ;
 : LIT"
     34 , ( litWord ) H@ 0 C, ,"
-    DUP H@ -^ 1- ( a len ) SWAP C! 0 C,
+    DUP H@ -^ 1- ( a len ) SWAP C!
 ; IMMEDIATE
 : ." [COMPILE] LIT" COMPILE (print) ; IMMEDIATE
 : ABORT" [COMPILE] ." COMPILE ABORT ; IMMEDIATE
diff --git a/blk/399 b/blk/399
index 67d9653..ac0af60 100644
--- a/blk/399
+++ b/blk/399
@@ -1,4 +1,4 @@
-: LIT< WORD 34 , DUP C@ 1+ MOVE, 0 C, ; IMMEDIATE
+: LIT< WORD 34 , DUP C@ 1+ MOVE, ; IMMEDIATE
 : BEGIN H@ ; IMMEDIATE
 : AGAIN COMPILE (br) H@ - _bchk , ; IMMEDIATE
 : UNTIL COMPILE (?br) H@ - _bchk , ; IMMEDIATE
diff --git a/emul/forth.bin b/emul/forth.bin
index 63bbaf6..0fa74ce 100644
Binary files a/emul/forth.bin and b/emul/forth.bin differ