Reimplemented EXPECT. Closes #1.

[forth.jl.git] / src / lib.4th

diff --git a/src/lib.4th b/src/lib.4th
index 664ff80..8da2fb1 100644 (file)
--- a/src/lib.4th
+++ b/src/lib.4th
@@ -587,6 +587,7 @@ DOES>   @
 ;
 
 : WORDS
+        CR
         LATEST @        ( start at LATEST dictionary entry )
         BEGIN
                 ?DUP            ( while link pointer is not null )
@@ -619,6 +620,8 @@ DOES>   @
 : SEE
         BL WORD FIND    ( find the dictionary entry to decompile )
 
+        CR
+
         0= IF
                 ." Word '" COUNT TYPE ." ' not found in dictionary."
                 EXIT