summaryrefslogtreecommitdiffstats
path: root/match.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2011-11-10 08:16:54 -0800
committerKaz Kylheku <kaz@kylheku.com>2011-11-10 08:16:54 -0800
commit67af8c39f31a738af98694375768192795f33ec4 (patch)
treee90224f015e97ccd35601ce465f24f830dfee2f8 /match.c
parentffac180e902b5e5bcf32872d6197b8c7800a2ed2 (diff)
downloadtxr-67af8c39f31a738af98694375768192795f33ec4.tar.gz
txr-67af8c39f31a738af98694375768192795f33ec4.tar.bz2
txr-67af8c39f31a738af98694375768192795f33ec4.zip
* match.c (v_fun): Bugfix: if there is material after
the function call, decline it; it is a horizontal context. * txr.1: Discussion and examples of calls that are in a horizontal context.
Diffstat (limited to 'match.c')
-rw-r--r--match.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/match.c b/match.c
index 896380af..0d9c16c5 100644
--- a/match.c
+++ b/match.c
@@ -2844,7 +2844,7 @@ static val v_fun(match_files_ctx *c)
val sym = first(first_spec);
val func = car(uw_get_func(sym));
- if (func) {
+ if (func && !rest(specline)) {
val args = rest(first_spec);
val params = car(func);
val ub_p_a_pairs = nil;