diff options
author | Daniel Llorens <daniel.llorens@bluewin.ch> | 2015-02-12 10:15:42 +0100 |
---|---|---|
committer | Daniel Llorens <daniel.llorens@bluewin.ch> | 2016-07-11 09:11:50 +0200 |
commit | ed6c65507ae3b93e02dbe22a2c1e31c1b8c329fb (patch) | |
tree | 1dfff97db824f7a997c8b4cf52bc9bd46c93eadf /libguile/arrays.h | |
parent | 3aafc2c857541fc4d015b5d6ba2ac075f50240d0 (diff) | |
download | guile-ed6c65507ae3b93e02dbe22a2c1e31c1b8c329fb.tar.gz |
Don't use array handles in scm_c_array_rank
* libguile/arrays.c (scm_c_array_rank): moved from
libguile/generalized-arrays.c. Don't use array handles, but follow the
same type check sequence as the other array functions
(shared-array-root, etc).
(scm_array_rank): moved from libguile/generalized-arrays.h.
* libguile/arrays.h: move prototypes here.
Diffstat (limited to 'libguile/arrays.h')
-rw-r--r-- | libguile/arrays.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/libguile/arrays.h b/libguile/arrays.h index bd216aede..9b7fd6c72 100644 --- a/libguile/arrays.h +++ b/libguile/arrays.h @@ -56,6 +56,9 @@ SCM_API SCM scm_array_amend_x (SCM ra, SCM b, SCM indices); SCM_API SCM scm_list_to_array (SCM ndim, SCM lst); SCM_API SCM scm_list_to_typed_array (SCM type, SCM ndim, SCM lst); +SCM_API size_t scm_c_array_rank (SCM ra); +SCM_API SCM scm_array_rank (SCM ra); + /* internal. */ #define SCM_I_ARRAY_FLAG_CONTIGUOUS (1 << 0) /* currently unused */ |