Loading test/test-touch-system-1.script +1 −1 Original line number Diff line number Diff line Loading @@ -30,7 +30,7 @@ (sleep 1) (clear-system :test1) (touch-file test1.asd) (touch-file test1.asd :offset 600) (find-system :test1) (defparameter date6 (system-registered-time :test1)) (assert-compare (> date6 date4)) Loading
test/test-touch-system-1.script +1 −1 Original line number Diff line number Diff line Loading @@ -30,7 +30,7 @@ (sleep 1) (clear-system :test1) (touch-file test1.asd) (touch-file test1.asd :offset 600) (find-system :test1) (defparameter date6 (system-registered-time :test1)) (assert-compare (> date6 date4))