package patience_diff

  1. Overview
  2. Docs
val names : string list
val ranges : ('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t
val next_size : ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t
val next_start : ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t
val prev_size : ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t
val prev_start : ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t
val fold : init:'acc__0 -> prev_start: ('acc__0 -> ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__1) -> prev_size: ('acc__1 -> ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__2) -> next_start: ('acc__2 -> ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__3) -> next_size: ('acc__3 -> ('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__4) -> ranges: ('acc__4 -> ('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> 'acc__5) -> 'acc__5
val make_creator : prev_start: (('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__0 -> ('input__ -> int) * 'acc__1) -> prev_size: (('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__1 -> ('input__ -> int) * 'acc__2) -> next_start: (('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__2 -> ('input__ -> int) * 'acc__3) -> next_size: (('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'acc__3 -> ('input__ -> int) * 'acc__4) -> ranges: (('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> 'acc__4 -> ('input__ -> 'a Patience_diff_lib__.Range.t list) * 'acc__5) -> 'acc__0 -> ('input__ -> 'a Patience_diff_lib__.Hunk.t) * 'acc__5
val create : prev_start:int -> prev_size:int -> next_start:int -> next_size:int -> ranges:'a Patience_diff_lib__.Range.t list -> 'a Patience_diff_lib__.Hunk.t
val map : prev_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> int) -> prev_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> int) -> next_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> int) -> next_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> int) -> ranges: (('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> 'a Patience_diff_lib__.Range.t list) -> 'a Patience_diff_lib__.Hunk.t
val iter : prev_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> unit) -> prev_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> unit) -> next_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> unit) -> next_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> unit) -> ranges: (('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> unit) -> unit
val for_all : prev_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> prev_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> next_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> next_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> ranges: (('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> bool) -> bool
val exists : prev_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> prev_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> next_start:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> next_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> bool) -> ranges: (('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> bool) -> bool
val to_list : prev_start: (('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'elem__) -> prev_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'elem__) -> next_start: (('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'elem__) -> next_size:(('a Patience_diff_lib__.Hunk.t, int) Fieldslib.Field.t -> 'elem__) -> ranges: (('a Patience_diff_lib__.Hunk.t, 'a Patience_diff_lib__.Range.t list) Fieldslib.Field.t -> 'elem__) -> 'elem__ list
val map_poly : ([< `Read | `Set_and_create ], 'a Patience_diff_lib__.Hunk.t, 'x0) Fieldslib.Field.user -> 'x0 list
module Direct : sig ... end