--- ramap.c.~1.77.2.6.~ 2004-11-26 08:44:37.000000000 +1100 +++ ramap.c 2004-12-14 10:20:16.000000000 +1100 @@ -1529,10 +1529,8 @@ { SCM_VALIDATE_PROC (2,proc); - if (!(SCM_CONSP (sources) && SCM_CONSP (SCM_CDR (sources)))) - { - SCM_MISC_ERROR ("At least one source array is required.", SCM_EOL); - } + if (!(SCM_CONSP (sources))) + SCM_WRONG_NUM_ARGS (); switch (SCM_TYP7 (proc)) {