Commit cf599ede authored by Dave Cooper's avatar Dave Cooper Committed by Francois-Rene Rideau
Browse files

add sleep time to be sure about file timestamps esp. for Windows

parent 46f7a2e5
......@@ -143,14 +143,16 @@
(clear-fasls defsystem)
(DBG "loading system")
(reload defsystem)
(sleep 2) ;; TODO: on ASDF at least, instead touch the file stamp with the cache.
#-os-windows (sleep 3) ;; TODO: on ASDF at least, instead touch the file stamp with the cache.
#+os-windows (sleep 5) ;; TODO: on ASDF at least, instead touch the file stamp with the cache.
(DBG "touching first source file and reloading")
(DBG "defsystem should recompile & reload everything")
(touch-file1.lisp)
(assert-equal (sanitize-log (reload defsystem))
'((:compiling :system) (:compile-toplevel :file1) (:load-toplevel :file1)
(:compile-toplevel :file2) (:load-toplevel :file2)))
(sleep 2)
#-os-windows (sleep 3)
#+os-windows (sleep 5)
(DBG "touching first fasl file and reloading")
(DBG "defsystem should reload it, recompile & reload the other")
(touch-file1.fasl defsystem)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment