Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-05-20 14:19:18 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

The final offset was off in regexp-fold for regexps not ending in a match.

Browse source 
Fixes issue #203.
This commit is contained in:
Alex Shinn 2013-10-15 15:23:23 +09:00
parent 961e5e885b
commit 6f57182633
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lib/chibi/regexp.scm
View file

@ -708,7 +708,7 @@
j j
(kons (string-offset->index str from) md str acc))))) (kons (string-offset->index str from) md str acc)))))
(else (else
(finish (string-offset->index str i) #f str acc)))))) (finish (string-offset->index str from) #f str acc))))))
(define (regexp-extract rx str . o) (define (regexp-extract rx str . o)
(apply regexp-fold (apply regexp-fold