diff options
author | Marius Vollmer <mvo@zagadka.de> | 2004-10-29 15:41:26 +0000 |
---|---|---|
committer | Marius Vollmer <mvo@zagadka.de> | 2004-10-29 15:41:26 +0000 |
commit | ab1be174c2c2e30b108718bd2e6d936b3f923517 (patch) | |
tree | dd832ff5d6a6b373365e9a4098f1f5802b3c7099 /libguile/unif.h | |
parent | c0fc64c80697891d65ecf65b01d9ba4c21f1df8c (diff) | |
download | guile-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.h | 1 |
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); |