Source file `constants.ml`

1
2
3
4
5
6
7
8
9
10
11
12
13
14
include Time_zone_constants
open Int64_utils

let timestamp_min : Span.t =
  let x = Ptime.min |> Ptime_utils.timestamp_of_ptime in
  Span.make ~s:(x +^ Int64.of_int greatest_neg_tz_offset_s) ()

let timestamp_max : Span.t =
  let x = Ptime.max |> Ptime_utils.timestamp_of_ptime |> Int64.pred in
  Span.make ~s:(x -^ Int64.of_int greatest_pos_tz_offset_s) ()

let min_year = 0

let max_year = 9999