From 646bd2a85a71d5421c0021f4e37e3cd5849280ec Mon Sep 17 00:00:00 2001 From: Helmut Eller Date: Tue, 3 Jan 2017 08:20:06 +0100 Subject: [PATCH] Minor tweaks --- fth/file.fth | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/fth/file.fth b/fth/file.fth index 6b0db20..8fe0810 100644 --- a/fth/file.fth +++ b/fth/file.fth @@ -68,7 +68,6 @@ create (LINE-TERMINATOR) \n c, WHILE ( ) refill 0= IF EXIT THEN ( ) REPEAT - ; }private @@ -123,6 +122,7 @@ create (LINE-TERMINATOR) \n c, CASE -1 OF postpone ( ENDOF 0 OF postpone ( ENDOF + \ for input from files multi-line-comment ENDCASE ; immediate -- 2.20.1