diff --git a/extra/modern/modern.factor b/extra/modern/modern.factor index 5bba003088..7481b45b3e 100644 --- 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 ;