646b892680
Some checks failed
Periodic Merges (6h) / master → staging-nixos (push) Failing after 12m50s
Periodic Merges (6h) / master → staging-next (push) Failing after 12m54s
Periodic Merges (24h) / merge-base(master,staging) → haskell-updates (push) Failing after 11m54s
Periodic Merges (6h) / staging-next → staging (push) Failing after 12m13s
Periodic Merges (24h) / staging-next-25.05 → staging-25.05 (push) Failing after 13m24s
Periodic Merges (24h) / release-25.05 → staging-next-25.05 (push) Failing after 14m28s
18 lines
498 B
Diff
18 lines
498 B
Diff
diff --git a/serlib/ser_stdlib.ml b/serlib/ser_stdlib.ml
|
|
index 894d300..11c9217 100644
|
|
--- a/serlib/ser_stdlib.ml
|
|
+++ b/serlib/ser_stdlib.ml
|
|
@@ -28,6 +28,7 @@ let ref_to_yojson f x = f !x
|
|
let ref_of_yojson f x = Result.map (fun x -> ref x) (f x)
|
|
let hash_fold_ref = hash_fold_ref_frozen
|
|
let compare_ref = compare_ref
|
|
+let (==) x y = (==) x y
|
|
|
|
module Lazy = struct
|
|
type 'a t = 'a lazy_t
|
|
@@ -35,3 +36,4 @@ module Lazy = struct
|
|
end
|
|
|
|
module Option = Stdlib.Option
|
|
+module List = Stdlib.List
|