diff options
author | Daniel Llorens <daniel.llorens@bluewin.ch> | 2015-09-08 16:57:30 +0200 |
---|---|---|
committer | Daniel Llorens <daniel.llorens@bluewin.ch> | 2016-11-23 13:04:49 +0100 |
commit | 7ef9d0ac2bd7af119212d659e94906ae9aa93a8f (patch) | |
tree | 96e28792f1de1b3ac4697cd291e9aa77f0c9cae4 /libguile/array-map.h | |
parent | d1435ea6bdaa3c56d7f025f13d1e7d78c4d9b748 (diff) | |
download | guile-7ef9d0ac2bd7af119212d659e94906ae9aa93a8f.tar.gz |
New functions (array-for-each-cell, array-for-each-cell-in-order)
* libguile/array-map.c (scm_i_array_rebase, scm_array_for_each_cell):
New functions. Export scm_array_for_each_cell() as
(array-for-each-cell).
(array-for-each-cell-in-order): Define additional export.
* libguile/array-map.h (scm_i_array_rebase, scm_array_for_each_cell):
Add prototypes.
* test-suite/tests/array-map.test: Renamed from
test-suite/tests/ramap.test, fix module name. Add tests for
(array-for-each-cell).
* test-suite/Makefile.am: Apply rename array-map.test -> ramap.test.
Diffstat (limited to 'libguile/array-map.h')
-rw-r--r-- | libguile/array-map.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libguile/array-map.h b/libguile/array-map.h index cb18a628a..acfdd5e24 100644 --- a/libguile/array-map.h +++ b/libguile/array-map.h @@ -37,6 +37,10 @@ SCM_API SCM scm_array_map_x (SCM ra0, SCM proc, SCM lra); SCM_API SCM scm_array_for_each (SCM proc, SCM ra0, SCM lra); SCM_API SCM scm_array_index_map_x (SCM ra, SCM proc); SCM_API SCM scm_array_equal_p (SCM ra0, SCM ra1); +SCM_API SCM scm_array_for_each_cell (SCM frank, SCM op, SCM args); +SCM_API SCM scm_array_for_each_cell_in_order (SCM frank, SCM op, SCM args); + +SCM_INTERNAL SCM scm_i_array_rebase (SCM a, size_t base); SCM_INTERNAL void scm_init_array_map (void); #endif /* SCM_ARRAY_MAP_H */ |