diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-08-19 11:47:12 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-08-19 11:47:12 -0700 |
commit | f374abcd23a63f628a9ec7b84e2d797d3fc28342 (patch) | |
tree | 811149d630ffaefaa8be464465f660ba9287fc98 /lisplib.c | |
parent | 46be04f43613e08af5015485ff19bb79af1d3feb (diff) | |
download | txr-f374abcd23a63f628a9ec7b84e2d797d3fc28342.tar.gz txr-f374abcd23a63f628a9ec7b84e2d797d3fc28342.tar.bz2 txr-f374abcd23a63f628a9ec7b84e2d797d3fc28342.zip |
matcher: rename error-throwing macros.
* stdlib/match.tl (must-match): Renamed to just match.
It's just when-match without the "when".
(must-match-case): Renamed to match-ecase, consistent
with the case -> ecase naming scheme.
* lisplib.c (match_set_entries): Names updated here.
* tests/011/patmatch.tl: Test cases updated.
* txr.1: Names updated here.
* stdlib/doc-syms.tl: Updated.
Diffstat (limited to 'lisplib.c')
-rw-r--r-- | lisplib.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -882,8 +882,8 @@ static val match_set_entries(val dlt, val fun) nil }; val name[] = { - lit("when-match"), lit("match-case"), lit("if-match"), lit("must-match"), - lit("must-match-case"), + lit("when-match"), lit("match-case"), lit("if-match"), + lit("match"), lit("match-ecase"), lit("while-match"), lit("while-match-case"), lit("while-true-match-case"), lit("lambda-match"), lit("defun-match"), lit("defmatch"), lit("each-match"), lit("append-matches"), |