sig
type data = Zones.Computer.t
val clear : unit -> unit
val mem : Cil_datatype.Stmt.Hashtbl.key -> bool
val find : Cil_datatype.Stmt.Hashtbl.key -> Zones.Data.t
val replace : Cil_datatype.Stmt.Hashtbl.key -> Zones.Data.t -> unit
val add : Cil_datatype.Stmt.Hashtbl.key -> Zones.Data.t -> unit
val iter : (Cil_datatype.Stmt.Hashtbl.key -> Zones.Data.t -> unit) -> unit
val length : unit -> int
end