(* Generated by: ocaml-crunch
   Creation date: Thu, 1 Jan 1970 00:00:00 GMT *)

module Internal = struct
  let d_d3b07384d113edec49eaa6238ad5ff00 = "foo\n"

  let file_chunks = function
    | "a.ext" | "/a.ext" -> Some [ d_d3b07384d113edec49eaa6238ad5ff00; ]
    | _ -> None

  let file_list = [ "a.ext"; ]
end

let file_list = Internal.file_list

let read name =
  match Internal.file_chunks name with
  | None -> None
  | Some [ c ] -> Some c
  | Some c -> Some (String.concat "" c)

let hash = function
  | "a.ext" | "/a.ext" -> Some "d3b07384d113edec49eaa6238ad5ff00"
  | _ -> None

let size = function
  | "a.ext" | "/a.ext" -> Some 4
  | _ -> None
