summaryrefslogtreecommitdiffstats
path: root/strudel.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2024-12-20 19:42:40 -0800
committerKaz Kylheku <kaz@kylheku.com>2024-12-20 19:42:40 -0800
commit4356b0df29e5a156811e7388072e26799001e712 (patch)
tree5f1169b6a46eaa6bb9a0d3d6554a602c7f42e501 /strudel.h
parentae79309b0b12092d2e3e10dfced0dcf1e9cc43ad (diff)
downloadtxr-4356b0df29e5a156811e7388072e26799001e712.tar.gz
txr-4356b0df29e5a156811e7388072e26799001e712.tar.bz2
txr-4356b0df29e5a156811e7388072e26799001e712.zip
match-case: bugfix in conversion to casequal.
* stdlib/match.tl (match-case-to-casequal): the (do inc dfl-cnt) action has a problem: it inserts an implicit extra parameter to the invocation of inc, which crashes the + addition due to that parameter being the matching @nil object. We don't need this entire case because it handles @nil, which also matches the following case for (sys:var ...), since @nil is (sys:var nil). That case ahs the same action of incrementing dfl-cnt. * tests/011/patmatch.tl: Test case added.
Diffstat (limited to 'strudel.h')
0 files changed, 0 insertions, 0 deletions