X-Git-Url: https://git.rrq.au/?a=blobdiff_plain;f=sys.f;h=0815e0fe0ca89d729a068e5072a4e8b721635460;hb=5f99d5c9d6450fe6cbb0c6cd9b030de4fdc2380b;hp=6b13ff9775b5b0ad93c26ada9e83e00c504b8feb;hpb=c6ef34f80b3c194834b1522657166c2a36bf4a29;p=rrq%2Fjonasforth.git

diff --git a/sys.f b/sys.f
index 6b13ff9..0815e0f 100644
--- a/sys.f
+++ b/sys.f
@@ -83,5 +83,7 @@ EXIT [
 ( Read a number from standard input. )
 : READ-NUMBER READ-WORD PARSE-NUMBER ;
 
+S" Ready." TELL NEWLINE
+
 ( vim: syntax=forth
 )