mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-08 12:15:32 -05:00
fix warning
This commit is contained in:
parent
264c9b608e
commit
e0f14837ac
1 changed files with 1 additions and 1 deletions
|
|
@ -360,7 +360,7 @@ let key = 0 in
|
|||
let m0 = singleton key 1 in (* a map of [key] to the value 1 *)
|
||||
let m1 = minus m0 m0 in (* a map of [key] to the value 0 *)
|
||||
let m2 = minus m0 m1 in (* a map of [key] to the value 1 *)
|
||||
let observed = equal (=) m2 m0 in (* [m0] and [m2] should be equal *)
|
||||
let observed = equal ~eq:(=) m2 m0 in (* [m0] and [m2] should be equal *)
|
||||
assert_equal true observed
|
||||
*)
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Reference in a new issue