ocaml-containers/tests/core/t_hash.ml
2022-06-30 22:28:19 -04:00

15 lines
440 B
OCaml

open CCHash
module T = (val Containers_testlib.make ~__FILE__ ())
include T;;
t @@ fun () -> int 42 >= 0;;
t @@ fun () -> int max_int >= 0;;
t @@ fun () -> int max_int = int max_int;;
t @@ fun () -> int min_int >= 0;;
t @@ fun () -> int 0 >= 0;;
t @@ fun () -> char 'c' >= 0;;
t @@ fun () -> int 152352 = int 152352;;
t @@ fun () -> list_comm int [1;2] = list_comm int [2;1];;
t @@ fun () -> list_comm int [1;2] <> list_comm int [2;3];;