Write (b0.B000.Op.Write)

type t

val v_op : 
  id:id ->
  mark:mark ->
  created:B0_std.Mtime.span ->
  ?post_exec:(op -> unit) ->
  ?k:(op -> unit) ->
  stamp:string ->
  reads:B0_std.Fpath.t list ->
  mode:int ->
  write:B0_std.Fpath.t ->
  (unit -> (string, string) result) ->
  op

val v : 
  stamp:string ->
  mode:int ->
  file:B0_std.Fpath.t ->
  data:(unit -> (string, string) result) ->
  t

val get : op -> t

val stamp : t -> string

val mode : t -> int

val file : t -> B0_std.Fpath.t

val data : t -> (string, string) result

val discard_data : t -> unit