diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2011-10-20 20:28:16 -0400 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2011-10-20 20:28:16 -0400 |
commit | c3874aa95d260547711ed3bad4167642f51971ee (patch) | |
tree | 203a3e042b61bf11757ebe71fe83989aa122767a /match.c | |
parent | b3e5a116825935bc1ee4b596b730c822bf66a4da (diff) | |
download | txr-c3874aa95d260547711ed3bad4167642f51971ee.tar.gz txr-c3874aa95d260547711ed3bad4167642f51971ee.tar.bz2 txr-c3874aa95d260547711ed3bad4167642f51971ee.zip |
Bug #34609
* match.c (v_block): Regression induced by rabid refactoring. Block
must apply remaining directives to data, excluding itself, otherwise
runaway recursion takes the place of correct behavior.
Diffstat (limited to 'match.c')
-rw-r--r-- | match.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1554,7 +1554,7 @@ static val v_block(match_files_ctx c, match_files_ctx *cout) sem_error(spec_linenum, lit("unexpected material after block directive"), nao); - if (rest(c.spec)) + if ((c.spec = rest(c.spec)) != nil) { uw_block_begin(name, result); result = match_files(c); |