Module MemBytes.Chunk

type t =
  1. | Mem
  2. | Init
  3. | Alloc
val self : string
val hash : 'a -> int
val equal : 'a -> 'a -> bool
val compare : t -> t -> int
val pretty : Stdlib.Format.formatter -> t -> unit
val tau_of_memory : ('a, 'b) Qed.Logic.datatype
val tau_of_init : ('a, 'b) Qed.Logic.datatype
val tau_of_chunk : t -> ('a, 'b) Qed.Logic.datatype
val val_of_chunk : t -> ('a, 'b) Logic.datatype
val basename_of_chunk : t -> string
val is_framed : 'a -> bool