diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2011-11-10 08:16:54 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2011-11-10 08:16:54 -0800 |
commit | 67af8c39f31a738af98694375768192795f33ec4 (patch) | |
tree | e90224f015e97ccd35601ce465f24f830dfee2f8 /match.c | |
parent | ffac180e902b5e5bcf32872d6197b8c7800a2ed2 (diff) | |
download | txr-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.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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; |