Last change
on this file since 12301 was
12301,
checked in by Mark Evenson, 14 years ago
|
Loading ABCL tests improved; renamed loading jar-file tests.
ASDF loading of ABCL-TEST-LISP improved to not need :FORCE argument.
JAR-FILE tests included as part of ABCL-TEST-LISP.
|
-
Property svn:eol-style set to
native
|
File size:
737 bytes
|
Line | |
---|
1 | (defpackage #:abcl.test.lisp |
---|
2 | (:use #:cl #:abcl-rt) |
---|
3 | (:nicknames "ABCL-TEST") |
---|
4 | (:export #:run)) |
---|
5 | (in-package #:abcl.test.lisp) |
---|
6 | |
---|
7 | (defvar *abcl-lisp-test-directory* |
---|
8 | (pathname (directory-namestring *load-truename*)) |
---|
9 | "The directory in which the ABCL test source files are located.") |
---|
10 | |
---|
11 | (defun run () |
---|
12 | "Run the Lisp test suite for ABCL." |
---|
13 | |
---|
14 | (let ((*default-pathname-defaults* *abcl-lisp-test-directory*)) |
---|
15 | (rem-all-tests) |
---|
16 | |
---|
17 | (load "test-utilities.lisp") |
---|
18 | |
---|
19 | (load "compiler-tests.lisp") |
---|
20 | (load "condition-tests.lisp") |
---|
21 | (load "file-system-tests.lisp") |
---|
22 | (load "java-tests.lisp") |
---|
23 | (load "math-tests.lisp") |
---|
24 | (load "misc-tests.lisp") |
---|
25 | |
---|
26 | (when (find :unix *features*) |
---|
27 | (load "jar-file.lisp")) |
---|
28 | |
---|
29 | (do-tests))) |
---|
30 | |
---|
31 | |
---|
Note: See
TracBrowser
for help on using the repository browser.