2025-11-11 02:07:51 +01:00 · 2025-11-11 02:07:51 +01:00 · 2f3113f55d
commit 2f3113f55d
parent aa2ff7b2f0
11742 changed files with 1223940 additions and 0 deletions
--- a/unikernel/duniverse/mirage-ptime/mock/mirage_ptime_set.ml
+++ b/unikernel/duniverse/mirage-ptime/mock/mirage_ptime_set.ml
@ -0,0 +1,6 @@
+let now = ref (0, 0L)
+let tz_off : int option ref = ref None
+let period : (int * int64) option ref = ref None
+let set (days, picos) = now := (days, picos)
+let set_tz_offset v = tz_off := v
+let set_period p = period := p