[email protected] (Ludovic Courtès) skribis:

> The following case does not terminate:
>
> scheme@(guile-user)> (use-modules (srfi srfi-37))
> scheme@(guile-user)> (define opts (list (option '(#\I) #f #t (lambda _ #t))))
> scheme@(guile-user)> (args-fold '("-I") opts (lambda _ (error 
> "unrecognized")) (lambda _ #f) '())
> [spins forever]

Fixed in 59b0f9d.

Ludo’.



Reply via email to