00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011
00012
00013
00014
00015
00016
00017
00018
00019
00020
00021 #ifndef GCC_OBJC_ACT_H
00022 #define GCC_OBJC_ACT_H
00023
00024
00025
00026 const char *objc_init PARAMS ((const char *));
00027 int objc_decode_option PARAMS ((int, char **));
00028
00029
00030
00031 void finish_file PARAMS ((void));
00032 tree start_class PARAMS ((enum tree_code, tree, tree, tree));
00033 tree continue_class PARAMS ((tree));
00034 void finish_class PARAMS ((tree));
00035 void start_method_def PARAMS ((tree));
00036 void continue_method_def PARAMS ((void));
00037 void finish_method_def PARAMS ((void));
00038 tree start_protocol PARAMS ((enum tree_code, tree, tree));
00039 void finish_protocol PARAMS ((tree));
00040 void add_objc_decls PARAMS ((void));
00041
00042 tree is_ivar PARAMS ((tree, tree));
00043 int is_private PARAMS ((tree));
00044 int is_public PARAMS ((tree, tree));
00045 tree add_instance_variable PARAMS ((tree, int, tree, tree, tree));
00046 tree add_class_method PARAMS ((tree, tree));
00047 tree add_instance_method PARAMS ((tree, tree));
00048 tree get_super_receiver PARAMS ((void));
00049 tree get_class_ivars PARAMS ((tree));
00050 tree get_class_reference PARAMS ((tree));
00051 tree get_static_reference PARAMS ((tree, tree));
00052 tree get_object_reference PARAMS ((tree));
00053 tree build_message_expr PARAMS ((tree));
00054 tree finish_message_expr PARAMS ((tree, tree, tree));
00055 tree build_selector_expr PARAMS ((tree));
00056 tree build_ivar_reference PARAMS ((tree));
00057 tree build_keyword_decl PARAMS ((tree, tree, tree));
00058 tree build_method_decl PARAMS ((enum tree_code, tree, tree, tree));
00059 tree build_protocol_expr PARAMS ((tree));
00060 tree build_objc_string_object PARAMS ((tree));
00061
00062 void objc_declare_alias PARAMS ((tree, tree));
00063 void objc_declare_class PARAMS ((tree));
00064 void objc_declare_protocols PARAMS ((tree));
00065
00066 extern int objc_receiver_context;
00067
00068
00069
00070 int objc_comptypes PARAMS ((tree, tree, int));
00071 void objc_check_decl PARAMS ((tree));
00072
00073
00074
00075 tree build_encode_expr PARAMS ((tree));
00076
00077
00078
00079
00080 #define KEYWORD_KEY_NAME(DECL) ((DECL)->decl.name)
00081 #define KEYWORD_ARG_NAME(DECL) ((DECL)->decl.arguments)
00082
00083
00084 #define METHOD_SEL_NAME(DECL) ((DECL)->decl.name)
00085 #define METHOD_SEL_ARGS(DECL) ((DECL)->decl.arguments)
00086 #define METHOD_ADD_ARGS(DECL) ((DECL)->decl.result)
00087 #define METHOD_DEFINITION(DECL) ((DECL)->decl.initial)
00088 #define METHOD_ENCODING(DECL) ((DECL)->decl.context)
00089
00090
00091
00092
00093 #define CLASS_NAME(CLASS) ((CLASS)->type.name)
00094 #define CLASS_SUPER_NAME(CLASS) ((CLASS)->type.context)
00095 #define CLASS_IVARS(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 0)
00096 #define CLASS_RAW_IVARS(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 1)
00097 #define CLASS_NST_METHODS(CLASS) ((CLASS)->type.minval)
00098 #define CLASS_CLS_METHODS(CLASS) ((CLASS)->type.maxval)
00099 #define CLASS_STATIC_TEMPLATE(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 2)
00100 #define CLASS_CATEGORY_LIST(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 3)
00101 #define CLASS_PROTOCOL_LIST(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 4)
00102 #define PROTOCOL_NAME(CLASS) ((CLASS)->type.name)
00103 #define PROTOCOL_LIST(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 0)
00104 #define PROTOCOL_NST_METHODS(CLASS) ((CLASS)->type.minval)
00105 #define PROTOCOL_CLS_METHODS(CLASS) ((CLASS)->type.maxval)
00106 #define PROTOCOL_FORWARD_DECL(CLASS) TREE_VEC_ELT (TYPE_BINFO (CLASS), 1)
00107 #define PROTOCOL_DEFINED(CLASS) TREE_USED (CLASS)
00108 #define TYPE_PROTOCOL_LIST(TYPE) ((TYPE)->type.context)
00109
00110
00111
00112 #define TREE_STATIC_TEMPLATE(record_type) (TREE_PUBLIC (record_type))
00113 #define TYPED_OBJECT(type) \
00114 (TREE_CODE (type) == RECORD_TYPE && TREE_STATIC_TEMPLATE (type))
00115
00116
00117
00118 #define DEFTREECODE(SYM, NAME, TYPE, LENGTH) SYM,
00119 enum objc_tree_code {
00120 #ifdef OBJCPLUS
00121 LAST_BASE_TREE_CODE = LAST_CPLUS_TREE_CODE,
00122 #else
00123 LAST_BASE_TREE_CODE = LAST_C_TREE_CODE,
00124 #endif
00125 #include "objc-tree.def"
00126 LAST_OBJC_TREE_CODE
00127 };
00128 #undef DEFTREECODE
00129
00130
00131
00132 typedef struct hashed_entry *hash;
00133 typedef struct hashed_attribute *attr;
00134
00135 struct hashed_attribute
00136 {
00137 attr next;
00138 tree value;
00139 };
00140 struct hashed_entry
00141 {
00142 attr list;
00143 hash next;
00144 tree key;
00145 };
00146
00147 extern hash *nst_method_hash_list;
00148 extern hash *cls_method_hash_list;
00149
00150 #define HASH_ALLOC_LIST_SIZE 170
00151 #define ATTR_ALLOC_LIST_SIZE 170
00152 #define SIZEHASHTABLE 257
00153
00154
00155
00156 struct imp_entry
00157 {
00158 struct imp_entry *next;
00159 tree imp_context;
00160 tree imp_template;
00161 tree class_decl;
00162 tree meta_decl;
00163 };
00164
00165 extern struct imp_entry *imp_list;
00166 extern int imp_count;
00167 extern int cat_count;
00168
00169
00170
00171 enum objc_tree_index
00172 {
00173 OCTI_STATIC_NST,
00174 OCTI_STATIC_NST_DECL,
00175 OCTI_SELF_ID,
00176 OCTI_UCMD_ID,
00177 OCTI_UNUSED_LIST,
00178 OCTI_ELLIPSIS_NODE,
00179
00180 OCTI_SELF_DECL,
00181 OCTI_UMSG_DECL,
00182 OCTI_UMSG_SUPER_DECL,
00183 OCTI_GET_CLASS_DECL,
00184 OCTI_GET_MCLASS_DECL,
00185 OCTI_SUPER_TYPE,
00186 OCTI_SEL_TYPE,
00187 OCTI_ID_TYPE,
00188 OCTI_CLS_TYPE,
00189 OCTI_NST_TYPE,
00190 OCTI_PROTO_TYPE,
00191
00192 OCTI_CLS_CHAIN,
00193 OCTI_ALIAS_CHAIN,
00194 OCTI_INTF_CHAIN,
00195 OCTI_PROTO_CHAIN,
00196 OCTI_IMPL_CHAIN,
00197 OCTI_CLS_REF_CHAIN,
00198 OCTI_SEL_REF_CHAIN,
00199 OCTI_IVAR_CHAIN,
00200 OCTI_CLS_NAMES_CHAIN,
00201 OCTI_METH_VAR_NAMES_CHAIN,
00202 OCTI_METH_VAR_TYPES_CHAIN,
00203
00204 OCTI_SYMBOLS_DECL,
00205 OCTI_NST_VAR_DECL,
00206 OCTI_CLS_VAR_DECL,
00207 OCTI_NST_METH_DECL,
00208 OCTI_CLS_METH_DECL,
00209 OCTI_CLS_DECL,
00210 OCTI_MCLS_DECL,
00211 OCTI_SEL_TABLE_DECL,
00212 OCTI_MODULES_DECL,
00213 OCTI_STRG_DECL,
00214
00215 OCTI_INTF_CTX,
00216 OCTI_IMPL_CTX,
00217 OCTI_METH_CTX,
00218 OCTI_IVAR_CTX,
00219
00220 OCTI_IMPL_TEMPL,
00221 OCTI_CLS_TEMPL,
00222 OCTI_CAT_TEMPL,
00223 OCTI_UPRIV_REC,
00224 OCTI_PROTO_TEMPL,
00225 OCTI_SEL_TEMPL,
00226 OCTI_UCLS_SUPER_REF,
00227 OCTI_UUCLS_SUPER_REF,
00228 OCTI_METH_TEMPL,
00229 OCTI_IVAR_TEMPL,
00230 OCTI_SYMTAB_TEMPL,
00231 OCTI_MODULE_TEMPL,
00232 OCTI_SUPER_TEMPL,
00233 OCTI_OBJ_REF,
00234 OCTI_METH_PROTO_TEMPL,
00235 OCTI_FUNCTION1_TEMPL,
00236 OCTI_FUNCTION2_TEMPL,
00237
00238 OCTI_OBJ_ID,
00239 OCTI_CLS_ID,
00240 OCTI_ID_ID,
00241 OCTI_CNST_STR_ID,
00242 OCTI_CNST_STR_TYPE,
00243 OCTI_CNST_STR_GLOB_ID,
00244 OCTI_STRING_CLASS_DECL,
00245 OCTI_SUPER_DECL,
00246
00247 OCTI_MAX
00248 };
00249
00250 extern tree objc_global_trees[OCTI_MAX];
00251
00252
00253 #define objc_static_instances objc_global_trees[OCTI_STATIC_NST]
00254
00255
00256 #define static_instances_decl objc_global_trees[OCTI_STATIC_NST_DECL]
00257
00258
00259
00260 #define self_id objc_global_trees[OCTI_SELF_ID]
00261 #define ucmd_id objc_global_trees[OCTI_UCMD_ID]
00262 #define unused_list objc_global_trees[OCTI_UNUSED_LIST]
00263 #define objc_ellipsis_node objc_global_trees[OCTI_ELLIPSIS_NODE]
00264
00265 #define self_decl objc_global_trees[OCTI_SELF_DECL]
00266 #define umsg_decl objc_global_trees[OCTI_UMSG_DECL]
00267 #define umsg_super_decl objc_global_trees[OCTI_UMSG_SUPER_DECL]
00268 #define objc_get_class_decl objc_global_trees[OCTI_GET_CLASS_DECL]
00269 #define objc_get_meta_class_decl \
00270 objc_global_trees[OCTI_GET_MCLASS_DECL]
00271
00272 #define super_type objc_global_trees[OCTI_SUPER_TYPE]
00273 #define selector_type objc_global_trees[OCTI_SEL_TYPE]
00274 #define id_type objc_global_trees[OCTI_ID_TYPE]
00275 #define objc_class_type objc_global_trees[OCTI_CLS_TYPE]
00276 #define instance_type objc_global_trees[OCTI_NST_TYPE]
00277 #define protocol_type objc_global_trees[OCTI_PROTO_TYPE]
00278
00279
00280
00281 #define IS_ID(TYPE) \
00282 (TYPE_MAIN_VARIANT (TYPE) == TYPE_MAIN_VARIANT (id_type))
00283 #define IS_PROTOCOL_QUALIFIED_ID(TYPE) \
00284 (IS_ID (TYPE) && TYPE_PROTOCOL_LIST (TYPE))
00285 #define IS_SUPER(TYPE) \
00286 (super_type && TYPE_MAIN_VARIANT (TYPE) == TYPE_MAIN_VARIANT (super_type))
00287
00288 #define class_chain objc_global_trees[OCTI_CLS_CHAIN]
00289 #define alias_chain objc_global_trees[OCTI_ALIAS_CHAIN]
00290 #define interface_chain objc_global_trees[OCTI_INTF_CHAIN]
00291 #define protocol_chain objc_global_trees[OCTI_PROTO_CHAIN]
00292 #define implemented_classes objc_global_trees[OCTI_IMPL_CHAIN]
00293
00294
00295
00296
00297 #define cls_ref_chain objc_global_trees[OCTI_CLS_REF_CHAIN]
00298 #define sel_ref_chain objc_global_trees[OCTI_SEL_REF_CHAIN]
00299 #define objc_ivar_chain objc_global_trees[OCTI_IVAR_CHAIN]
00300
00301
00302
00303 #define class_names_chain objc_global_trees[OCTI_CLS_NAMES_CHAIN]
00304 #define meth_var_names_chain objc_global_trees[OCTI_METH_VAR_NAMES_CHAIN]
00305 #define meth_var_types_chain objc_global_trees[OCTI_METH_VAR_TYPES_CHAIN]
00306
00307
00308
00309
00310 #define UOBJC_SYMBOLS_decl objc_global_trees[OCTI_SYMBOLS_DECL]
00311 #define UOBJC_INSTANCE_VARIABLES_decl objc_global_trees[OCTI_NST_VAR_DECL]
00312 #define UOBJC_CLASS_VARIABLES_decl objc_global_trees[OCTI_CLS_VAR_DECL]
00313 #define UOBJC_INSTANCE_METHODS_decl objc_global_trees[OCTI_NST_METH_DECL]
00314 #define UOBJC_CLASS_METHODS_decl objc_global_trees[OCTI_CLS_METH_DECL]
00315 #define UOBJC_CLASS_decl objc_global_trees[OCTI_CLS_DECL]
00316 #define UOBJC_METACLASS_decl objc_global_trees[OCTI_MCLS_DECL]
00317 #define UOBJC_SELECTOR_TABLE_decl objc_global_trees[OCTI_SEL_TABLE_DECL]
00318 #define UOBJC_MODULES_decl objc_global_trees[OCTI_MODULES_DECL]
00319 #define UOBJC_STRINGS_decl objc_global_trees[OCTI_STRG_DECL]
00320
00321
00322
00323
00324
00325
00326 #define objc_interface_context objc_global_trees[OCTI_INTF_CTX]
00327 #define objc_implementation_context objc_global_trees[OCTI_IMPL_CTX]
00328 #define objc_method_context objc_global_trees[OCTI_METH_CTX]
00329 #define objc_ivar_context objc_global_trees[OCTI_IVAR_CTX]
00330
00331 #define implementation_template objc_global_trees[OCTI_IMPL_TEMPL]
00332 #define objc_class_template objc_global_trees[OCTI_CLS_TEMPL]
00333 #define objc_category_template objc_global_trees[OCTI_CAT_TEMPL]
00334 #define uprivate_record objc_global_trees[OCTI_UPRIV_REC]
00335 #define objc_protocol_template objc_global_trees[OCTI_PROTO_TEMPL]
00336 #define objc_selector_template objc_global_trees[OCTI_SEL_TEMPL]
00337 #define ucls_super_ref objc_global_trees[OCTI_UCLS_SUPER_REF]
00338 #define uucls_super_ref objc_global_trees[OCTI_UUCLS_SUPER_REF]
00339
00340 #define objc_method_template objc_global_trees[OCTI_METH_TEMPL]
00341 #define objc_ivar_template objc_global_trees[OCTI_IVAR_TEMPL]
00342 #define objc_symtab_template objc_global_trees[OCTI_SYMTAB_TEMPL]
00343 #define objc_module_template objc_global_trees[OCTI_MODULE_TEMPL]
00344 #define objc_super_template objc_global_trees[OCTI_SUPER_TEMPL]
00345 #define objc_object_reference objc_global_trees[OCTI_OBJ_REF]
00346 #define objc_method_prototype_template \
00347 objc_global_trees[OCTI_METH_PROTO_TEMPL]
00348 #define function1_template objc_global_trees[OCTI_FUNCTION1_TEMPL]
00349 #define function2_template objc_global_trees[OCTI_FUNCTION2_TEMPL]
00350
00351 #define objc_object_id objc_global_trees[OCTI_OBJ_ID]
00352 #define objc_class_id objc_global_trees[OCTI_CLS_ID]
00353 #define objc_id_id objc_global_trees[OCTI_ID_ID]
00354 #define constant_string_id objc_global_trees[OCTI_CNST_STR_ID]
00355 #define constant_string_type objc_global_trees[OCTI_CNST_STR_TYPE]
00356 #define constant_string_global_id \
00357 objc_global_trees[OCTI_CNST_STR_GLOB_ID]
00358 #define string_class_decl objc_global_trees[OCTI_STRING_CLASS_DECL]
00359 #define UOBJC_SUPER_decl objc_global_trees[OCTI_SUPER_DECL]
00360
00361 #endif