Pretty: specialize integer comparison

This commit is contained in:
Frédéric Bour 2020-05-20 17:57:39 +02:00 committed by Frédéric Bour
vanhempi ac32d8a5cf
commit 7faf6d86c5
1 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa

Näytä tiedosto

@ -271,8 +271,8 @@ let rec pretty_flat = function
this ugly 100-lines long implementation.
*)
let maxi i j = if i < j then j else i
let mini i j = if i < j then i else j
let maxi i j : int = if i < j then j else i
let mini i j : int = if i < j then i else j
let (+++) i j = let result = i + j in if result < 0 then max_int else result
let nonflat_line ui =