[armedbear-cvs] r13940 - in trunk/abcl: contrib/jss test/lisp/abcl
mevenson at common-lisp.net
mevenson at common-lisp.net
Wed May 23 13:01:05 UTC 2012
Author: mevenson
Date: Wed May 23 06:01:04 2012
New Revision: 13940
Log:
Move JSS specific test under contrib.
Invocations of the ABCL test suite as used for bisection with
'--noinit --batch' fail to find abcl-contrib properly, so move the one
contrib specific test for now.
Added:
trunk/abcl/contrib/jss/tests.lisp
Modified:
trunk/abcl/test/lisp/abcl/bugs.lisp
Added: trunk/abcl/contrib/jss/tests.lisp
==============================================================================
--- /dev/null 00:00:00 1970 (empty, because file is newly added)
+++ trunk/abcl/contrib/jss/tests.lisp Wed May 23 06:01:04 2012 (r13940)
@@ -0,0 +1,15 @@
+(require :abcl)
+(require :abcl-test-lisp)
+(require :abcl-contrib)
+(require :jss)
+
+(in-package :abcl-test-lisp)
+
+;;; http://trac.common-lisp.net/armedbear/ticket/205
+(deftest jss.with-constant-signature.1
+ (progn
+ (jss:with-constant-signature ((substring "substring"))
+ (substring "01234" 2)))
+ "234")
+
+
Modified: trunk/abcl/test/lisp/abcl/bugs.lisp
==============================================================================
--- trunk/abcl/test/lisp/abcl/bugs.lisp Tue May 22 06:39:13 2012 (r13939)
+++ trunk/abcl/test/lisp/abcl/bugs.lisp Wed May 23 06:01:04 2012 (r13940)
@@ -104,16 +104,6 @@
(string= result docstring))
t)
-;;; http://trac.common-lisp.net/armedbear/ticket/205
-(deftest bugs.with-constant-signature.1
- (progn
- (require :abcl-contrib)
- (require :jss)
- (jss:with-constant-signature ((substring "substring"))
- (substring "01234" 2)))
- "234")
-
-
;;; http://trac.common-lisp.net/armedbear/ticket/199
(deftest bugs.clos.aux.1
((lambda (a &aux (b (+ a 1)))
More information about the armedbear-cvs
mailing list