module Logic_typing:Logic typing and logic environment.sig
..end
module Lenv:sig
..end
module Make: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
..end
val append_old_and_post_labels : Lenv.t -> Lenv.t
val append_here_label : Lenv.t -> Lenv.t
val make_pre_label : unit -> Lenv.t
val make_here_label : unit -> Lenv.t