fix: missing type annotation for specializing int.compare

This commit is contained in:
Simon Cruanes 2019-02-04 13:33:52 -06:00
parent f7327197fe
commit 3236d3c8b9

View file

@ -6,7 +6,7 @@ type 'a sequence = ('a -> unit) -> unit
let equal (a:int) b = Pervasives.(=) a b let equal (a:int) b = Pervasives.(=) a b
let compare a b = compare a b let compare (a:int) b = compare a b
let hash i = i land max_int let hash i = i land max_int