summaryrefslogtreecommitdiff
path: root/libguile/generalized-arrays.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/generalized-arrays.c')
-rw-r--r--libguile/generalized-arrays.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/generalized-arrays.c b/libguile/generalized-arrays.c
index 13f66fdca..8bbbed4d1 100644
--- a/libguile/generalized-arrays.c
+++ b/libguile/generalized-arrays.c
@@ -43,7 +43,7 @@ SCM_DEFINE (scm_array_p_2, "array?", 1, 0, 0,
(SCM obj),
"Return @code{#t} if the @var{obj} is an array, and @code{#f} if\n"
"not.")
-#define FUNC_NAME s_scm_array_p
+#define FUNC_NAME s_scm_array_p_2
{
return scm_from_bool (scm_is_array (obj));
}