fi
TEST=$@
-sbcl --eval "(asdf:load-system :clnl-test)" --eval "(quit)" &> /dev/null
+sbcl --eval "(asdf:load-system :clnl)" --eval "(asdf:load-system :clnl-test)" --eval "(quit)" &> /dev/null
runtestfn() {
sbcl \
--noinform --disable-ldb --lose-on-corruption --end-runtime-options \
- --eval "(asdf:initialize-source-registry \`(:source-registry (:tree ,(car (directory \"src\"))) :INHERIT-CONFIGURATION))" \
+ --eval "(asdf:initialize-source-registry \`(:source-registry (:tree ,(car (directory \".\"))) :INHERIT-CONFIGURATION))" \
+ --eval "(asdf:load-system :clnl)" \
--eval "(asdf:load-system :clnl-test)" \
--eval "(clnl-test::$1 \"$TEST\")" \
--eval "(quit)" 2> /dev/null | sed -n '/^----$/,$p' | tail -n +2
mv cl.ppm $clfile
echo
-echo "If the images are equal, use $checksum for CL checksum (note that you may get a different checksum on travis, see as of yet unwritten documentation for details)"
+echo "If the images are equal, use $checksum for CL checksum (note that you may get a different checksum on CI, see as of yet unwritten documentation for details)"
echo "The compare result is (Less than 1500 is probably equivalent):"
compare -metric RMSE $clfile $scalafile NULL:
echo