Apply_patch.Parser
type t = {
current : string Core.String.Map.t;
lines : string array;
mutable i : int;
mutable fuzz : int;
mutable patch : patch;
}
val make : current:string Core.String.Map.t -> lines:string array -> t
val at_end : ?prefixes:string list -> t -> bool
val read : ?pref:string -> t -> string
val parse_update_file : t -> orig_text:string -> patch_action
val parse_add_file : t -> patch_action
val parse : t -> unit