diff --git a/test/test.lisp b/test/test.lisp
index d5e0007..217a6e4 100644
--- a/test/test.lisp
+++ b/test/test.lisp
@@ -3,6 +3,7 @@
 
 (let ((score (flx:score "buffer-file-name" "bfn")))
   (print score)
+  (terpri)
   (unless (equal score '(237 0 7 12))
-    (print "Error testing `buffer-file-name`")
+    (print (format nil "Error testing `buffer-file-name`: ~a" score))
     (quit :unix-status 1)))