patience_diff v0.15.0 · OCaml Package

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

package patience_diff