summaryrefslogtreecommitdiffstats
path: root/lisplib.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2019-04-10 16:34:09 -0700
committerKaz Kylheku <kaz@kylheku.com>2019-04-10 16:34:09 -0700
commit710889ccdf6f8f8501f0a9409258b3850002d41d (patch)
treeb67c9a4a55f973c3622ee5c029e586ccf211b571 /lisplib.c
parent079e081ab3f1a1bef175d8185c80108d16452c74 (diff)
downloadtxr-710889ccdf6f8f8501f0a9409258b3850002d41d.tar.gz
txr-710889ccdf6f8f8501f0a9409258b3850002d41d.tar.bz2
txr-710889ccdf6f8f8501f0a9409258b3850002d41d.zip
New catch** macro.
* lisplib.c (except_set_entries): Autoload for catch** symbol. * share/txr/stdlib/except.tl (catch**): New macro. * txr.1: Document catch** macro, and the desc slot of the catch-frame struct.
Diffstat (limited to 'lisplib.c')
-rw-r--r--lisplib.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisplib.c b/lisplib.c
index a6ef5a2f..6d9dcda7 100644
--- a/lisplib.c
+++ b/lisplib.c
@@ -270,7 +270,7 @@ static val hash_instantiate(val set_fun)
static val except_set_entries(val dlt, val fun)
{
val name[] = {
- lit("catch"), lit("catch*"), lit("handle"), lit("handle*"),
+ lit("catch"), lit("catch*"), lit("catch**"), lit("handle"), lit("handle*"),
lit("ignwarn"), lit("macro-time-ignwarn"),
nil
};