diff --git a/basis/regexp/parser/parser.factor b/basis/regexp/parser/parser.factor index 18b43674c4..56c6b1eb04 100644 --- a/basis/regexp/parser/parser.factor +++ b/basis/regexp/parser/parser.factor @@ -83,7 +83,7 @@ ERROR: bad-class name ; : options>string ( options -- string ) [ on>> ] [ off>> ] bi [ [ option>ch ] map ] bi@ - [ "-" swap 3append ] unless-empty + [ "-" glue ] unless-empty "" like ; ! TODO: add syntax for various parenthized things,