Author: yamakenz
Date: Sat Sep 1 00:47:44 2007
New Revision: 4934
Added:
sigscheme-trunk/lib/unittest.scm
- copied unchanged from r4933, /sigscheme-trunk/test/unittest.scm
Removed:
sigscheme-trunk/test/unittest.scm
Modified:
sigscheme-trunk/NEWS
sigscheme-trunk/lib/Makefile.am
sigscheme-trunk/test/Makefile.am
sigscheme-trunk/test/oleg-srfi2.scm
sigscheme-trunk/test/panu-srfi69.scm
sigscheme-trunk/test/scm-r4rstest.scm
sigscheme-trunk/test/stone-srfi1.scm
sigscheme-trunk/test/test-apply.scm
sigscheme-trunk/test/test-assoc.scm
sigscheme-trunk/test/test-begin.scm
sigscheme-trunk/test/test-bool.scm
sigscheme-trunk/test/test-char-cmp.scm
sigscheme-trunk/test/test-char-pred.scm
sigscheme-trunk/test/test-char.scm
sigscheme-trunk/test/test-continuation.scm
sigscheme-trunk/test/test-define-internal.scm
sigscheme-trunk/test/test-define.scm
sigscheme-trunk/test/test-do.scm
sigscheme-trunk/test/test-dyn-extent.scm
sigscheme-trunk/test/test-enc-eucgeneric.scm
sigscheme-trunk/test/test-enc-eucjp.scm
sigscheme-trunk/test/test-enc-sjis.scm
sigscheme-trunk/test/test-enc-utf8.scm
sigscheme-trunk/test/test-eq.scm
sigscheme-trunk/test/test-equal.scm
sigscheme-trunk/test/test-eqv.scm
sigscheme-trunk/test/test-eval.scm
sigscheme-trunk/test/test-formal-syntax.scm
sigscheme-trunk/test/test-formatplus.scm
sigscheme-trunk/test/test-lambda.scm
sigscheme-trunk/test/test-let.scm
sigscheme-trunk/test/test-letrec.scm
sigscheme-trunk/test/test-letstar.scm
sigscheme-trunk/test/test-list.scm
sigscheme-trunk/test/test-map.scm
sigscheme-trunk/test/test-member.scm
sigscheme-trunk/test/test-misc.scm
sigscheme-trunk/test/test-named-let.scm
sigscheme-trunk/test/test-number-arith.scm
sigscheme-trunk/test/test-number-cmp.scm
sigscheme-trunk/test/test-number-io.scm
sigscheme-trunk/test/test-number-literal.scm
sigscheme-trunk/test/test-number-pred.scm
sigscheme-trunk/test/test-obsolete.scm
sigscheme-trunk/test/test-pair.scm
sigscheme-trunk/test/test-promise.scm
sigscheme-trunk/test/test-quote.scm
sigscheme-trunk/test/test-srfi1-another.scm
sigscheme-trunk/test/test-srfi1-obsolete.scm
sigscheme-trunk/test/test-srfi2.scm
sigscheme-trunk/test/test-srfi28.scm
sigscheme-trunk/test/test-srfi34-2.scm
sigscheme-trunk/test/test-srfi34.scm
sigscheme-trunk/test/test-srfi38.scm
sigscheme-trunk/test/test-srfi48.scm
sigscheme-trunk/test/test-srfi55.scm
sigscheme-trunk/test/test-srfi6.scm
sigscheme-trunk/test/test-srfi60.scm
sigscheme-trunk/test/test-srfi8.scm
sigscheme-trunk/test/test-sscm-ext.scm
sigscheme-trunk/test/test-string-cmp.scm
sigscheme-trunk/test/test-string-core.scm
sigscheme-trunk/test/test-string-null.scm
sigscheme-trunk/test/test-string-proc.scm
sigscheme-trunk/test/test-string.scm
sigscheme-trunk/test/test-symbol.scm
sigscheme-trunk/test/test-syntax-rules.scm
sigscheme-trunk/test/test-syntax.scm
sigscheme-trunk/test/test-tail-rec.scm
sigscheme-trunk/test/test-unittest.scm
sigscheme-trunk/test/test-values.scm
sigscheme-trunk/test/test-vector.scm
sigscheme-trunk/test/unittest-bigloo.scm
sigscheme-trunk/test/unittest-gauche.scm
Log:
* This commit make unittest.scm system-installed library
* test/unittest.scm
- Move to lib/unittest.scm
* lib/unittest.scm
- Moved from test/unittest.scm
* lib/Makefile.am
- (dist_scmlib_DATA): Add unittest.scm
* test/Makefile.am
- (EXTRA_DIST): Remove unittest.scm
* test/oleg-srfi2.scm
* test/panu-srfi69.scm
* test/scm-r4rstest.scm
* test/stone-srfi1.scm
* test/test-apply.scm
* test/test-assoc.scm
* test/test-begin.scm
* test/test-bool.scm
* test/test-char-cmp.scm
* test/test-char-pred.scm
* test/test-char.scm
* test/test-continuation.scm
* test/test-define-internal.scm
* test/test-define.scm
* test/test-do.scm
* test/test-dyn-extent.scm
* test/test-enc-eucgeneric.scm
* test/test-enc-eucjp.scm
* test/test-enc-sjis.scm
* test/test-enc-utf8.scm
* test/test-eq.scm
* test/test-equal.scm
* test/test-eqv.scm
* test/test-eval.scm
* test/test-formal-syntax.scm
* test/test-formatplus.scm
* test/test-lambda.scm
* test/test-let.scm
* test/test-letrec.scm
* test/test-letstar.scm
* test/test-list.scm
* test/test-map.scm
* test/test-member.scm
* test/test-misc.scm
* test/test-named-let.scm
* test/test-number-arith.scm
* test/test-number-cmp.scm
* test/test-number-io.scm
* test/test-number-literal.scm
* test/test-number-pred.scm
* test/test-obsolete.scm
* test/test-pair.scm
* test/test-promise.scm
* test/test-quote.scm
* test/test-srfi1-another.scm
* test/test-srfi1-obsolete.scm
* test/test-srfi2.scm
* test/test-srfi28.scm
* test/test-srfi34-2.scm
* test/test-srfi34.scm
* test/test-srfi38.scm
* test/test-srfi48.scm
* test/test-srfi55.scm
* test/test-srfi6.scm
* test/test-srfi60.scm
* test/test-srfi8.scm
* test/test-sscm-ext.scm
* test/test-string-cmp.scm
* test/test-string-core.scm
* test/test-string-null.scm
* test/test-string-proc.scm
* test/test-string.scm
* test/test-symbol.scm
* test/test-syntax-rules.scm
* test/test-syntax.scm
* test/test-tail-rec.scm
* test/test-unittest.scm
* test/test-values.scm
* test/test-vector.scm
* test/unittest-bigloo.scm
* test/unittest-gauche.scm
- Replace (load "test/unittest.scm") with (require-extension (unittest))
* NEWS
- Update
Modified: sigscheme-trunk/NEWS
==============================================================================
--- sigscheme-trunk/NEWS (original)
+++ sigscheme-trunk/NEWS Sat Sep 1 00:47:44 2007
@@ -27,6 +27,10 @@
- New C interface functions scm_array2list() and scm_list2array()
+ - unittest.scm is now installed as a library. And some SRFI-64 compatible
+ assertions are added. It is a temporary solution and will be replaced with
+ full SRFI-64 implementation in future release
+
- %%require-module and scm_require_module(). 'use' and scm_use() have been
deprecated and will be removed in SigScheme 0.9.0
Modified: sigscheme-trunk/lib/Makefile.am
==============================================================================
--- sigscheme-trunk/lib/Makefile.am (original)
+++ sigscheme-trunk/lib/Makefile.am Sat Sep 1 00:47:44 2007
@@ -1,4 +1,4 @@
-dist_scmlib_DATA = sigscheme-init.scm
+dist_scmlib_DATA = sigscheme-init.scm unittest.scm
if USE_SRFI0
dist_scmlib_DATA += srfi-0.scm
endif
Modified: sigscheme-trunk/test/Makefile.am
==============================================================================
--- sigscheme-trunk/test/Makefile.am (original)
+++ sigscheme-trunk/test/Makefile.am Sat Sep 1 00:47:44 2007
@@ -1,5 +1,5 @@
# Libraries
-EXTRA_DIST = unittest.scm unittest-bigloo.scm unittest-gauche.scm \
+EXTRA_DIST = unittest-bigloo.scm unittest-gauche.scm \
run-singletest.sh.in
sscm_xfail_tests =
Modified: sigscheme-trunk/test/oleg-srfi2.scm
==============================================================================
--- sigscheme-trunk/test/oleg-srfi2.scm (original)
+++ sigscheme-trunk/test/oleg-srfi2.scm Sat Sep 1 00:47:44 2007
@@ -161,7 +161,7 @@
; echo '(module test (include "myenv-bigloo.scm") (include "srfi-12.scm")
; (include "vland.scm"))' | bigloo -i --
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 2))
Modified: sigscheme-trunk/test/panu-srfi69.scm
==============================================================================
--- sigscheme-trunk/test/panu-srfi69.scm (original)
+++ sigscheme-trunk/test/panu-srfi69.scm Sat Sep 1 00:47:44 2007
@@ -8,7 +8,7 @@
;;
http://members.sange.fi/~atehwa/vc/r+d/guse/srfi/test-hash.ss
;; and adapted to SigScheme
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 38 69))
Modified: sigscheme-trunk/test/scm-r4rstest.scm
==============================================================================
--- sigscheme-trunk/test/scm-r4rstest.scm (original)
+++ sigscheme-trunk/test/scm-r4rstest.scm Sat Sep 1 00:47:44 2007
@@ -61,7 +61,7 @@
;; - Enable (test-sc4) and (test-delay)
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define tn-section
Modified: sigscheme-trunk/test/stone-srfi1.scm
==============================================================================
--- sigscheme-trunk/test/stone-srfi1.scm (original)
+++ sigscheme-trunk/test/stone-srfi1.scm Sat Sep 1 00:47:44 2007
@@ -20,7 +20,7 @@
;; 2007-07-18 yamaken - Disable (make-list 5) ==> (#f #f #f #f #f)
(require-extension (srfi 1))
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
Modified: sigscheme-trunk/test/test-apply.scm
==============================================================================
--- sigscheme-trunk/test/test-apply.scm (original)
+++ sigscheme-trunk/test/test-apply.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-assoc.scm
==============================================================================
--- sigscheme-trunk/test/test-assoc.scm (original)
+++ sigscheme-trunk/test/test-assoc.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-begin.scm
==============================================================================
--- sigscheme-trunk/test/test-begin.scm (original)
+++ sigscheme-trunk/test/test-begin.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-bool.scm
==============================================================================
--- sigscheme-trunk/test/test-bool.scm (original)
+++ sigscheme-trunk/test/test-bool.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-char-cmp.scm
==============================================================================
--- sigscheme-trunk/test/test-char-cmp.scm (original)
+++ sigscheme-trunk/test/test-char-cmp.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'char=?))
(test-skip "R5RS characters is not enabled"))
Modified: sigscheme-trunk/test/test-char-pred.scm
==============================================================================
--- sigscheme-trunk/test/test-char-pred.scm (original)
+++ sigscheme-trunk/test/test-char-pred.scm Sat Sep 1 00:47:44 2007
@@ -32,7 +32,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'char-alphabetic?))
(test-skip "R5RS characters is not enabled"))
Modified: sigscheme-trunk/test/test-char.scm
==============================================================================
--- sigscheme-trunk/test/test-char.scm (original)
+++ sigscheme-trunk/test/test-char.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'char?))
(test-skip "R5RS characters is not enabled"))
Modified: sigscheme-trunk/test/test-continuation.scm
==============================================================================
--- sigscheme-trunk/test/test-continuation.scm (original)
+++ sigscheme-trunk/test/test-continuation.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'call-with-current-continuation))
(test-skip "R5RS continuation is not enabled"))
Modified: sigscheme-trunk/test/test-define-internal.scm
==============================================================================
--- sigscheme-trunk/test/test-define-internal.scm (original)
+++ sigscheme-trunk/test/test-define-internal.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; internal definitions in 'let' variants are writtin at test-let.scm
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (provided? "internal-definitions"))
(test-skip "R5RS internal definitions is not enabled"))
Modified: sigscheme-trunk/test/test-define.scm
==============================================================================
--- sigscheme-trunk/test/test-define.scm (original)
+++ sigscheme-trunk/test/test-define.scm Sat Sep 1 00:47:44 2007
@@ -35,7 +35,7 @@
;; internal definitions in 'let' variants are writtin at test-let.scm
;; see also test-begin.scm for top-level definitions
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define *test-track-progress* #f)
Modified: sigscheme-trunk/test/test-do.scm
==============================================================================
--- sigscheme-trunk/test/test-do.scm (original)
+++ sigscheme-trunk/test/test-do.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-dyn-extent.scm
==============================================================================
--- sigscheme-trunk/test/test-dyn-extent.scm (original)
+++ sigscheme-trunk/test/test-dyn-extent.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'dynamic-wind))
(test-skip "R5RS dynamic-wind is not enabled"))
Modified: sigscheme-trunk/test/test-enc-eucgeneric.scm
==============================================================================
--- sigscheme-trunk/test/test-enc-eucgeneric.scm (original)
+++ sigscheme-trunk/test/test-enc-eucgeneric.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (and (provided? "euc-jp")
(symbol-bound? 'char?)
Modified: sigscheme-trunk/test/test-enc-eucjp.scm
==============================================================================
--- sigscheme-trunk/test/test-enc-eucjp.scm (original)
+++ sigscheme-trunk/test/test-enc-eucjp.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (and (provided? "euc-jp")
(symbol-bound? 'char?)
Modified: sigscheme-trunk/test/test-enc-sjis.scm
==============================================================================
--- sigscheme-trunk/test/test-enc-sjis.scm (original)
+++ sigscheme-trunk/test/test-enc-sjis.scm Sat Sep 1 00:47:44 2007
@@ -35,7 +35,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (and (provided? "shift-jis")
(symbol-bound? 'char?)
Modified: sigscheme-trunk/test/test-enc-utf8.scm
==============================================================================
--- sigscheme-trunk/test/test-enc-utf8.scm (original)
+++ sigscheme-trunk/test/test-enc-utf8.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (and (provided? "utf-8")
(symbol-bound? 'char?)
Modified: sigscheme-trunk/test/test-eq.scm
==============================================================================
--- sigscheme-trunk/test/test-eq.scm (original)
+++ sigscheme-trunk/test/test-eq.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define case-insensitive-symbol? #f)
Modified: sigscheme-trunk/test/test-equal.scm
==============================================================================
--- sigscheme-trunk/test/test-equal.scm (original)
+++ sigscheme-trunk/test/test-equal.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define case-insensitive-symbol? #f)
Modified: sigscheme-trunk/test/test-eqv.scm
==============================================================================
--- sigscheme-trunk/test/test-eqv.scm (original)
+++ sigscheme-trunk/test/test-eqv.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define case-insensitive-symbol? #f)
Modified: sigscheme-trunk/test/test-eval.scm
==============================================================================
--- sigscheme-trunk/test/test-eval.scm (original)
+++ sigscheme-trunk/test/test-eval.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-formal-syntax.scm
==============================================================================
--- sigscheme-trunk/test/test-formal-syntax.scm (original)
+++ sigscheme-trunk/test/test-formal-syntax.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define *test-track-progress* #f)
Modified: sigscheme-trunk/test/test-formatplus.scm
==============================================================================
--- sigscheme-trunk/test/test-formatplus.scm (original)
+++ sigscheme-trunk/test/test-formatplus.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; All tests in this file are passed against r3170 (new repository)
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 48))
Modified: sigscheme-trunk/test/test-lambda.scm
==============================================================================
--- sigscheme-trunk/test/test-lambda.scm (original)
+++ sigscheme-trunk/test/test-lambda.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-let.scm
==============================================================================
--- sigscheme-trunk/test/test-let.scm (original)
+++ sigscheme-trunk/test/test-let.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-letrec.scm
==============================================================================
--- sigscheme-trunk/test/test-letrec.scm (original)
+++ sigscheme-trunk/test/test-letrec.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-letstar.scm
==============================================================================
--- sigscheme-trunk/test/test-letstar.scm (original)
+++ sigscheme-trunk/test/test-letstar.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-list.scm
==============================================================================
--- sigscheme-trunk/test/test-list.scm (original)
+++ sigscheme-trunk/test/test-list.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-map.scm
==============================================================================
--- sigscheme-trunk/test/test-map.scm (original)
+++ sigscheme-trunk/test/test-map.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-member.scm
==============================================================================
--- sigscheme-trunk/test/test-member.scm (original)
+++ sigscheme-trunk/test/test-member.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-misc.scm
==============================================================================
--- sigscheme-trunk/test/test-misc.scm (original)
+++ sigscheme-trunk/test/test-misc.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-named-let.scm
==============================================================================
--- sigscheme-trunk/test/test-named-let.scm (original)
+++ sigscheme-trunk/test/test-named-let.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-number-arith.scm
==============================================================================
--- sigscheme-trunk/test/test-number-arith.scm (original)
+++ sigscheme-trunk/test/test-number-arith.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'number?))
(test-skip "R5RS numbers is not enabled"))
Modified: sigscheme-trunk/test/test-number-cmp.scm
==============================================================================
--- sigscheme-trunk/test/test-number-cmp.scm (original)
+++ sigscheme-trunk/test/test-number-cmp.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'number?))
(test-skip "R5RS numbers is not enabled"))
Modified: sigscheme-trunk/test/test-number-io.scm
==============================================================================
--- sigscheme-trunk/test/test-number-io.scm (original)
+++ sigscheme-trunk/test/test-number-io.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-number-literal.scm
==============================================================================
--- sigscheme-trunk/test/test-number-literal.scm (original)
+++ sigscheme-trunk/test/test-number-literal.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'number?))
(test-skip "R5RS numbers is not enabled"))
Modified: sigscheme-trunk/test/test-number-pred.scm
==============================================================================
--- sigscheme-trunk/test/test-number-pred.scm (original)
+++ sigscheme-trunk/test/test-number-pred.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'number?))
(test-skip "R5RS numbers is not enabled"))
Modified: sigscheme-trunk/test/test-obsolete.scm
==============================================================================
--- sigscheme-trunk/test/test-obsolete.scm (original)
+++ sigscheme-trunk/test/test-obsolete.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-pair.scm
==============================================================================
--- sigscheme-trunk/test/test-pair.scm (original)
+++ sigscheme-trunk/test/test-pair.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
(define *test-track-progress* #f)
Modified: sigscheme-trunk/test/test-promise.scm
==============================================================================
--- sigscheme-trunk/test/test-promise.scm (original)
+++ sigscheme-trunk/test/test-promise.scm Sat Sep 1 00:47:44 2007
@@ -30,7 +30,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'force))
(test-skip "R5RS promise is not enabled"))
Modified: sigscheme-trunk/test/test-quote.scm
==============================================================================
--- sigscheme-trunk/test/test-quote.scm (original)
+++ sigscheme-trunk/test/test-quote.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'quasiquote))
(test-skip "R5RS quasiquote is not enabled"))
Modified: sigscheme-trunk/test/test-srfi1-another.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi1-another.scm (original)
+++ sigscheme-trunk/test/test-srfi1-another.scm Sat Sep 1 00:47:44 2007
@@ -32,7 +32,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 1 6 23 38))
Modified: sigscheme-trunk/test/test-srfi1-obsolete.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi1-obsolete.scm (original)
+++ sigscheme-trunk/test/test-srfi1-obsolete.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 1 8))
Modified: sigscheme-trunk/test/test-srfi2.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi2.scm (original)
+++ sigscheme-trunk/test/test-srfi2.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; See also oleg-srfi2.scm
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 2))
Modified: sigscheme-trunk/test/test-srfi28.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi28.scm (original)
+++ sigscheme-trunk/test/test-srfi28.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; All tests in this file are passed against r3166 (new repository)
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 28))
Modified: sigscheme-trunk/test/test-srfi34-2.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi34-2.scm (original)
+++ sigscheme-trunk/test/test-srfi34-2.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 34))
Modified: sigscheme-trunk/test/test-srfi34.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi34.scm (original)
+++ sigscheme-trunk/test/test-srfi34.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 8 34))
Modified: sigscheme-trunk/test/test-srfi38.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi38.scm (original)
+++ sigscheme-trunk/test/test-srfi38.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 6 38))
Modified: sigscheme-trunk/test/test-srfi48.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi48.scm (original)
+++ sigscheme-trunk/test/test-srfi48.scm Sat Sep 1 00:47:44 2007
@@ -35,7 +35,7 @@
;; All tests in this file are passed against r3170 (new repository)
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 6 38 48))
Modified: sigscheme-trunk/test/test-srfi55.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi55.scm (original)
+++ sigscheme-trunk/test/test-srfi55.scm Sat Sep 1 00:47:44 2007
@@ -30,7 +30,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
;; SRFI-55 is enabled by default if exists.
(if (not (provided? "srfi-55"))
Modified: sigscheme-trunk/test/test-srfi6.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi6.scm (original)
+++ sigscheme-trunk/test/test-srfi6.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 6))
Modified: sigscheme-trunk/test/test-srfi60.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi60.scm (original)
+++ sigscheme-trunk/test/test-srfi60.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 60))
Modified: sigscheme-trunk/test/test-srfi8.scm
==============================================================================
--- sigscheme-trunk/test/test-srfi8.scm (original)
+++ sigscheme-trunk/test/test-srfi8.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 8))
Modified: sigscheme-trunk/test/test-sscm-ext.scm
==============================================================================
--- sigscheme-trunk/test/test-sscm-ext.scm (original)
+++ sigscheme-trunk/test/test-sscm-ext.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
(require-extension (sscm-ext))
-(load "test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'let-optionals*))
(test-skip "SigScheme extensions are not enabled"))
Modified: sigscheme-trunk/test/test-string-cmp.scm
==============================================================================
--- sigscheme-trunk/test/test-string-cmp.scm (original)
+++ sigscheme-trunk/test/test-string-cmp.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'string<?))
(test-skip "R5RS string procedures are not enabled"))
Modified: sigscheme-trunk/test/test-string-core.scm
==============================================================================
--- sigscheme-trunk/test/test-string-core.scm (original)
+++ sigscheme-trunk/test/test-string-core.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'string?))
(test-skip "R5RS core string procedures are not enabled"))
Modified: sigscheme-trunk/test/test-string-null.scm
==============================================================================
Binary files
/export/hdc3/borgletdata/dirs/4.worktable2.workers.default.codesite.2493123759/logs.4.worktable2.workers.default.codesite.2493123759/tmp/tmpQcsbrn
and
/export/hdc3/borgletdata/dirs/4.worktable2.workers.default.codesite.2493123759/logs.4.worktable2.workers.default.codesite.2493123759/tmp/tmpfjjzzn
differ
Modified: sigscheme-trunk/test/test-string-proc.scm
==============================================================================
--- sigscheme-trunk/test/test-string-proc.scm (original)
+++ sigscheme-trunk/test/test-string-proc.scm Sat Sep 1 00:47:44 2007
@@ -34,7 +34,7 @@
(require-extension (sscm-ext))
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (and sigscheme?
(not (symbol-bound? 'make-string)))
Modified: sigscheme-trunk/test/test-string.scm
==============================================================================
--- sigscheme-trunk/test/test-string.scm (original)
+++ sigscheme-trunk/test/test-string.scm Sat Sep 1 00:47:44 2007
@@ -33,7 +33,7 @@
;; See also test-string-{core,null,pred,proc}.scm
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'string?))
(test-skip "R5RS strings is not enabled"))
Modified: sigscheme-trunk/test/test-symbol.scm
==============================================================================
--- sigscheme-trunk/test/test-symbol.scm (original)
+++ sigscheme-trunk/test/test-symbol.scm Sat Sep 1 00:47:44 2007
@@ -37,7 +37,7 @@
;; See also test-syntax.scm for valid identifiers based on "7.1 Formal syntax"
;; of R5RS.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-syntax-rules.scm
==============================================================================
--- sigscheme-trunk/test/test-syntax-rules.scm (original)
+++ sigscheme-trunk/test/test-syntax-rules.scm Sat Sep 1 00:47:44 2007
@@ -30,7 +30,7 @@
;; LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'syntax-rules))
(test-skip "R5RS hygienic macros is not enabled"))
Modified: sigscheme-trunk/test/test-syntax.scm
==============================================================================
--- sigscheme-trunk/test/test-syntax.scm (original)
+++ sigscheme-trunk/test/test-syntax.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define *test-track-progress* #f)
(define tn test-name)
Modified: sigscheme-trunk/test/test-tail-rec.scm
==============================================================================
--- sigscheme-trunk/test/test-tail-rec.scm (original)
+++ sigscheme-trunk/test/test-tail-rec.scm Sat Sep 1 00:47:44 2007
@@ -47,7 +47,7 @@
(require-extension (srfi 8 23 34))
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define test-eval? #f)
(define test-and? #t) ;; #t is required to conform to R5RS
Modified: sigscheme-trunk/test/test-unittest.scm
==============================================================================
--- sigscheme-trunk/test/test-unittest.scm (original)
+++ sigscheme-trunk/test/test-unittest.scm Sat Sep 1 00:47:44 2007
@@ -30,7 +30,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "./test/unittest.scm")
+(require-extension (unittest))
(require-extension (srfi 23))
Modified: sigscheme-trunk/test/test-values.scm
==============================================================================
--- sigscheme-trunk/test/test-values.scm (original)
+++ sigscheme-trunk/test/test-values.scm Sat Sep 1 00:47:44 2007
@@ -31,7 +31,7 @@
;; NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
;; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
-(load "test/unittest.scm")
+(require-extension (unittest))
(define tn test-name)
Modified: sigscheme-trunk/test/test-vector.scm
==============================================================================
--- sigscheme-trunk/test/test-vector.scm (original)
+++ sigscheme-trunk/test/test-vector.scm Sat Sep 1 00:47:44 2007
@@ -35,7 +35,7 @@
(require-extension (sscm-ext))
-(load "./test/unittest.scm")
+(require-extension (unittest))
(if (not (symbol-bound? 'vector?))
(test-skip "R5RS vectors is not enabled"))
Modified: sigscheme-trunk/test/unittest-bigloo.scm
==============================================================================
--- sigscheme-trunk/test/unittest-bigloo.scm (original)
+++ sigscheme-trunk/test/unittest-bigloo.scm Sat Sep 1 00:47:44 2007
@@ -1,4 +1,4 @@
-(load "./test/unittest.scm")
+(require-extension (unittest))
;*---------------------------------------------------------------------*/
;* For Bigloo Test */
Modified: sigscheme-trunk/test/unittest-gauche.scm
==============================================================================
--- sigscheme-trunk/test/unittest-gauche.scm (original)
+++ sigscheme-trunk/test/unittest-gauche.scm Sat Sep 1 00:47:44 2007
@@ -1,4 +1,4 @@
-(load "./test/unittest.scm")
+(require-extension (unittest))
(define test
(lambda (msg ret func)
