From be8c711d3efe07b686f835959aed1cae5634e928 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Wed, 30 Mar 2016 21:24:43 -0700 Subject: [PATCH] regexp: need this to be (parse-raw). --- basis/regexp/regexp.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/basis/regexp/regexp.factor b/basis/regexp/regexp.factor index 96867381ee..d50909ba2b 100644 --- a/basis/regexp/regexp.factor +++ b/basis/regexp/regexp.factor @@ -208,7 +208,7 @@ PRIVATE> ] change-lexer-column ; : parse-noblank-token ( lexer -- str/f ) - dup still-parsing-line? [ (parse-token) ] [ drop f ] if ; + dup still-parsing-line? [ (parse-raw) ] [ drop f ] if ; : parse-regexp ( accum -- accum ) lexer get [ take-until ] [ parse-noblank-token ] bi -- 2.34.1