summaryrefslogtreecommitdiff
path: root/libguile/arrays.h
diff options
context:
space:
mode:
authorDaniel Llorens <daniel.llorens@bluewin.ch>2015-02-12 10:15:42 +0100
committerDaniel Llorens <daniel.llorens@bluewin.ch>2016-07-11 09:11:50 +0200
commited6c65507ae3b93e02dbe22a2c1e31c1b8c329fb (patch)
tree1dfff97db824f7a997c8b4cf52bc9bd46c93eadf /libguile/arrays.h
parent3aafc2c857541fc4d015b5d6ba2ac075f50240d0 (diff)
downloadguile-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.h3
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 */