summaryrefslogtreecommitdiffstats
path: root/lisplib.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-02-05 16:11:00 -0800
committerKaz Kylheku <kaz@kylheku.com>2017-02-05 16:11:00 -0800
commit38bb7375b93b048be6331e3376e091e7506e0fde (patch)
tree4e9245ddd5b5a4d5844386b5512489a5f3fca40f /lisplib.c
parent70ddb25b6534b1dbf0e69b53dc768a80bb4838e0 (diff)
downloadtxr-38bb7375b93b048be6331e3376e091e7506e0fde.tar.gz
txr-38bb7375b93b048be6331e3376e091e7506e0fde.tar.bz2
txr-38bb7375b93b048be6331e3376e091e7506e0fde.zip
Adding whena macro.
We have ifa and conda; whena is conspicuously absent. * lisplib.c (ifa_set_entries): Add autoload entry for whena. * share/txr/stdlib/ifa.tl (whena): New macro. * txr.1: Documented whena.
Diffstat (limited to 'lisplib.c')
-rw-r--r--lisplib.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/lisplib.c b/lisplib.c
index abdd8c1c..d5f0d1d1 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -106,7 +106,9 @@ static val ver_instantiate(val set_fun)
static val ifa_set_entries(val dlt, val fun)
{
- val name[] = { lit("ifa"), lit("conda"), lit("condlet"), nil };
+ val name[] = {
+ lit("ifa"), lit("whena"), lit("conda"), lit("condlet"), nil
+ };
set_dlt_entries(dlt, name, fun);
return nil;
}