diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-02-07 07:57:06 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-02-07 07:57:06 -0800 |
| commit | ab77cda50d4483da64415c13f3f398d9c28a21da (patch) | |
| tree | db2ea512372586ad7cbef6d684854f7f8ccfa5ed /tests | |
| parent | e6e9820a2060c70b20138b8f26a35e018c029954 (diff) | |
| download | txr-ab77cda50d4483da64415c13f3f398d9c28a21da.tar.gz txr-ab77cda50d4483da64415c13f3f398d9c28a21da.tar.bz2 txr-ab77cda50d4483da64415c13f3f398d9c28a21da.zip | |
matcher: eliminate use of flags.
* share/txr/stdlib/match.tl (if-match, match-case,
lambda-match): Instead of returning the result from the
case(s), which gets stored in a result variable, and setting a
flag to t, set the result variable inside the case, and return
t. This eliminates the flag. In match-case and lambda-match,
the cases can then be combined into an or form.
Diffstat (limited to 'tests')
0 files changed, 0 insertions, 0 deletions