summaryrefslogtreecommitdiffstats
path: root/match.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-01-21 21:13:33 -0800
committerKaz Kylheku <kaz@kylheku.com>2017-01-21 21:13:33 -0800
commitb64bcbb6e7bd7f331f660518e97e2bfa898ae340 (patch)
tree8b80eb794c7f4777346947fccea8b0faafeb4185 /match.h
parent9cac065f8374ed008bf8274909b3f431dd9e8da6 (diff)
downloadtxr-b64bcbb6e7bd7f331f660518e97e2bfa898ae340.tar.gz
txr-b64bcbb6e7bd7f331f660518e97e2bfa898ae340.tar.bz2
txr-b64bcbb6e7bd7f331f660518e97e2bfa898ae340.zip
bugfix: expand macros in a number of directives.
This is the last round of changes on this topic, bringing proper macro expansion to the arguments to @(skip), @(fuzz), @(next), @(call), @(cat), @(load) and @(close). * match.c (match_expand_keyword_args): Only process the keyword arguments if they are followed by an argument. Process @(next) arguments here too: :list and :string take a Lisp expression, but :tlist and :var take an argument which is not a Lisp expression and must be handled properly. Also, expand any non-keyword expression. This handles the <source> argument of @(next). (match_expand_elem): New function. * match.h (match_expand_elem): Declared. * parser.h (expand_meta): Declared. * parser.y (expand_meta): Static function becomes external. (elem): Expand elem other than require or do using match_expand_elem. We don't fold require and do into this because match_expand_elem has a backward compat switch in it that doesn't apply to these.
Diffstat (limited to 'match.h')
-rw-r--r--match.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/match.h b/match.h
index f911897f..a3b19f0f 100644
--- a/match.h
+++ b/match.h
@@ -29,6 +29,7 @@ extern val text_s, choose_s, gather_s, do_s, require_s;
extern val close_s, load_s, include_s, mod_s, modlast_s, line_s;
extern val counter_k, vars_k, env_k, var_k;
val match_expand_keyword_args(val elem);
+val match_expand_elem(val elem);
val match_filter(val name, val arg, val other_args);
val match_fun(val name, val args, val input, val files);
val include(val specline);