diff --git a/module/srfi/srfi-35.scm b/module/srfi/srfi-35.scm index 873b08b13..1d496fcce 100644 --- a/module/srfi/srfi-35.scm +++ b/module/srfi/srfi-35.scm @@ -28,7 +28,6 @@ (define-module (srfi srfi-35) #:use-module (srfi srfi-1) - #:use-module (ice-9 syncase) #:export (make-condition-type condition-type? make-condition condition? condition-has-type? condition-ref make-compound-condition extract-condition diff --git a/test-suite/tests/r5rs_pitfall.test b/test-suite/tests/r5rs_pitfall.test index 0bae630b5..0bab38cc4 100644 --- a/test-suite/tests/r5rs_pitfall.test +++ b/test-suite/tests/r5rs_pitfall.test @@ -20,7 +20,6 @@ ;; macro has been modified to fit into our test suite machinery. (define-module (test-suite test-r5rs-pitfall) - :use-syntax (ice-9 syncase) :use-module (test-suite lib)) (define-syntax should-be diff --git a/test-suite/tests/syncase.test b/test-suite/tests/syncase.test index 4cd93369a..72acdeccb 100644 --- a/test-suite/tests/syncase.test +++ b/test-suite/tests/syncase.test @@ -22,11 +22,6 @@ (define-module (test-suite test-syncase) :use-module (test-suite lib)) -(pass-if "(ice-9 syncase) loads" - (false-if-exception - (begin (eval '(use-syntax (ice-9 syncase)) (current-module)) - #t))) - (define-syntax plus (syntax-rules () ((plus x ...) (+ x ...))))