(* * Copyright (c) 2016-present, Facebook, Inc. * * This source code is licensed under the MIT license found in the * LICENSE file in the root directory of this source tree. *) open! IStd (** Object representing the status of the join operation *) type mode = Pre | Post [@@deriving compare] val equal_mode : mode -> mode -> bool val get_footprint : unit -> bool val set_footprint : bool -> unit