Commit 05a0280f authored by Robert Goldman's avatar Robert Goldman
Browse files

Make touch test more tolerant of clock issues.

Use offset to ensure that touch changes the timestamp in a predictable
way.
parent 64862fff
Loading
Loading
Loading
Loading
+1 −1
Original line number Diff line number Diff line
@@ -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))