anil.recoil.org / unpac-unpac
The unpac monorepo manager self-hosting as a monorepo using unpac
0
fork

Configure Feed

Select the types of activity you want to include in your feed.

Fix Numbers.Int_base.compare (#13606)

authored by

Vincent Laviron and committed by
GitHub 542e34f8 ad2aecfa

+4 -1
+3
Changes
··· 136 136 - #13539: Use nanosleep instead of usleep, if available. 137 137 (Antonin Décimo, review by Miod Vallat and Gabriel Scherer) 138 138 139 + - #13606: Fix Numbers.Int_base.compare 140 + (Mark Shinwell, review by Vincent Laviron) 141 + 139 142 ### Build system: 140 143 141 144 ### Bug fixes:
+1 -1
utils/numbers.ml
··· 17 17 module Int_base = Identifiable.Make (struct 18 18 type t = int 19 19 20 - let compare x y = x - y 20 + let compare = Int.compare 21 21 let output oc x = Printf.fprintf oc "%i" x 22 22 let hash i = i 23 23 let equal (i : int) j = i = j