Module Ketrew_target.Volume (.ml)

module Volume: sig .. end

type structure = [ `Directory of string * structure list
       | `File of string ] 

type t = {

val create : host:Ketrew_host.t ->
       root:Ketrew_path.t ->
       structure -> t

val file : string -> structure

val dir : string ->
       structure list -> structure

val all_paths : t -> Ketrew_path.t list

val log_structure : structure -> Ketrew_pervasives.Log.t

val log : t -> Ketrew_pervasives.Log.t

val to_string_hum : t -> string