Fix infinite loop in pregexp-split.
svn: r4398 original commit: 6bf106f78527da23961e6312c9a34596b8cca942
This commit is contained in:
parent
f4e29064e5
commit
9c94233a21
|
@ -30,7 +30,7 @@
|
|||
(regexp-match (pattern->pregexp pattern) input start-k end-k output-port))
|
||||
|
||||
(define/kw (pregexp-split pattern string #:optional [start 0] [end #f])
|
||||
(pregexp-split (pattern->pregexp pattern) string start end))
|
||||
(regexp-split (pattern->pregexp pattern) string start end))
|
||||
|
||||
(define/kw (pregexp-replace pattern input insert)
|
||||
(regexp-replace (pattern->pregexp pattern) input insert))
|
||||
|
|
Loading…
Reference in New Issue
Block a user