Skip to content
Snippets Groups Projects
Commit 1c6fecf5 authored by Francois-Rene Rideau's avatar Francois-Rene Rideau
Browse files

Tweak tests.

Thanks to Dave Cooper for fix to run-tests.sh instructions on reproducing tests.
parent c3fea43f
No related branches found
No related tags found
No related merge requests found
...@@ -120,7 +120,7 @@ do_tests () { ...@@ -120,7 +120,7 @@ do_tests () {
echo "or more interactively (and maybe with rlwrap or in emacs), start with:" >&2 echo "or more interactively (and maybe with rlwrap or in emacs), start with:" >&2
echo "(cd test ; $icmd )" >&2 echo "(cd test ; $icmd )" >&2
echo "then copy/paste:" >&2 echo "then copy/paste:" >&2
echo "'(#.(load \"script-support.lisp\") #.(asdf-test::da) #.(load-asdf) #.(frob-packages) #.(load \"$i\"))" >&2 echo "'(#.(load \"script-support.lisp\") #.(asdf-test::da) #.(load-asdf) #.(frob-packages) #.(asdf::with-asdf-cache () (load \"$i\")))" >&2
fi fi
echo >&2 echo >&2
echo >&2 echo >&2
......
...@@ -15,7 +15,7 @@ ...@@ -15,7 +15,7 @@
(touch-file "file1.lisp" :timestamp date1) (touch-file "file1.lisp" :timestamp date1)
(touch-file file1 :timestamp date2) (touch-file file1 :timestamp date2)
(load-system 'test-force) (load-system 'test-force)
(assert (equal (get-file-stamp file1) date2)) (assert-equal (get-file-stamp file1) date2)
;; forced, it should be later ;; forced, it should be later
(load-system 'test-force :force t) (load-system 'test-force :force t)
......
...@@ -16,8 +16,8 @@ ...@@ -16,8 +16,8 @@
(DBG :logical (DBG :logical
(logical-pathname-translations "ASDF") (logical-pathname-translations "ASDF")
(translate-logical-pathname "ASDF:test;test-force.asd") (translate-logical-pathname "ASDF:test;test-logical-pathname.asd")
(truename "ASDF:test;test-force.asd")) (truename "ASDF:test;test-logical-pathname.asd"))
#+xcl (leave-test "GCL 2.6 doesn't do Logical pathnames well enough" 0) #+xcl (leave-test "GCL 2.6 doesn't do Logical pathnames well enough" 0)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment