From 217baeeb57727681bf848df2c6a4e18a28a616b1 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Mon, 31 Aug 2020 21:52:01 +0900 Subject: [PATCH] avoid cyclic test deps in snow --- lib/chibi/diff-test.sld | 6 ++++++ lib/chibi/optional-test.sld | 6 ++++++ 2 files changed, 12 insertions(+) diff --git a/lib/chibi/diff-test.sld b/lib/chibi/diff-test.sld index 0d882ae3..c11f6575 100644 --- a/lib/chibi/diff-test.sld +++ b/lib/chibi/diff-test.sld @@ -2,6 +2,12 @@ (define-library (chibi diff-test) (import (scheme base) (chibi diff) (chibi test)) (export run-tests) + (cond-expand + (chibi (import (chibi test))) + (else + ;; avoid cyclic test deps in snow + (import (srfi 64)) + (begin (define test test-equal)))) (begin (define (run-tests) (test-begin "diff") diff --git a/lib/chibi/optional-test.sld b/lib/chibi/optional-test.sld index 1755831e..e815e8c1 100644 --- a/lib/chibi/optional-test.sld +++ b/lib/chibi/optional-test.sld @@ -1,6 +1,12 @@ (define-library (chibi optional-test) (import (scheme base) (chibi optional) (chibi test)) + (cond-expand + (chibi (import (chibi test))) + (else + ;; avoid cyclic test deps in snow + (import (srfi 64)) + (begin (define test test-equal)))) (export run-tests) (begin (define (run-tests)