From cdb62673a886801298c543346c2186f0e054ca6e Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Thu, 23 Nov 2017 06:42:52 -0800 Subject: New function: grade. Inspired by APL. * eval.c (eval_init): Register grade intrinsic. * lib.c (grade): New function. * lib.h (grade): Declared. * txr.1: Documented. --- lib.h | 1 + 1 file changed, 1 insertion(+) (limited to 'lib.h') diff --git a/lib.h b/lib.h index a4138bda..6c61d282 100644 --- a/lib.h +++ b/lib.h @@ -1004,6 +1004,7 @@ val multi_sort(val lists, val funcs, val key_funcs); val sort_group(val seq, val keyfun, val lessfun); val unique(val seq, val keyfun, struct args *hashv_args); val uniq(val seq); +val grade(val seq, val lessfun, val keyfun_in); val find(val list, val key, val testfun, val keyfun); val rfind(val list, val key, val testfun, val keyfun); val find_if(val pred, val list, val key); -- cgit v1.2.3