diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2015-11-25 06:24:03 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2015-11-25 06:24:03 -0800 |
commit | 49133d53e863ddfeeffcb46c7c20575f8c7910c5 (patch) | |
tree | 6cc7205c5afeb1d962981fe22afba032d91cb0a9 /lib.h | |
parent | eaa457213d49600c5e1fd34dcbeb17d4716aea41 (diff) | |
download | txr-49133d53e863ddfeeffcb46c7c20575f8c7910c5.tar.gz txr-49133d53e863ddfeeffcb46c7c20575f8c7910c5.tar.bz2 txr-49133d53e863ddfeeffcb46c7c20575f8c7910c5.zip |
New functions window-map and window-mappend.
* args.h (args_set_fill): New inline function.
* eval.c (eval_init): Register window-map and window-mappend
intrinics.
* lib.c (wrap_k, reflect_k): New keyword variables.
(calc_win_size): New static function.
(window_map_list, window_map_vec): New static functions.
(window_map, window_mappend): New functions.
(obj_init): Initialize wrap_k and reflect_k.
* lib.h (window_map, window_mappend): Declared.
* txr.1: Documented window-map and window-mappend
Diffstat (limited to 'lib.h')
-rw-r--r-- | lib.h | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -875,6 +875,8 @@ val mapcar(val fun, val list); val mapcon(val fun, val list); val mappend(val fun, val list); val mapdo(val fun, val list); +val window_map(val range, val boundary, val fun, val seq); +val window_mappend(val range, val boundary, val fun, val seq); val interpose(val sep, val seq); val merge(val list1, val list2, val lessfun, val keyfun); val sort(val seq, val lessfun, val keyfun); |