summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-01-23 19:15:34 -0800
committerKaz Kylheku <kaz@kylheku.com>2017-01-23 19:15:34 -0800
commit9968bec40de5a53d86607491594a339a1b92eb95 (patch)
treee80cf70f260ac3d6265c6c9c3dbe8e508a0cebd0
parent124019b523df6d54652cd3ba9b157d27b0b960d2 (diff)
downloadtxr-9968bec40de5a53d86607491594a339a1b92eb95.tar.gz
txr-9968bec40de5a53d86607491594a339a1b92eb95.tar.bz2
txr-9968bec40de5a53d86607491594a339a1b92eb95.zip
bugfix: catch arguments not registered properly.
Symptom: variables appearing in a @(catch) are reported as unbound variables anyway. * parser.y (process_catch_exprs); The parameters are the second element of the catch form, not its rest.
-rw-r--r--parser.y2
1 files changed, 1 insertions, 1 deletions
diff --git a/parser.y b/parser.y
index 6859bb4a..01a1c91a 100644
--- a/parser.y
+++ b/parser.y
@@ -1375,7 +1375,7 @@ static val repeat_rep_helper(val sym, val args, val main, val parts)
static void process_catch_exprs(val exprs)
{
- val params = rest(exprs);
+ val params = second(exprs);
for (; params; params = cdr(params)) {
val param = first(params);
if (consp(param))