package patience_diff

  1. Overview
  2. Docs
type 'a t =
  1. | Same of ('a * 'a) array
  2. | Old of 'a array
  3. | New of 'a array
  4. | Replace of 'a array * 'a array
  5. | Unified of 'a array
val t_of_sexp : (Ppx_sexp_conv_lib.Sexp.t -> 'a) -> Ppx_sexp_conv_lib.Sexp.t -> 'a t
val sexp_of_t : ('a -> Ppx_sexp_conv_lib.Sexp.t) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t
val all_same : 'a t list -> bool

all_same ranges returns true if all ranges are Same

val old_only : 'a t list -> 'a t list

old_only ranges drops all New ranges and converts all Replace ranges to Old ranges.

val new_only : 'a t list -> 'a t list

new_only ranges drops all Old ranges and converts all Replace ranges to New ranges.

val mine_size : 'a t -> int

Counts number of elements.

val other_size : 'a t -> int
OCaml

Innovation. Community. Security.