id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	difficulty
1701	Egg SRFI-37 - wrong result	Jeronimo Pellegrini		"Egg srfi-37 seems to have a problem:


{{{
Type ,? for help.
#;1> (import (srfi 37))
; loading /home/jeronimo/pkg/scheme/chicken/ROOT-git/lib/chicken-git/11/srfi-37.import.so ...
; loading /home/jeronimo/pkg/scheme/chicken/ROOT-git/lib/chicken-git/11/srfi-37.so ...
#;2> (args-fold '(""-I"" ""the-argument"")
           (list (option '(#\I) #f #t
                         (lambda (opt name arg result)
                           (and (eqv? name #\I) arg))))
           (lambda args (error ""unrecognized""))
           (lambda args #f)
           #f)
#f
#;4>
}}}


But it should have returned the argument value (""the-argument"").

If, instead of '(""-I"" ""the-argument""), you pass it '(""-Ithe-argument""),
then it will correctly recognize -I's argument, ""the-argument"".

Several implementations seem to do the same, so perhaps this is a bug in 
the reference implementation?
"	defect	new	minor	someday	extensions	5.2.0