Source file poly.ml

# 1 "submodules/dune/otherlibs/stdune-unstable/poly.ml"
let hash = Hashtbl.hash

let compare x y = Ordering.of_int (Stdlib.compare x y)

let equal = ( = )

let ( = ) = ( = )

let ( <> ) = ( <> )

let ( < ) = ( < )

let ( <= ) = ( <= )

let ( > ) = ( > )

let ( >= ) = ( >= )