Support modular smoke & cleanup.
test.lisp
Sun Jan 10 09:49:36 CET 2010 Tobias Rautenkranz <tobias@rautenkranz.ch>
* Support modular smoke & cleanup.
--- old-smoke/test.lisp 2014-10-30 08:09:37.000000000 +0100
+++ new-smoke/test.lisp 2014-10-30 08:09:37.000000000 +0100
@@ -8,7 +8,7 @@
"###############
## Testing sbcl image
################"
-sh ./test-bundle.sh || exit 2
+ sh ./test-bundle.sh || exit 2
echo \
"###############
## Testing ccl
@@ -18,8 +18,9 @@
# Used for testing on darcs record.
|#
-(asdf:operate 'asdf:load-op :smoke)
-(asdf:operate 'asdf:test-op :smoke)
+(require :asdf)
+(asdf:operate 'asdf:load-op :cl-smoke.smoke)
+(asdf:operate 'asdf:test-op :cl-smoke.smoke)
#+sbcl (sb-ext:quit)
#+ccl (ccl:quit)