New range testing functions.

* eval.c (eval_init): Register in-range and in-range*
intrinsics.

* lib.c (in_range, in_range_star): New functions.

* lib.h (in_range, in_range_star): Declared.

* txr.1: Documented.

1 files changed, 2 insertions, 0 deletions

diff --git a/lib.h b/lib.h
index 14882390..d74304db 100644
--- a/lib.h
+++ b/lib.h
@@ -1080,6 +1080,8 @@ val from(val range);
 val to(val range);
 val set_from(val range, val from);
 val set_to(val range, val to);
+val in_range(val range, val num);
+val in_range_star(val range, val num);
 val env(void);
 void out_str_char(wchar_t ch, val out, int *semi_flag, int regex);
 val obj_print_impl(val obj, val out, val pretty, struct strm_ctx *);