latest cvs and srfi-1 for-each

latest cvs and srfi-1 for-each

[Kevin Ryde]

In the latest cvs built on a recent i386 debian, srfi-1 for-each seems
to have stopped working,

	(use-modules (srfi srfi-1))
	(for-each noop '(1 2) '(3 4))

gives

	Backtrace:
	In standard input:
	   5: 0* [for-each #<primitive-procedure noop> (1 2) (3 4)]

	standard input:5:1: In procedure for-each in expression (for-each noop
	(quote #) ...):
	standard input:5:1: Wrong type argument in position 3: (3 4)
	ABORT: (wrong-type-arg)

whereas I expected it to do nothing, which is what it does without the
srfi-1 module, or in either mode in 1.6.1.  I noticed it in a program
that used srfi-1 for other purposes and happened then to get the
enhanced for-each.

In any case I expect this is work in progress, but just so long as
someone knows, or if it might form some sort of test case.


_______________________________________________
Guile-devel mailing list
Guile-devel@gnu.org
http://mail.gnu.org/mailman/listinfo/guile-devel

Re: latest cvs and srfi-1 for-each

[Mikael Djurfeldt]

Kevin Ryde <user42@zip.com.au> writes:

> In the latest cvs built on a recent i386 debian, srfi-1 for-each seems
> to have stopped working,

* srfi-1.c (srfi1_for_each): Corrected argument checking for the
case of two argument lists.  (Thanks to Kevin Ryde.)


_______________________________________________
Bug-guile mailing list
Bug-guile@gnu.org
http://mail.gnu.org/mailman/listinfo/bug-guile