Megatest

justtest.scm at [d0fcd353e1]
Login

File testlocking/justtest.scm artifact 59ddbd6a63 part of check-in d0fcd353e1


(print "Starting at "(current-seconds))

(dbfile:with-simple-file-lock "justtesting.lock" 
			      (lambda ()
				(print "got the lock at "(current-seconds)"!")))

(print "Done at: " (current-seconds))
(exit)