String delim matchers are supposed to be interpreted in POSIX flat
syntax.
This commit is contained in:
parent
9c560cf537
commit
df37fa6cae
|
@ -69,7 +69,7 @@
|
||||||
|
|
||||||
(define (->delim-matcher x)
|
(define (->delim-matcher x)
|
||||||
(if (procedure? x) x ; matcher proc
|
(if (procedure? x) x ; matcher proc
|
||||||
(let ((re (cond ((string? x) (re-string x))
|
(let ((re (cond ((string? x) (posix-string->regexp x))
|
||||||
((char-set? x) (re-char-set x))
|
((char-set? x) (re-char-set x))
|
||||||
((char? x) (re-string (string x)))
|
((char? x) (re-string (string x)))
|
||||||
((regexp? x) x)
|
((regexp? x) x)
|
||||||
|
|
Loading…
Reference in New Issue