summaryrefslogtreecommitdiff
path: root/libguile/unif.h
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2004-10-29 15:41:26 +0000
committerMarius Vollmer <mvo@zagadka.de>2004-10-29 15:41:26 +0000
commitab1be174c2c2e30b108718bd2e6d936b3f923517 (patch)
treedd832ff5d6a6b373365e9a4098f1f5802b3c7099 /libguile/unif.h
parentc0fc64c80697891d65ecf65b01d9ba4c21f1df8c (diff)
downloadguile-ab1be174c2c2e30b108718bd2e6d936b3f923517.tar.gz
* unif.h, unif.c (scm_array_creator): New.
(scm_i_get_old_prototype): New. (scm_array_prototype): use it to return old-style prototype, never return creators. (scm_make_uve): Use scm_call_1 instead of scm_call_2 with a second arg of SCM_UNDEFINED. The latter is wrong.
Diffstat (limited to 'libguile/unif.h')
-rw-r--r--libguile/unif.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/libguile/unif.h b/libguile/unif.h
index 61daaf634..5ff7ea1c6 100644
--- a/libguile/unif.h
+++ b/libguile/unif.h
@@ -118,6 +118,7 @@ SCM_API SCM scm_array_to_list (SCM v);
SCM_API SCM scm_list_to_uniform_array (SCM ndim, SCM prot, SCM lst);
SCM_API int scm_raprin1 (SCM exp, SCM port, scm_print_state *pstate);
SCM_API SCM scm_array_prototype (SCM ra);
+SCM_API SCM scm_array_creator (SCM ra);
SCM_API SCM scm_i_read_array (SCM port, int c);