functor
(C : sig
val annonCompFieldName : string
val conditionalConversion :
Cil_types.typ -> Cil_types.typ -> Cil_types.typ
val find_var : string -> Cil_types.logic_var
val find_enum_tag : string -> Cil_types.exp * Cil_types.typ
val find_comp_type : kind:string -> string -> Cil_types.typ
val find_type : string -> Cil_types.typ
val find_label : string -> Cil_types.stmt Pervasives.ref
val remove_logic_function : string -> unit
val remove_logic_type : string -> unit
val remove_logic_ctor : string -> unit
val add_logic_function : Cil_types.logic_info -> unit
val add_logic_type : string -> Cil_types.logic_type_info -> unit
val add_logic_ctor : string -> Cil_types.logic_ctor_info -> unit
val find_all_logic_functions : string -> Cil_types.logic_info list
val find_logic_type : string -> Cil_types.logic_type_info
val find_logic_ctor : string -> Cil_types.logic_ctor_info
end) ->
sig
val term : Logic_typing.Lenv.t -> Logic_ptree.lexpr -> Cil_types.term
val predicate :
Logic_typing.Lenv.t ->
Logic_ptree.lexpr -> Cil_types.predicate Cil_types.named
val code_annot : Logic_ptree.code_annot -> Cil_types.code_annotation
val type_annot :
Cil_types.location -> Logic_ptree.type_annot -> Cil_types.logic_info
val annot :
Cil_types.location -> Logic_ptree.decl -> Cil_types.global_annotation
val funspec :
Cil_types.varinfo ->
Cil_types.varinfo list option ->
Cil_types.typ -> Logic_ptree.spec -> Cil_types.funspec
end