package vhd-format

  1. Overview
  2. Docs
val debug_io : bool Pervasives.ref
val complete : string -> int64 option -> ('a -> Cstruct.buffer -> int -> int -> int Lwt.t) -> 'a -> Cstruct.t -> unit Lwt.t
module Fd : sig ... end
module IO : sig ... end
type 'a t = 'a Lwt.t
val (>>=) : 'a Lwt.t -> ('a -> 'b Lwt.t) -> 'b Lwt.t
val return : 'a -> 'a Lwt.t
val fail : exn -> 'a Lwt.t
val exists : string -> bool Lwt.t
val y2k : float
val get_vhd_time : float -> int32
val now : unit -> int32
val get_modification_time : string -> int32 Lwt.t
val get_file_size : string -> int64 Lwt.t
type fd = Fd.fd = {
  1. fd : Lwt_unix.file_descr;
  2. filename : string;
  3. lock : Lwt_mutex.t;
}
val openfile : string -> bool -> fd Lwt.t
val fsync : fd -> unit
val size_of_file : fd -> int64 Lwt.t
val create : string -> fd Lwt.t
val close : fd -> unit Lwt.t
exception Not_sector_aligned of int64
val assert_sector_aligned : int64 -> unit
val really_read_into : fd -> int64 -> Cstruct.t -> Cstruct.t Lwt.t
val really_read : fd -> int64 -> int -> Cstruct.t Lwt.t
val really_write : fd -> int64 -> Cstruct.t -> unit Lwt.t
val alloc : int -> Cstruct.t
OCaml

Innovation. Community. Security.