X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=clnl;a=blobdiff_plain;f=bin%2Fdiagnose-view-test;h=989445753d7c6b41e8095adfeb4eb37c1739fa91;hp=efa99f34837620b31fb1333fa01a816a7e72f8d3;hb=7fac438c77bb0e3749bababc0cc89a1366893444;hpb=89cb3482de1fefc2d8e5f67e1e04a0790e8cd243

diff --git a/bin/diagnose-view-test b/bin/diagnose-view-test
index efa99f3..9894457 100755
--- a/bin/diagnose-view-test
+++ b/bin/diagnose-view-test
@@ -6,12 +6,13 @@ if ! [ -n "$1" ] ; then
 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
@@ -28,7 +29,7 @@ checksum=$(runtestfn "test-debug")
 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