mirage_mtime_set.ml
mirage-mtime.mock
mirage-mtime.set
mirage-mtime.solo5
mirage-mtime.unix
1 2 3 let now = ref 0L let tick () = now := Int64.add !now 1L let tick_for v = now := Int64.add !now v
1 2 3
let now = ref 0L let tick () = now := Int64.add !now 1L let tick_for v = now := Int64.add !now v