From 152800f1d331a12fa2d322fa077d3e30fd6b4c19 Mon Sep 17 00:00:00 2001 From: Mikael Djurfeldt Date: Wed, 24 Sep 1997 19:46:47 +0000 Subject: [PATCH] Bugfix of the bugfix. --- libguile/ramap.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/libguile/ramap.c b/libguile/ramap.c index c35563165..6db7f97ee 100644 --- a/libguile/ramap.c +++ b/libguile/ramap.c @@ -1647,7 +1647,7 @@ ramap_a (ra0, proc, ras) SCM_PROC(s_serial_array_map, "serial-array-map", 2, 0, 1, scm_array_map); SCM_PROC(s_array_map, "array-map", 2, 0, 1, scm_array_map); -SCM_PROC(s_array_map, "array-map!", 2, 0, 1, scm_array_map); +SCM_PROC(s_array_map_x, "array-map!", 2, 0, 1, scm_array_map); SCM scm_array_map (ra0, proc, lra)