ca108d2f3b79

Clean up test running to expunge Roswell
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Thu, 02 Nov 2017 22:32:50 -0400
parents b006652f8a18
children 53d4a4db967f
branches/tags (none)
files Makefile test/run.lisp test/tests.lisp

Changes

--- a/Makefile	Fri Jun 23 13:46:43 2017 +0000
+++ b/Makefile	Thu Nov 02 22:32:50 2017 -0400
@@ -3,6 +3,7 @@
 sourcefiles = $(shell ffind --full-path --literal .lisp)
 docfiles = $(shell ls docs/*.markdown)
 apidocs = $(shell ls docs/*reference*.markdown)
+heading_printer = $(shell which heading || echo 'true')
 
 # Vendor ----------------------------------------------------------------------
 vendor/quickutils.lisp: vendor/make-quickutils.lisp
@@ -13,20 +14,20 @@
 # Testing ---------------------------------------------------------------------
 test: test-sbcl test-ccl test-ecl test-abcl
 
-test-sbcl:
-	echo; figlet -kf computer 'SBCL' | sed -Ee 's/ +$$//' | tr -s '\n' | lolcat --freq=0.25; echo
-	ros run -L sbcl --load test/run.lisp
+test-sbcl: vendor
+	$(heading_printer) computer 'SBCL'
+	sbcl --load test/run.lisp
 
-test-ccl:
-	echo; figlet -kf slant 'CCL' | sed -Ee 's/ +$$//' | tr -s '\n' | lolcat --freq=0.25; echo
-	ros run -L ccl-bin --load test/run.lisp
+test-ccl: vendor
+	$(heading_printer) slant 'CCL'
+	ccl --load test/run.lisp
 
-test-ecl:
-	echo; figlet -kf roman 'ECL' | sed -Ee 's/ +$$//' | tr -s '\n' | lolcat --freq=0.25; echo
-	ros run -L ecl --load test/run.lisp
+test-ecl: vendor
+	$(heading_printer) roman 'ECL'
+	ecl --load test/run.lisp
 
-test-abcl:
-	echo; figlet -kf broadway 'ABCL' | sed -Ee 's/ +$$//' | tr -s '\n' | lolcat --freq=0.25; echo
+test-abcl: vendor
+	$(heading_printer) broadway 'ABCL'
 	abcl --load test/run.lisp
 
 # Documentation ---------------------------------------------------------------
--- a/test/run.lisp	Fri Jun 23 13:46:43 2017 +0000
+++ b/test/run.lisp	Thu Nov 02 22:32:50 2017 -0400
@@ -1,4 +1,4 @@
-#+ecl (setf compiler:*user-cc-flags* "-Wno-shift-negative-value")
+#+ecl (setf compiler::*user-cc-flags* "-Wno-shift-negative-value")
 
 (ql:quickload 'chancery)
 (time (asdf:test-system 'chancery))
--- a/test/tests.lisp	Fri Jun 23 13:46:43 2017 +0000
+++ b/test/tests.lisp	Thu Nov 02 22:32:50 2017 -0400
@@ -72,4 +72,4 @@
   (is (eql (sample-rule) :foo))
   (is (string= (sample-string) "Hello FOO")))
 
-;; (run-tests)
+(run-tests)