Remove deprecation warnings from the build

* module/srfi/srfi-35.scm: Remove explicit use of (ice-9 syncase).

* test-suite/tests/r5rs_pitfall.test: Same again.

* test-suite/tests/syncase.test: Remove "(ice-9 syncase) loads" test;
  syncase is always loaded now.

diff --git a/module/srfi/srfi-35.scm b/module/srfi/srfi-35.scm
index 873b08b..1d496fc 100644 (file)
--- 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 0bae630..0bab38c 100644 (file)
--- 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 4cd9336..72acdec 100644 (file)
--- 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 ...))))