From 084408c61ad35f43e84f6f5332a53a1c5d54b8d8 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Ludovic=20Court=C3=A8s?= Date: Sat, 4 Apr 2009 17:47:04 +0200 Subject: [PATCH] Have tests use the `rnrs' module names. * tests/bytevector.test: Use the `rnrs' module names. * tests/io-ports.test: Likewise. --- tests/bytevector.test | 4 ++-- tests/io-ports.test | 6 +++--- 2 files changed, 5 insertions(+), 5 deletions(-) diff --git a/tests/bytevector.test b/tests/bytevector.test index c33de38..70ed506 100644 --- a/tests/bytevector.test +++ b/tests/bytevector.test @@ -1,6 +1,6 @@ ;;; R6RS Byte Vectors. ;;; -;;; Copyright 2007 Ludovic Courtès +;;; Copyright 2007, 2009 Ludovic Courtès ;;; ;;; ;;; This program is free software; you can redistribute it and/or modify @@ -19,7 +19,7 @@ (define-module (test-bytevector) :use-module (test-suite lib) - :use-module (r6rs bytevector)) + :use-module (rnrs bytevector)) ;;; Some of the tests in here are examples taken from the R6RS Standard ;;; Libraries document. diff --git a/tests/io-ports.test b/tests/io-ports.test index 0026fb4..4297721 100644 --- a/tests/io-ports.test +++ b/tests/io-ports.test @@ -1,6 +1,6 @@ ;;; R6RS I/O Ports. ;;; -;;; Copyright 2007 Ludovic Courtès +;;; Copyright 2007, 2009 Ludovic Courtès ;;; ;;; ;;; This program is free software; you can redistribute it and/or modify @@ -21,8 +21,8 @@ :use-module (test-suite lib) :use-module (srfi srfi-1) :use-module (srfi srfi-11) - :use-module (r6rs io ports) - :use-module (r6rs bytevector)) + :use-module (rnrs io ports) + :use-module (rnrs bytevector)) ;;; All these tests assume Guile 1.8's port system, where characters are ;;; treated as octets. -- 2.11.4.GIT