Use #:duplicates (last) to

suppress warnings about current-time and raise replacing core bindings.

diff --git a/test-suite/tests/srfi-19.test b/test-suite/tests/srfi-19.test
index 84364e2..4300bf0 100644 (file)
--- a/test-suite/tests/srfi-19.test
+++ b/test-suite/tests/srfi-19.test
@@ -22,6 +22,7 @@
 ;; separate module, or later tests will fail.
 
 (define-module (test-suite test-srfi-19)
+  :duplicates (last)  ;; avoid warning about srfi-19 replacing `current-time'
   :use-module (test-suite lib)
   :use-module (srfi srfi-19)
   :use-module (ice-9 format))

diff --git a/test-suite/tests/srfi-34.test b/test-suite/tests/srfi-34.test
index d8f1521..066930b 100644 (file)
--- a/test-suite/tests/srfi-34.test
+++ b/test-suite/tests/srfi-34.test
@@ -18,6 +18,7 @@
 ;;;; Boston, MA 02111-1307 USA
 
 (define-module (test-suite test-srfi-34)
+  :duplicates (last)  ;; avoid warning about srfi-34 replacing `raise'
   :use-module (test-suite lib)
   :use-module (srfi srfi-13)
   :use-module (srfi srfi-34))