summaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2016-05-22 20:39:03 +0200
committerAndy Wingo <wingo@pobox.com>2016-05-22 20:40:54 +0200
commit2c95a2102711c990d81bd8908506cd35b9b71022 (patch)
treef1224dfc371625a33f01c60e30401d554938e7be /test-suite
parent2badbd06f695127039e8772f56e9ba44ec875896 (diff)
downloadguile-2c95a2102711c990d81bd8908506cd35b9b71022.tar.gz
More thorough ice-9 sports testing
* module/ice-9/sports.scm: Export read-line, %read-line, and read-delimited. Add these latest three to install-sports!, and fix install-sports! if the current module isn't (ice-9 sports). * test-suite/tests/sports.test: Use install-sports! instead of lexical bindings, to allow us to nicely frob bindings in rdelim. Include rdelim tests.
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/tests/sports.test7
1 files changed, 6 insertions, 1 deletions
diff --git a/test-suite/tests/sports.test b/test-suite/tests/sports.test
index 6eb422ef5..6707f562a 100644
--- a/test-suite/tests/sports.test
+++ b/test-suite/tests/sports.test
@@ -17,7 +17,7 @@
;;;; <http://www.gnu.org/licenses/>.
(define-module (test-suite test-ports)
- #:use-module (ice-9 sports))
+ #:use-module ((ice-9 sports) #:select (install-sports! uninstall-sports!)))
;; Include tests from ports.test.
@@ -49,4 +49,9 @@
#`((include-one #,exp) . #,(lp))))))))
#:guess-encoding #t)))))
+(install-sports!)
+
(include-tests "tests/ports.test")
+(include-tests "tests/rdelim.test")
+
+(uninstall-sports!)