diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-02-09 07:21:16 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-02-09 07:21:16 -0800 |
| commit | 9f34bd9798550af88893ad165f9792198c48163d (patch) | |
| tree | b8eebbf23036d0f553dc3f4747c100e76370394d /tests/010/output-clauses.txr | |
| parent | e11733bc09dcb23521b3b91b46c2ac3447c1d210 (diff) | |
| download | txr-9f34bd9798550af88893ad165f9792198c48163d.tar.gz txr-9f34bd9798550af88893ad165f9792198c48163d.tar.bz2 txr-9f34bd9798550af88893ad165f9792198c48163d.zip | |
matcher: wrap-guards type case to method dispatch.
* share/txr/stdlib/match.tl (match-guards wrap-expr): New
method.
(guard-distinction wrap-expr): New method.
(compiled-match wrap-guards): Reduce type-case to wrap-expr
method call.
Diffstat (limited to 'tests/010/output-clauses.txr')
0 files changed, 0 insertions, 0 deletions