Class ClockImpl

packages/effect/src/internal/effect.ts:5992–6019

const MAX_TIMER_MILLIS = 2 ** 31 - 1

class ClockImpl implements Clock.Clock {
  currentTimeMillisUnsafe(): number {
    return Date.now()
  }
  readonly currentTimeMillis: Effect.Effect<number> = sync(() => this.currentTimeMillisUnsafe())
  currentTimeNanosUnsafe(): bigint {
    return wallTimeNanos()
  }
  readonly currentTimeNanos: Effect.Effect<bigint> = sync(() => this.currentTimeNanosUnsafe())
  monotonicTimeNanosUnsafe(): bigint {
    return monotonicNowNanos()
  }
  readonly monotonicTimeNanos: Effect.Effect<bigint> = sync(() => this.monotonicTimeNanosUnsafe())
  sleep(duration: Duration.Duration): Effect.Effect<void> {
    return this.sleepMillis(Duration.toMillis(duration))
  }
  private sleepMillis(millis: number): Effect.Effect<void> {
    if (millis <= 0) return yieldNow
    else if (!Number.isFinite(millis)) return never
    return callback((resume) => {
      const continuation = millis > MAX_TIMER_MILLIS
        ? this.sleepMillis(millis - MAX_TIMER_MILLIS)
        : void_
      const handle = setTimeout(() => resume(continuation), Math.min(millis, MAX_TIMER_MILLIS))
      return sync(() => clearTimeout(handle))
    })
  }
}

const nanosPerMilli = BigInt(1_000_000)