1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29
|
(** Representation of (diff ...) actions *)
open Stdune
module Mode : sig
type t =
| Binary (** no diffing, just raw comparison *)
| Text (** diffing after newline normalization *)
end
type ('path, 'target) t =
{ optional : bool
; mode : Mode.t
; file1 : 'path
; file2 : 'target
}
val decode :
'path Dune_lang.Decoder.t
-> 'target Dune_lang.Decoder.t
-> optional:bool
-> ('path, 'target) t Dune_lang.Decoder.t
val decode_binary :
'path Dune_lang.Decoder.t
-> 'target Dune_lang.Decoder.t
-> ('path, 'target) t Dune_lang.Decoder.t
val eq_files : (Path.t, Path.Build.t) t -> bool
|