factor: alien.c-types:short -> cramp

[factor.git] / basis / multiline / multiline.factor

diff --git a/basis/multiline/multiline.factor b/basis/multiline/multiline.factor
index bc5e8a45553c52b0aca0709f394af7ab991e6447..00c71b86d06bc2f151407008f557b9b41cacc27c 100644 (file)
--- a/basis/multiline/multiline.factor
+++ b/basis/multiline/multiline.factor
@@ -44,7 +44,7 @@ SYNTAX: STRING:
         i text end find-subseq-from [| j |
             i j text subseq % j end length +
         ] [
-            text i short tail % CHAR: \n ,
+            text i cramp tail % CHAR: \n ,
             lexer next-line
             0 end lexer (scan-multiline-string)
         ] if*