module COMP:Model.Generator
(
Cil_datatype.Compinfo
)
(
sig
val name :string
typekey =
Cil_types.compinfo
typedata =
Lang.lfun * MemTyped.chunk list
val generate :Cil_types.compinfo -> Lang.lfun * MemTyped.Heap.Set.elt list
val compile :Cil_types.compinfo -> Lang.lfun * MemTyped.Heap.Set.elt list
end
)
module G:Model.Index
(
sig
include K
include D
end
)
typekey =
D.key
typedata =
D.data
val get : G.MAP.key -> G.E.data