diff --git a/core/parser/parser.factor b/core/parser/parser.factor index 56424c9d15..16bb6bde86 100644 --- a/core/parser/parser.factor +++ b/core/parser/parser.factor @@ -109,7 +109,11 @@ ERROR: staging-violation word ; ] when ; : scan-parsing-word ( -- word ) - scan-object dup wrapper? [ wrapped>> ] when ; + ?scan-token dup "\\" = [ + drop scan-word + ] [ + parse-word + ] if ; ERROR: classoid-expected object ;