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.