Use tail recursive infix list append

Reviewed By: akotulski

Differential Revision: D4878503

fbshipit-source-id: 3502e35
master
Josh Berdine 8 years ago committed by Facebook Github Bot
parent 05faadf643
commit ebf9acf6a2

@ -46,8 +46,6 @@ module Unix_ = struct
end
let ( @ ) = Caml.List.append
(* Use Caml.Set since they are serialized using Marshal, and Core.Std.Set includes the comparison
function in its representation, which Marshal cannot (de)serialize. *)
module IntSet = Caml.Set.Make(Int)

Loading…
Cancel
Save