diff --git a/forth/print.fs b/forth/print.fs index 1dcd8ee..7f55ca4 100644 --- a/forth/print.fs +++ b/forth/print.fs @@ -26,10 +26,11 @@ : ABORT" [COMPILE] ." COMPILE ABORT ; IMMEDIATE : (uflw) ABORT" stack underflow" ; -: (wnf) ABORT" word not found" ; : BS 8 EMIT ; : LF 10 EMIT ; : CR 13 EMIT ; : CRLF CR LF ; : SPC 32 EMIT ; + +: (wnf) (print) SPC ABORT" word not found" ;