(* * Copyright (c) 2013 - present Facebook, Inc. * All rights reserved. * * This source code is licensed under the BSD style license found in the * LICENSE file in the root directory of this source tree. An additional grant * of patent rights can be found in the PATENTS file in the same directory. *) (** Utility module to retrieve fields of structs of classes *) val fields_superclass : Sil.tenv -> Clang_ast_t.obj_c_interface_decl_info -> (Ident.fieldname * Sil.typ * Sil.item_annotation) list type field_type = Ident.fieldname * Sil.typ * (Sil.annotation * bool) list val get_fields : Sil.tenv -> CContext.curr_class -> Clang_ast_t.decl list -> field_type list val fields_superclass : Sil.tenv -> Clang_ast_t.obj_c_interface_decl_info -> field_type list val build_sil_field_property : CContext.curr_class -> Sil.tenv -> string -> Clang_ast_t.qual_type -> Clang_ast_t.property_attribute list option -> field_type val add_missing_fields : Sil.tenv -> string -> field_type list -> unit