aboutsummaryrefslogtreecommitdiff
path: root/lib/models/snowflake.ml
diff options
context:
space:
mode:
Diffstat (limited to 'lib/models/snowflake.ml')
-rw-r--r--lib/models/snowflake.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/models/snowflake.ml b/lib/models/snowflake.ml
index 2bf2281..92c692c 100644
--- a/lib/models/snowflake.ml
+++ b/lib/models/snowflake.ml
@@ -8,7 +8,7 @@ let of_yojson d =
try Ok (of_yojson_exn d)
with Yojson.Safe.Util.Type_error (why,_) -> Error why
-let to_yojson s : Yojson.Safe.t = `String (Int.to_string s)
+let to_yojson s : Yojson.Safe.json = `String (Int.to_string s)
let timestamp snowflake = (snowflake lsr 22) + 1_420_070_400_000