From 40768ab0200b1017e0cb9e1f799fced830074519 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sun, 24 Feb 2019 20:14:17 -0800
Subject: bracket: new function.

* eval.c (eval_init): Register bracket intrinsic.

* lib.c (bracket): New function.

* lib.h (bracket): 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 c426fe64..cb1b2ef6 100644
--- a/lib.h
+++ b/lib.h
@@ -740,6 +740,7 @@ val minv(val first, struct args *rest);
 val maxl(val first, val rest);
 val minl(val first, val rest);
 val clamp(val low, val high, val num);
+val bracket(val larg, struct args *args);
 val expt(val base, val exp);
 val exptv(struct args *nlist);
 val exptmod(val base, val exp, val mod);
-- 
cgit v1.2.3