diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-02-17 21:14:51 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-02-17 21:14:51 -0800 |
| commit | b0acad078c68053e38e076c319a8c48ce23c2da6 (patch) | |
| tree | 53592b32cf51e822dd5f0c4d2496849cee35b20e /glob.h | |
| parent | 77c74bccd0388596b8f9aa0f08502f171bc63d40 (diff) | |
| download | txr-b0acad078c68053e38e076c319a8c48ce23c2da6.tar.gz txr-b0acad078c68053e38e076c319a8c48ce23c2da6.tar.bz2 txr-b0acad078c68053e38e076c319a8c48ce23c2da6.zip | |
compiler: condense if with pattern matching.
* share/txr/stdlib/compiler.tl (compiler comp-if): Remove the
pointless cases which check for test being nil, since that is
subsumed under constantp. Move all the constantp cases up,
making them match-case clauses. The handling of %test-funs%
in several places becomes a single pattern case. The remaining
cases don't have any more sub-cases to test, so the cond
forms are gone.
Diffstat (limited to 'glob.h')
0 files changed, 0 insertions, 0 deletions