diff options
| author |  Peter McGoron
| 2025-02-16 20:52:57 -0500 |
|---|---|---|
| committer | Peter McGoron
| 2025-02-16 20:52:57 -0500 |
| commit | b88f195069438f3f4a18c3295095ccd923390d81 (patch) | |
| tree | be12162e85828175d72456fa2407ea674ccbd7cf /tests/run.scm | |
| parent | use vectors instead of lists in srfi-113 tests (diff) | |
CHICKEN bug? Definition of `%insert` in the test for `internal` was
interfering with the import definition for the srfi-113 test.
Diffstat (limited to '')
| -rw-r--r-- | tests/run.scm | 31 |
1 files changed, 14 insertions, 17 deletions
diff --git a/tests/run.scm b/tests/run.scm index 493dbf1..a4e504a 100644 --- a/tests/run.scm +++ b/tests/run.scm @@ -13,8 +13,7 @@ | limitations under the License. |# -(import r7rs - (srfi 64) (mcgoron srfi 64)) +(import r7rs (srfi 64) (mcgoron srfi 64)) (load "random-number-vector.sld") (load "util.sld") @@ -27,22 +26,20 @@ (test-runner-current (test-runner-create)) (set-verbosity! '(fails)) -#;(begin - (define-library (mcgoron weight-balanced-trees test internal) - (import (scheme base) - (chicken condition) - (mcgoron weight-balanced-trees test util) - (mcgoron weight-balanced-trees test random-number-vector) - (except (mcgoron srfi 64) factory) - (srfi 1) (srfi 26) (srfi 64) (srfi 128) (srfi 132) (srfi 133) - (srfi 158) (srfi 194) (srfi 197) (srfi 252) - (except (mcgoron weight-balanced-trees internal) - every) - (prefix (only (mcgoron weight-balanced-trees internal) +(define-library (mcgoron weight-balanced-trees test internal) + (import (scheme base) + (chicken condition) + (mcgoron weight-balanced-trees test util) + (mcgoron weight-balanced-trees test random-number-vector) + (except (mcgoron srfi 64) factory) + (srfi 1) (srfi 26) (srfi 64) (srfi 128) (srfi 132) (srfi 133) + (srfi 158) (srfi 194) (srfi 197) (srfi 252) + (except (mcgoron weight-balanced-trees internal) + every) + (prefix (only (mcgoron weight-balanced-trees internal) every) - node-)) - (include "internal.scm")) - (import (mcgoron weight-balanced-trees test internal))) + node-)) + (include "internal.scm")) (define-library (mcgoron weight-balanced-trees test srfi 113 sets) (import (scheme base) |