diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-01-15 07:27:10 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-01-15 07:27:10 -0800 |
| commit | cb7e8aba2b75a419357fb33e235ecb86763177a2 (patch) | |
| tree | 3f432f4f55c55efe00dc7cba023a16e62452e727 /gencadr.txr | |
| parent | 7667fc940e6ee797770ba966d4d6df74a1e6a4e6 (diff) | |
| download | txr-cb7e8aba2b75a419357fb33e235ecb86763177a2.tar.gz txr-cb7e8aba2b75a419357fb33e235ecb86763177a2.tar.bz2 txr-cb7e8aba2b75a419357fb33e235ecb86763177a2.zip | |
matcher: some renaming in all match.
This is in anticipation of using the same function to compile
other patterns that involve iteration.
* share/txr/stdlib/match.tl (compile-all-match): Function
renamed to compile-loop-match. The successful match and loop
termination variables are renamed to different symbols.
Also, test for the usr:all* symbol explicitly rather than
all for making the test consp.
(compile-match): Follow function rename.
Diffstat (limited to 'gencadr.txr')
0 files changed, 0 insertions, 0 deletions