Pretty: specialize integer comparison
This commit is contained in:
vecāks
ac32d8a5cf
revīzija
7faf6d86c5
|
@ -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 =
|
||||
|
|
Notiek ielāde…
Atsaukties uz šo jaunā problēmā