giles
0dd2fa3058
Some checks failed
Test, Build, and Deploy / test-build-deploy (push) Failing after 1m8s
apl-throw raises a tagged ("apl-error" code msg) error.
apl-trap-matches? checks if codes list contains the error's code
(0 = catch-all, à la Dyalog).
Eval-stmt :trap clause wraps try-block with R7RS guard;
on match, runs catch-block; on mismatch, re-raises.
Bonus :throw AST node for testing.
test.sh + conformance.sh now load lib/r7rs.sx (for guard) and
include eval-ops + pipeline suites in scoreboard.
All Phase 7 unchecked items are now ticked.
Final scoreboard: 450/450 across 10 suites.
18 lines
479 B
JSON
18 lines
479 B
JSON
{
|
|
"suites": {
|
|
"structural": {"pass": 94, "fail": 0},
|
|
"operators": {"pass": 117, "fail": 0},
|
|
"dfn": {"pass": 24, "fail": 0},
|
|
"tradfn": {"pass": 25, "fail": 0},
|
|
"valence": {"pass": 14, "fail": 0},
|
|
"programs": {"pass": 45, "fail": 0},
|
|
"system": {"pass": 13, "fail": 0},
|
|
"idioms": {"pass": 64, "fail": 0},
|
|
"eval-ops": {"pass": 14, "fail": 0},
|
|
"pipeline": {"pass": 40, "fail": 0}
|
|
},
|
|
"total_pass": 450,
|
|
"total_fail": 0,
|
|
"total": 450
|
|
}
|