summaryrefslogtreecommitdiffstats
path: root/eval.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2024-02-08 21:16:11 -0800
committerKaz Kylheku <kaz@kylheku.com>2024-02-08 21:16:11 -0800
commit7e7b1c805d778280bfe1a8668b7d993bf00125e4 (patch)
treeed74d14093785f22f28faeb12740cbc781b6d54f /eval.c
parent5ab33195fb46c27a1b374532a2e30a5a9cf5314b (diff)
downloadtxr-7e7b1c805d778280bfe1a8668b7d993bf00125e4.tar.gz
txr-7e7b1c805d778280bfe1a8668b7d993bf00125e4.tar.bz2
txr-7e7b1c805d778280bfe1a8668b7d993bf00125e4.zip
match: remove bad restriction from @(sme) and @(end).
The end pattern in @(sme) and @(end) does not have to be a list pattern, dotted or otherwise. It should support any pattern whatsoever for a single object, which should match the terminating atom. The documentation says that, though not very clearly; it is reworded also. * stdlib/match.tl (check-end): Remove this function, since the end pattern can be any pattern. (pat-len): Bugfix: we are using the meq function incorrectly. The object being compared against several alternatives must be the leftmost argument of meq. This bug prevents a pattern like @(evenp @x) to be correctly considered of length zero. (sme, end): Remove calls to check-end, and just refer to original end variable. * tests/011/patmatch.tl: New tests. * txr.1: clarify that the end pattern may be any pattern, which can match just the terminating atom or a possibly dotted suffix.
Diffstat (limited to 'eval.c')
0 files changed, 0 insertions, 0 deletions