diff options
author | Ludovic Courtès <ludo@gnu.org> | 2009-10-06 23:40:30 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2009-10-06 23:41:39 +0200 |
commit | 61aab1c3755a97390fc8e365fbd4a6b1a4f80978 (patch) | |
tree | eee5d64d8f2f9205d22b8089a684d64f90edaa27 /libguile/generalized-arrays.c | |
parent | f67ddf9dbfec851676806a2f3dff7eae539ac499 (diff) | |
download | guile-61aab1c3755a97390fc8e365fbd4a6b1a4f80978.tar.gz |
Fix typo in `scm_array_p_2 ()'.
* libguile/generalized-arrays.c (scm_array_p_2)[FUNC_NAME]: Fix.
Diffstat (limited to 'libguile/generalized-arrays.c')
-rw-r--r-- | libguile/generalized-arrays.c | 2 |
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)); } |