modern: Add some more terminators.

2017-08-26 01:42:04 -05:00 · 2017-08-26 01:42:04 -05:00 · f049487021
parent acfb3a8992
commit f049487021
1 changed files with 3 additions and 0 deletions
--- a/extra/modern/modern.factor
+++ b/extra/modern/modern.factor
@ -152,6 +152,9 @@ MACRO:: read-matched ( ch -- quot: ( n string tag -- n' string slice' ) )
 : terminator? ( slice -- ? )
    {
        [ ";" sequence= ]
+        [ "]" sequence= ]
+        [ "}" sequence= ]
+        [ ")" sequence= ]
    } 1|| ;

 ERROR: token-expected n string obj ;