13136d4b4761

Run the tests on CCL too

Everything already Just Works on CCL, so we may as well support
a second implementation.
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Thu, 30 Jun 2016 17:52:53 +0000
parents 05ce726f2874
children 4520c6449f48
branches/tags (none)
files Makefile test/run.lisp

Changes

--- a/Makefile	Wed Jun 29 16:49:25 2016 +0000
+++ b/Makefile	Thu Jun 30 17:52:53 2016 +0000
@@ -5,7 +5,11 @@
 apidoc = docs/03-reference.markdown
 
 test:
-	sbcl-rlwrap --noinform --load test/run.lisp  --eval '(quit)'
+	figlet -kf big 'SBCL'
+	ros run -L sbcl --load test/run.lisp
+
+	figlet -kf big 'CCL'
+	ros run -L ccl-bin --load test/run.lisp
 
 src/quickutils.lisp: src/make-quickutils.lisp
 	cd src && sbcl-rlwrap --noinform --load make-quickutils.lisp  --eval '(quit)'
--- a/test/run.lisp	Wed Jun 29 16:49:25 2016 +0000
+++ b/test/run.lisp	Thu Jun 30 17:52:53 2016 +0000
@@ -15,4 +15,6 @@
 (test :bones.wam)
 (test :bones.circle)
 
-(sb-ext:exit :code (if *passed* 0 1))
+(let ((exit-code (if *passed* 0 1)))
+  #+sbcl (sb-ext:exit :code exit-code)
+  #+ccl (quit exit-code))