diff options
| author |  Peter McGoron
| 2025-11-02 15:13:46 -0500 |
|---|---|---|
| committer | Peter McGoron
| 2025-11-02 15:13:46 -0500 |
| commit | 45fc9ba802ad3b393116f52fb10172f61c2d2c81 (patch) | |
| tree | b99b159e7e2a4f7f3a4d460018af6221d0db9345 /tests/impl.scm | |
| parent | add gauche (diff) | |
fix chicken build, support STKLOS
Diffstat (limited to 'tests/impl.scm')
| -rw-r--r-- | tests/impl.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/tests/impl.scm b/tests/impl.scm index 6e15c11..0047e34 100644 --- a/tests/impl.scm +++ b/tests/impl.scm @@ -404,6 +404,9 @@ (test-group "expect-to-fail" (expect-to-fail (test-body "1 = 2" (eqv? 1 2)) - (test-body "type error" (car '())))) + (cond-expand + ;; SKINT will actually raise a noncatchable error here! + ((not skint) (test-body "type error" (car '()))) + (else #f)))) (test-exit) |