From 9791175d2bb5175aa54379000bf19caf9b34a188 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sun, 9 Feb 2014 02:57:15 -0800 Subject: * eval.c (rperm_list, rperm_vec, rperm_str): n variable renamed to k, for consistency with rperm. (rperm): Likewise, and the behavior in the k == zero case is changed to return a single empty permutation. (perm_while_fun, perm_index, perm_gen_fun_common, perm_init_common, perm_vec_gen_fill, perm_vec_gen_fun, perm_vec, perm_list_gen_fill, perm_list_gen_fun, perm_list, perm_str_gen_fill, perm_str_gen_fun, perm_str, perm): New static functions. (eval_init): perm registered as intrinsic. * lib.c (vecref_l): Bugfix: allow negative indices, just like vecref. * lib.h (three, four): New macros. * txr.1: Updated documentation for rperm. Documented perm. --- lib.h | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib.h') diff --git a/lib.h b/lib.h index 43a31740..869d3c31 100644 --- a/lib.h +++ b/lib.h @@ -771,6 +771,8 @@ val *list_collect_append(val *pptail, val obj); #define zero num_fast(0) #define one num_fast(1) #define two num_fast(2) +#define three num_fast(3) +#define four num_fast(4) #define negone num_fast(-1) #define maxint num_fast(NUM_MAX) #define minint num_fast(NUM_MIN) -- cgit v1.2.3