1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-16 16:50:21 +02:00

* ramap.c (scm_ramapc): Typo in error message.

This commit is contained in:
Mikael Djurfeldt 2003-01-09 15:21:33 +00:00
parent 2f413bc4bd
commit 9cf5d9b7d2
2 changed files with 5 additions and 1 deletions

View file

@ -323,7 +323,7 @@ scm_ramapc (int (*cproc)(), SCM data, SCM ra0, SCM lra, const char *what)
{
default:
case 0:
scm_misc_error (what, "array shape mismatch: ~S", ra0);
scm_misc_error (what, "array shape mismatch: ~S", scm_list_1 (ra0));
case 2:
case 3:
case 4: /* Try unrolling arrays */