Danny Milosavljevic <[email protected]> writes:
> It almost works, but it seems not to find the "test_" lines.
>
> I've reduced the problem to:
>
> scheme@(guile-user)> ,use (ice-9 regex)
> scheme@(guile-user)> (fold-matches "^void" "blah\nvoid\n" '() cons)
> $24 = ()
>
> After reading the documentation, I've revised it to:
>
> scheme@(guile-user)> ,use (ice-9 regex)
> scheme@(guile-user)> (fold-matches "^void" "blah\nvoid\n" '() cons
> regexp/newline)
> $25 = ()
Try this instead:
(fold-matches (make-regexp "^void" regexp/newline)
"blah\nvoid\n" '() cons)
Or rather
(list-matches (make-regexp "^void" regexp/newline)
"blah\nvoid\n")
--
Ricardo