X-Git-Url: https://git.distorted.org.uk/~mdw/runlisp/blobdiff_plain/05a9f820c6355e27bca8a87cd6a235bedcb872de..47af3df3850a1a17ee706b278868309d40bacd55:/tests.at

diff --git a/tests.at b/tests.at
index 73b13ae..c6c1987 100644
--- a/tests.at
+++ b/tests.at
@@ -234,12 +234,14 @@ AT_CHECK([RUNLISP_PATH \
 		(defvar runlisp-test:bar "stoat!")' \
 	    -d runlisp-test:foo \
 	    -d runlisp-test:bar \
+	    -p runlisp-test:bar \
 	    -e '(incf runlisp-test:foo)' \
 	    -l script.lisp \
 	    -d runlisp-test:foo \
 	    -- -e one two three],,
 [1
 "stoat!"
+stoat!
 And we're running the script...
 Command-line arguments: ("-e" "one" "two" "three")
 Symbols in package `COMMON-LISP-USER': ()