Changeset 13607

Timestamp:

09/30/11 14:17:55 (10 years ago)

Author:

Mark Evenson

Message:

Fixes for tests under SBCL.

Include the non-ABCL specific tests in bugs.lisp.

Allow SBCL to recompile the ABCL-TEST-LISP system by moving the
exporting of symbols into the DEFPACAKGE form.

Location:

trunk/abcl

Files:

• abcl.asd (modified) (1 diff)
• test/lisp/abcl/bugs.lisp (modified) (3 diffs)
• test/lisp/abcl/file-system-tests.lisp (modified) (1 diff)
• test/lisp/abcl/package.lisp (modified) (2 diffs)

trunk/abcl/abcl.asd

@@ -51 +51 @@
                       (:file "misc-tests")
                       (:file "latin1-tests")
-                      #+abcl
                       (:file "bugs" :depends-on 
                              ("file-system-tests"))

trunk/abcl/test/lisp/abcl/bugs.lisp

@@ -59 +59 @@
   "**/")
 
+#+abcl
 (deftest bugs.java.1
     (let* ((a (java:jnew-array "byte" 1))
@@ -71 +72 @@
   stream)
                 
-                    
 
 (deftest bugs.readtable-case.1 
@@ -93 +93 @@
       result)
   "---(1 2 3 4)")
+
+      

trunk/abcl/test/lisp/abcl/file-system-tests.lisp

@@ -21 +21 @@
 
 (in-package #:abcl.test.lisp)
-
-(export '(pathnames-equal-p run-shell-command copy-file make-symbolic-link
-          touch make-temporary-directory delete-directory-and-files))
 
 (defparameter *this-file*

trunk/abcl/test/lisp/abcl/package.lisp

@@ -1 @@
-(defpackage #:abcl.test.lisp 
+(defpackage #:abcl.test.lisp
   (:use #:cl #:abcl-rt)
   (:nicknames "ABCL-TEST-LISP" "ABCL-TEST")
@@ -6 +6 @@
    #:do-matching #:run-matching
    #:do-test 
-   #:do-tests))
+   #:do-tests
+   ;; previously in file-system-tests.lisp
+   #:pathnames-equal-p #:run-shell-command #:copy-file #:make-symbolic-link
+   #:touch #:make-temporary-directory #:delete-directory-and-files
+   ))
 (in-package #:abcl.test.lisp)