diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-01-15 06:42:53 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-01-15 06:42:53 -0800 |
commit | 68ac0d194820fe9091fb4720b74ed1782767daee (patch) | |
tree | 7477aed5e7e099c21eeccc0a2d3706127027f0dc /args.h | |
parent | 8dd229be2aedaf93d92f5515bc40c86cd9942a4d (diff) | |
download | txr-68ac0d194820fe9091fb4720b74ed1782767daee.tar.gz txr-68ac0d194820fe9091fb4720b74ed1782767daee.tar.bz2 txr-68ac0d194820fe9091fb4720b74ed1782767daee.zip |
matcher: fix semantics of empty @(all ...) match.
* lisplib.c (match_set_entries): Ensure usr:all* is interned.
* share/txr/stdlib/match.tl (compile-all-match): When the
operator is the existing all, we must listp as a guard, not
consp, because an empty list must match vacuously by virtue of
not containing any counterexample to the pattern. For
situations when a vacuous empty match is not desired, we
support the all* alternative operator, which uses consp.
(compile-match): Wire in the all* operator.
Diffstat (limited to 'args.h')
0 files changed, 0 insertions, 0 deletions