Source

ocaml-core / base / core / lib / core_map.ml

Diff from to

File base/core/lib/core_map.ml

 open No_polymorphic_compare
 
 let (= ) (x : int) y = Polymorphic_compare.(= ) x y
-let (<>) (x : int) y = Polymorphic_compare.(< ) x y
+let (<>) (x : int) y = Polymorphic_compare.(<>) x y
 let (< ) (x : int) y = Polymorphic_compare.(< ) x y
 let (> ) (x : int) y = Polymorphic_compare.(> ) x y
 let (>=) (x : int) y = Polymorphic_compare.(>=) x y