From d91ed5da5a5ea74308ad78faec31e03c48b7e767 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Mon, 12 Jan 2015 22:49:37 -0800 Subject: * arith.c (zerop): Handle character arguments. (plusp, minusp): New functions. * eval.c (eval_init): Register plusp and minusp. * lib.h (plusp, minusp): Declared. * txr.1: Documented plusp and minusp, and the handling of characters by zerop. --- lib.h | 2 ++ 1 file changed, 2 insertions(+) (limited to 'lib.h') diff --git a/lib.h b/lib.h index e55a3516..378973e6 100644 --- a/lib.h +++ b/lib.h @@ -545,6 +545,8 @@ val wrap_star(val start, val end, val num); val wrap(val start, val end, val num); val divi(val anum, val bnum); val zerop(val num); +val plusp(val num); +val minusp(val num); val evenp(val num); val oddp(val num); val succ(val num); -- cgit v1.2.3