strings, multiline: Fix unexpected-eof.

diff --git a/basis/multiline/multiline.factor b/basis/multiline/multiline.factor
index e8f4b02491def88297c02fd5117df718a7364299..0bc616cbb6122a55e58a4f674fe1c9285b27c8e9 100644 (file)
--- a/basis/multiline/multiline.factor
+++ b/basis/multiline/multiline.factor
@@ -19,7 +19,7 @@ ERROR: bad-heredoc identifier ;
         dup ";" =
         [ drop lexer get next-line ]
         [ % "\n" % (parse-here) ] if
-    ] [ ";" unexpected-eof ] if* ;
+    ] [ ";" throw-unexpected-eof ] if* ;
 
 PRIVATE>
 
@@ -48,7 +48,7 @@ SYNTAX: STRING:
             lexer get next-line
             0 end (scan-multiline-string)
         ] if*
-    ] [ end unexpected-eof ] if ;
+    ] [ end throw-unexpected-eof ] if ;
 
 :: (parse-multiline-string) ( end-text skip-n-chars -- str )
     [

diff --git a/core/strings/parser/parser.factor b/core/strings/parser/parser.factor
index 7544be1da76af5e304de6437ff27188d50990cc1..99178e985833607afddf8c5d23374e26d60ec6ad 100644 (file)
--- a/core/strings/parser/parser.factor
+++ b/core/strings/parser/parser.factor
@@ -163,7 +163,7 @@ ERROR: trailing-characters string ;
             (parse-multiline-string)
         ] if*
     ] [
-        unexpected-eof
+        throw-unexpected-eof
     ] if ;
 
 PRIVATE>