* tests/ports.test: include (ice-9 rdelim) module.

diff --git a/test-suite/ChangeLog b/test-suite/ChangeLog
index e2b9cf0..3a6c322 100644 (file)
--- a/test-suite/ChangeLog
+++ b/test-suite/ChangeLog
@@ -1,3 +1,7 @@
+2001-01-24  Gary Houston  <ghouston@arglist.com>
+
+       * tests/ports.test: include (ice-9 rdelim) module.
+
 2001-01-18  Dirk Herrmann  <D.Herrmann@tu-bs.de>
 
        * tests/numbers.test:  Converted to do real boundary testing.

diff --git a/test-suite/tests/ports.test b/test-suite/tests/ports.test
index 71f4882..dbdca07 100644 (file)
--- a/test-suite/tests/ports.test
+++ b/test-suite/tests/ports.test
@@ -19,7 +19,8 @@
 ;;;; Boston, MA 02111-1307 USA
 
 (use-modules (test-suite lib)
-            (ice-9 popen))
+            (ice-9 popen)
+            (ice-9 rdelim))
 
 (define (display-line . args)
   (for-each display args)
@@ -200,6 +201,7 @@
                         (let ((errno (car (list-ref args 3))))
                           (or (= errno EAGAIN)
                               (= errno EWOULDBLOCK))))))))
+
 \f
 ;;;; Pipe (popen) ports.