summaryrefslogtreecommitdiffstats
path: root/match.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-11-24 08:57:58 -0800
committerKaz Kylheku <kaz@kylheku.com>2011-11-24 08:57:58 -0800
commitabdf06ed559fbc2f775271027f5000202bac9ff3 (patch)
tree6e1cc06a2226a0c2aedf7983c7d99a699c79690f /match.c
parent88e3db0abbde783bfa57f5bce2d792b5dbac6ead (diff)
downloadtxr-abdf06ed559fbc2f775271027f5000202bac9ff3.tar.gz
txr-abdf06ed559fbc2f775271027f5000202bac9ff3.tar.bz2
txr-abdf06ed559fbc2f775271027f5000202bac9ff3.zip
* match.c (match_funcall): Set source location info for
generated function call.
Diffstat (limited to 'match.c')
-rw-r--r--match.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/match.c b/match.c
index cc61479e..dce83a45 100644
--- a/match.c
+++ b/match.c
@@ -3212,6 +3212,7 @@ val match_funcall(val name, val arg, val other_args)
nao), nil);
match_files_ctx c = mf_all(spec, nil, bindings, nil, num(0));
(void) first_spec;
+ rlcp(car(spec), specline);
val ret = v_fun(&c);