diff --git a/6502/C64/src/vf-finalize.fth b/6502/C64/src/vf-finalize.fth index 0b37fa3..e9c659e 100644 --- a/6502/C64/src/vf-finalize.fth +++ b/6502/C64/src/vf-finalize.fth @@ -13,6 +13,7 @@ Forth also definitions (C16 : (64 ) \ jumps belhind C) (C64 : (16 ) +(X16 : (CX ) BEGIN name count dup 0= abort" C) missing" 2 = >r @ [ Ascii C Ascii ) $100 * + ] Literal @@ -20,7 +21,7 @@ Forth also definitions : C) ; immediate -(C16 : (16 ) (C64 : (64 ) ; immediate +(C16 : (16 ) (C64 : (64 ) (X16 : (CX ) ; immediate : forth-83 ; \ last word in Dictionary