+var monotonic_clock chan chan time.Time
+
+const minimum_clock_increment = time.Millisecond
+
+func start_clock() {
+ internal_monotonic_clock := make(chan chan time.Time, 1)
+ go func() {
+ last_time := time.Now()
+ main:
+ for {
+ select {
+ case request, ok := <-internal_monotonic_clock:
+ if !ok {
+ break main
+ }
+ earliest_acceptable_time := last_time.Add(minimum_clock_increment)
+ current_time := time.Now()
+ if current_time.Before(earliest_acceptable_time) {
+ current_time = earliest_acceptable_time
+ }
+ request <- current_time
+ last_time = current_time
+ }
+ }
+ }()
+ monotonic_clock = internal_monotonic_clock
+}
+
+func now() time.Time {
+ c := make(chan time.Time, 0)
+ monotonic_clock <- c
+ return <-c
+}