diff options
author | Ludovic Courtès <ludo@gnu.org> | 2009-09-23 22:04:55 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2009-09-24 00:06:54 +0200 |
commit | ec370c6ffb560a718280e906c193dcc912923059 (patch) | |
tree | 629e2b437aa25ce36c1719ae7342d9e8b0305972 /libguile/generalized-arrays.h | |
parent | 27f3413eb8f505b8cab8850ea2f35139ea5707d2 (diff) | |
download | guile-ec370c6ffb560a718280e906c193dcc912923059.tar.gz |
Reinstate backward-compatible `scm_array_p ()'.
* libguile/generalized-arrays.c (scm_array_p_2): New, formerly
`scm_array_p ()'.
(scm_array_p): Add second argument, for compatibility with 1.8 and
earlier and to match what the doc says and what `SCM_VALIDATE_ARRAY'
expects.
* libguile/generalized-arrays.h (scm_array_p_2): New.
(scm_array_p): Adjust.
Diffstat (limited to 'libguile/generalized-arrays.h')
-rw-r--r-- | libguile/generalized-arrays.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/libguile/generalized-arrays.h b/libguile/generalized-arrays.h index cc7214e8b..1f9b6ad3d 100644 --- a/libguile/generalized-arrays.h +++ b/libguile/generalized-arrays.h @@ -35,7 +35,8 @@ /** Arrays */ SCM_API int scm_is_array (SCM obj); -SCM_API SCM scm_array_p (SCM v); +SCM_API SCM scm_array_p (SCM v, SCM unused); +SCM_INTERNAL SCM scm_array_p_2 (SCM); SCM_API int scm_is_typed_array (SCM obj, SCM type); SCM_API SCM scm_typed_array_p (SCM v, SCM type); |