Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
#include "defines.h"
#include "host.m"
#include "host.h"
#include "target.m"
#include "target.h"
#include "globals.m"
#include "tokens.m"
#include "sytb.m"
#include "p_globals.m"
#include "debug.m"
#include "globals.h"
#include "tokens.h"
#include "sytb.h"
#include "p_globals.h"
#include "p_dcls.h"
Go to the source code of this file.
Functions | |
static void | issue_attr_blk_err (char *) |
static void | issue_attr_err (attr_type, long) |
static void | merge_parameter (boolean, int, int, int, opnd_type *, expr_arg_type *, int, int) |
static void | merge_type (int, int, int, int) |
static void | parse_cpnt_dcl_stmt (void) |
static long | parse_attr_spec (int *, boolean *) |
static boolean | parse_data_imp_do (opnd_type *) |
static void | parse_derived_type_stmt (void) |
static boolean | parse_initializer (int) |
static void | parse_only_spec (int) |
static void | retype_attr (int) |
void | parse_common_stmt (void) |
void | parse_contains_stmt (void) |
void | parse_data_stmt (void) |
void | parse_equivalence_stmt (void) |
void | parse_implicit_stmt (void) |
void | parse_interface_stmt (void) |
void | parse_namelist_stmt (void) |
void | parse_parameter_stmt (void) |
void | parse_sequence_stmt (void) |
void | parse_stmt_func_stmt (int sf_attr_idx, int sf_name_idx) |
void | parse_type_dcl_stmt (void) |
void | parse_use_stmt (void) |
void | char_bounds_resolution (int attr_idx, boolean *chk_semantics) |
void | array_bounds_resolution (int attr_idx, boolean *chk_semantics) |
void | issue_undefined_type_msg (int attr_idx, int line, int column) |
Variables | |
static char | USMID [] = "\n@(#)5.0_pl/sources/p_dcls.c 5.10 10/08/99 08:26:21\n" |
void array_bounds_resolution | ( | int | attr_idx, |
boolean * | chk_semantics | ||
) |
Definition at line 5723 of file p_dcls.c.
References array_dim_resolution(), AT_REFERENCED, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CLASS, ATD_PE_ARRAY_IDX, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_RESOLVED, BD_UB_FLD, BD_UB_IDX, bound_semantics(), CIF_Symbol_Reference, Constant, Constant_Size, Deferred_Shape, Explicit_Shape, FALSE, Func_Entry, Func_Exit, no_func_expansion, NULL, NULL_IDX, pe_array_dim_resolution(), Referenced, TRACE, TRUE, and xref_state.
Referenced by parse_cpnt_dcl_stmt(), parse_parameter_stmt(), and parse_type_dcl_stmt().
void char_bounds_resolution | ( | int | attr_idx, |
boolean * | chk_semantics | ||
) |
Definition at line 5662 of file p_dcls.c.
References ATD_CLASS, ATD_TYPE_IDX, bound_semantics(), char_len_resolution(), CIF_Symbol_Reference, CN_Tbl_Idx, Const_Len_Char, Constant, FALSE, Func_Entry, Func_Exit, no_func_expansion, NULL, TRACE, TRUE, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, and xref_state.
Referenced by parse_parameter_stmt(), and parse_type_dcl_stmt().
static void issue_attr_blk_err | ( | char * | attr_str | ) | [static] |
Definition at line 5218 of file p_dcls.c.
References AT_DCL_ERR, AT_WORK_IDX, ATP_PGM_UNIT, Blockdata_Blk, Case_Blk, Contains_Blk, CURR_BLK, CURR_BLK_NAME, Derived_Type_Blk, Do_Blk, Error, FALSE, Func_Entry, Func_Exit, Function, Function_Blk, If_Blk, If_Else_Blk, If_Else_If_Blk, If_Then_Blk, Interface_Blk, Interface_Body_Blk, Internal, Internal_Blk, Module_Blk, Module_Proc_Blk, NULL, PRINTMSG(), Program_Blk, Select_Blk, Subroutine_Blk, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, Unknown_Blk, Where_Else_Blk, Where_Else_Mask_Blk, and Where_Then_Blk.
Referenced by parse_attr_spec().
static void issue_attr_err | ( | attr_type | new_attr, |
long | err_in_list | ||
) | [static] |
Definition at line 4728 of file p_dcls.c.
References AT_DCL_ERR, AT_WORK_IDX, attr_str, End_Attr, Error, Func_Entry, Func_Exit, idx, NULL, PRINTMSG(), token, TOKEN_COLUMN, TOKEN_LINE, TRACE, and TRUE.
Referenced by parse_attr_spec().
void issue_undefined_type_msg | ( | int | attr_idx, |
int | line, | ||
int | column | ||
) |
Definition at line 6210 of file p_dcls.c.
References AT_DCL_ERR, AT_NAME_LEN, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_USE_ASSOCIATED, curr_scp_idx, Derived_Type, Error, Func_Entry, Func_Exit, LN_DEF_LOC, NULL, NULL_IDX, PRINTMSG(), SCP_IS_INTERFACE, SCP_PARENT_IDX, srch_sym_tbl(), TRACE, and TRUE.
Referenced by attr_semantics(), parse_cpnt_dcl_stmt(), and parse_type_dcl_stmt().
static void merge_parameter | ( | boolean | chk_semantics, |
int | attr_idx, | ||
int | line, | ||
int | column, | ||
opnd_type * | opnd, | ||
expr_arg_type * | const_exp_desc, | ||
int | const_line, | ||
int | const_column | ||
) | [static] |
Definition at line 5872 of file p_dcls.c.
References array_dim_resolution(), Assumed_Size_Char, AT_DCL_ERR, AT_DEFINED, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CLASS, ATD_CONST_IDX, ATD_FLD, ATD_TYPE_IDX, Atd_Unknown, ATT_POINTER_CPNT, BD_RANK, BD_RESOLVED, BD_XT_IDX, Character, check_asg_semantics(), cif_flags, cif_named_constant_rec(), CLEAR_TBL_NTRY, CN_CONST, CN_INT_TO_C, CN_Tbl_Idx, CN_TYPE_IDX, Complex, Const_Len_Char, Constant, COPY_OPND, Cvrt_Opr, Dcl_Bound_Ref, Error, EXIT, FALSE, find_opnd_line_and_column(), fnd_semantic_err(), fold_relationals(), expr_semantics_args::foldable, folder_driver(), Func_Entry, Func_Exit, get_basic_type_str(), opnd_entry::idx, INFO_RECS, Integer, IR_OPND_L, IR_Tbl_Idx, Logical, Long_Typeless, Ne_Opr, NO_Tbl_Idx, ntr_const_tbl(), ntr_type_tbl(), NULL, NULL_IDX, Obj_Constant, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, Real, Referenced, expr_semantics_args::shape, strcpy, Structure, TRACE, TRUE, TYP_CHAR_CLASS, TYP_DCL_VALUE, TYP_DESC, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, expr_semantics_args::type_idx, type_tbl, Typeless, and TYPELESS_DEFAULT_TYPE.
Referenced by parse_parameter_stmt(), and parse_type_dcl_stmt().
static void merge_type | ( | int | attr_idx, |
int | type_idx, | ||
int | id_line, | ||
int | id_column | ||
) | [static] |
Definition at line 4788 of file p_dcls.c.
References Ansi, Assumed_Size_Char, AT_ARG_TO_KIND, AT_ATTR_LINK, AT_DCL_ERR, AT_IS_INTRIN, AT_NAMELIST_OBJ, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, AT_TYPED, AT_USE_ASSOCIATED, ATD_CLASS, ATD_DATA_INIT, ATD_FUNC_IDX, ATD_SYMBOLIC_CONSTANT, ATD_TMP_IDX, ATD_TYPE_IDX, ATI_FIRST_SPECIFIC_IDX, ATI_PROC_IDX, ATP_ALT_ENTRY, ATP_IN_INTERFACE_BLK, ATP_PGM_UNIT, ATP_PROC, ATP_RECURSIVE, ATP_RSLT_IDX, ATP_RSLT_NAME, Character, Comment, Constant, CREATE_FUNC_RSLT, CRI__Pointee, curr_scp_idx, Data_Obj, Dcl_Bound_Ref, error(), Error, EXIT, FALSE, find_attr_in_ir(), fnd_semantic_err(), Func_Entry, Func_Exit, Function, Function_Result, get_basic_type_str(), Interface, Intern_Proc, Internal, Module_Proc, NULL, NULL_IDX, Obj_Assum_Type_Ch, obj_str, Obj_Typed, OPND_COL_NUM, OPND_LINE_NUM, Pgm_Unit, PRINTMSG(), SCP_ATTR_IDX, SCP_IMPL_NONE, SN_ATTR_IDX, Stmt_Func, Structure, TRACE, TRUE, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, and Warning.
Referenced by parse_type_dcl_stmt().
static long parse_attr_spec | ( | int * | array_idx, |
boolean * | has_parameter | ||
) | [static] |
Definition at line 4344 of file p_dcls.c.
References Allocatable_Attr, Allocatable_Stmt, Ansi, AT_ACCESS_SET, AT_OBJ_CLASS, AT_OPTIONAL, AT_PRIVATE, AT_WORK_IDX, ATD_ALLOCATABLE, ATD_CLASS, ATD_INTENT, ATD_PE_ARRAY_IDX, ATD_POINTER, ATD_SAVED, ATD_STACK, ATD_TARGET, ATD_VOLATILE, ATP_SAVE_ALL, Automatic_Attr, Automatic_Stmt, cmd_line_flags, Co_Array_Attr, cmd_line_flags_entry::co_array_fortran, COLON, COMMA, CURR_BLK, curr_scp_idx, Data_Obj, Dimension_Attr, Dummy_Argument, EOS, err_attrs, External_Attr, External_Stmt, FALSE, Find_Comma, Func_Entry, Func_Exit, Intent_Attr, Intent_Stmt, Intrinsic_Attr, issue_attr_blk_err(), issue_attr_err(), LA_CH_VALUE, LBRKT, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, Module_Blk, new_intent, NEXT_LA_CH, NULL, Optional_Attr, Optional_Stmt, Parameter_Attr, parse_array_spec(), parse_err_flush(), parse_intent_spec(), parse_pe_array_spec(), Pointer_Attr, PRINTMSG(), Private_Attr, Public_Attr, Save_Attr, SCP_ATTR_IDX, STMT_CANT_BE_IN_BLK, Target_Attr, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Allocatable, Tok_Kwd_Automatic, Tok_Kwd_Dimension, Tok_Kwd_External, Tok_Kwd_Intent, Tok_Kwd_Intrinsic, Tok_Kwd_Optional, Tok_Kwd_Parameter, Tok_Kwd_Pointer, Tok_Kwd_Private, Tok_Kwd_Public, Tok_Kwd_Save, Tok_Kwd_Target, Tok_Kwd_Volatile, Tok_Punct_Colon_Colon, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, Variable, Volatile_Attr, and Volatile_Stmt.
Referenced by parse_type_dcl_stmt().
void parse_common_stmt | ( | void | ) |
Definition at line 95 of file p_dcls.c.
References Ansi, AT_ATTR_LINK, AT_DCL_ERR, AT_HOST_ASSOCIATED, AT_OBJ_CLASS, AT_REFERENCED, AT_Tbl_Idx, ATD_AUXILIARY, ATD_CLASS, ATD_IN_COMMON, ATD_NEXT_MEMBER_IDX, ATD_PE_ARRAY_IDX, ATD_SEEN_OUTSIDE_IMP_DO, ATD_STOR_BLK_IDX, BD_ARRAY_CLASS, BD_COLUMN_NUM, BD_LINE_NUM, BLANK_COMMON_NAME, BLANK_COMMON_NAME_LEN, Ch_Class_Letter, Char_Rslt_Bound_Ref, cif_flags, cif_sb_usage_rec(), CIF_Symbol_Declaration, cif_usage_rec(), cmd_line_flags, cmd_line_flags_entry::co_array_fortran, COMMA, Common, CREATE_ID, CURR_BLK, curr_scp_idx, curr_stmt_category, Data_Obj, Declaration_Stmt_Cat, Deferred_Shape, EOS, EOS_STR, Error, FALSE, Find_Comma_Slash, Find_None, fnd_semantic_err(), Func_Entry, Func_Exit, iss_blk_stk_err(), LA_CH_CLASS, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LBRKT, LN_DEF_LOC, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, merge_dimension(), NEXT_LA_CH, ntr_stor_blk_tbl(), ntr_sym_tbl(), NULL, NULL_IDX, Obj_Common_Obj, parse_array_spec(), parse_err_flush(), parse_pe_array_spec(), PRINTMSG(), SB_AUXILIARY, SB_BLANK_COMMON, SB_BLK_TYPE, SB_COMMON_NEEDS_OFFSET, SB_DCL_ERR, SB_DEF_MULT_SCPS, SB_FIRST_ATTR_IDX, SB_HIDDEN, SB_HOST_ASSOCIATED, SB_IS_COMMON, SB_MERGED_BLK_IDX, SB_NAME_PTR, SB_RUNTIME_INIT, SB_USE_ASSOCIATED, SET_IMPL_TYPE, SLASH, srch_stor_blk_tbl(), srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, stmt_start_col, stmt_start_line, stmt_type, Task_Common, Task_Common_Stmt, Threadprivate, Tok_Class_Id, Tok_Class_Keyword, Tok_Id, Tok_Kwd_Common, token, TOKEN_COLUMN, TOKEN_ID, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, Variable, and XREF_RECS.
void parse_contains_stmt | ( | void | ) |
Definition at line 477 of file p_dcls.c.
References BLK_CIF_SCOPE_ID, blk_stk_idx, cif_flags, cif_internal_proc_start_line, cif_module_proc_start_line, Contains_Blk, Contains_Stmt, CURR_BLK, CURR_BLK_ERR, CURR_BLK_NO_EXEC, curr_stmt_category, do_cmic_blk_checks(), EOS, EOS_STR, FALSE, Find_EOS, Func_Entry, Func_Exit, Interface_Blk, iss_blk_stk_err(), LA_CH_LINE, LA_CH_VALUE, NEXT_LA_CH, NULL, parse_err_flush(), PUSH_BLK_STK, STMT_CANT_BE_IN_BLK, Sub_Func_Stmt_Cat, TRACE, and TRUE.
static void parse_cpnt_dcl_stmt | ( | void | ) | [static] |
Definition at line 546 of file p_dcls.c.
References Align_128, Align_16, Align_32, Align_64, Align_8, Align_Bit, array_bounds_resolution(), assign_offset(), Assumed_Shape, Assumed_Size, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_DEFINED, AT_IS_INTRIN, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_NAME_PTR, AT_SEMANTICS_DONE, AT_Tbl_Idx, AT_TYPED, AT_WORK_IDX, ATD_ARRAY_IDX, ATD_CLASS, ATD_CPNT_INIT_IDX, ATD_CPNT_OFFSET_IDX, ATD_DERIVED_TYPE_IDX, ATD_FLD, ATD_OFFSET_ASSIGNED, ATD_OFFSET_FLD, ATD_PE_ARRAY_IDX, ATD_POINTER, ATD_TYPE_IDX, ATT_ALIGNMENT, ATT_CHAR_CPNT, ATT_DEFAULT_INITIALIZED, ATT_FIRST_CPNT_IDX, ATT_NON_DEFAULT_CPNT, ATT_NUM_CPNTS, ATT_NUMERIC_CPNT, ATT_POINTER_CPNT, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_DCL_ERR, BD_LB_FLD, BD_LB_IDX, BD_LINE_NUM, BD_RANK, BD_RESOLVED, BD_UB_FLD, BD_UB_IDX, BLK_LAST_CPNT_IDX, blk_stk_idx, Call_Opr, Character, CHARACTER_DEFAULT_TYPE, cif_flags, cif_stmt_type_rec(), CIF_Symbol_Declaration, CIF_Type_Declaration_Stmt, cif_usage_rec(), CLEAR_TBL_NTRY, cmd_line_flags, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, cmd_line_flags_entry::co_array_fortran, colon_recovery, COMMA, Complex_16, COMPLEX_DEFAULT_TYPE, Const_Len_Char, Constant_Size, COPY_BD_NTRY, COPY_OPND, CURR_BLK_NAME, DALIGN_TEST_CONDITION, Default_Typed, Deferred_Shape, Deferred_Shape1, DOUBLE_DEFAULT_TYPE, dump_flags, EOS, EOS_STR, EQUAL, Error, Explicit_Shape, FALSE, Find_Comma, Find_EOS, fold_relationals(), Func_Entry, Func_Exit, GT, idx, Init_Opr, on_off_flags_entry::integer_1_and_2, INTEGER_DEFAULT_TYPE, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, issue_undefined_type_msg(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LBRKT, Le_Opr, LOGICAL_DEFAULT_TYPE, LPAREN, Lt_Opr, matched_specific_token(), MATCHED_TOKEN_CLASS, MISC_RECS, NEXT_LA_CH, NO_Tbl_Idx, ntr_array_in_bd_tbl(), NTR_ATTR_TBL, NTR_IR_TBL, NTR_NAME_POOL, NTR_SN_TBL, ntr_type_tbl(), NULL, NULL_IDX, Null_Opr, on_off_flags, OPND_FLD, OPND_IDX, PACK_16_BIT_TEST_CONDITION, PACK_8_BIT_TEST_CONDITION, dump_flags_entry::pack_half_word, PACK_HALF_WORD_TEST_CONDITION, parse_array_spec(), parse_err_flush(), parse_expr(), parse_length_selector(), parse_pe_array_spec(), parse_type_spec(), PRINTMSG(), Real_16, REAL_DEFAULT_TYPE, reserve_array_ntry(), cmd_line_flags_entry::s_pointer8, SET_IMPL_TYPE, SN_ATTR_IDX, SN_NAME_IDX, SN_NAME_LEN, SN_SIBLING_LINK, srch_linked_sn(), STAR, statement_number, Struct_Component, Structure, Tok_Class_Id, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Dimension, Tok_Kwd_Pointer, Tok_Punct_Colon_Colon, Tok_Punct_Comma, token, TOKEN_COLUMN, TOKEN_ID, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_CHAR_CLASS, TYP_DCL_VALUE, TYP_DESC, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, type_tbl, TYPELESS_DEFAULT_TYPE, and XREF_RECS.
Referenced by parse_type_dcl_stmt().
static boolean parse_data_imp_do | ( | opnd_type * | result_opnd | ) | [static] |
Definition at line 5324 of file p_dcls.c.
References AT_ATTR_LINK, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_CLASS, AT_REFERENCED, AT_Tbl_Idx, ATD_SEEN_AS_LCV, ATD_SEEN_IN_IMP_DO, Call_Opr, Char_Rslt_Bound_Ref, COMMA, COPY_OPND, curr_stmt_sh_idx, Data_Obj, EOS, EQUAL, Error, EXIT, FALSE, Find_EOS, find_opnd_line_and_column(), Find_Rparen, Func_Entry, Func_Exit, IL_COL_NUM, IL_FLD, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Implied_Do_Opr, in_implied_do, IR_COL_NUM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LN_DEF_LOC, LPAREN, mark_attr_defined(), MATCHED_TOKEN_CLASS, merge_data(), NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, parse_deref(), parse_err_flush(), parse_expr(), PERCENT, PRINTMSG(), RPAREN, SET_IMPL_TYPE, SH_ERR_FLG, srch_sym_tbl(), Tok_Class_Id, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by parse_data_stmt().
void parse_data_stmt | ( | void | ) |
Definition at line 1138 of file p_dcls.c.
References After, AT_ATTR_LINK, AT_OBJ_CLASS, AT_REFERENCED, AT_Tbl_Idx, ATD_SEEN_OUTSIDE_IMP_DO, Call_Opr, Char_Rslt_Bound_Ref, COMMA, Comment, COPY_OPND, CURR_BLK, curr_stmt_category, curr_stmt_sh_idx, Data_Obj, Data_Stmt, Declaration_Stmt_Cat, EOS, Error, EXIT, FALSE, Find_EOS, Func_Entry, Func_Exit, gen_sh(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Init_Opr, Internal, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LN_DEF_LOC, LPAREN, MATCHED_TOKEN_CLASS, merge_data(), NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, parse_data_imp_do(), parse_deref(), parse_err_flush(), parse_initializer(), parse_operand_insert, PERCENT, PRINTMSG(), SET_IMPL_TYPE, SH_COMPILER_GEN, SH_IR_IDX, SLASH, srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, stmt_start_col, stmt_start_line, strcpy, Tok_Class_Id, Tok_Const_False, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
static void parse_derived_type_stmt | ( | void | ) | [static] |
Definition at line 1396 of file p_dcls.c.
References access, AT_ACCESS_SET, AT_ATTR_LINK, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_DEFINED, AT_LOCKED_IN, AT_MODULE_IDX, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_PRIVATE, AT_Tbl_Idx, ATP_PGM_UNIT, ATT_SCP_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, CIF_Derived_Type_Name_Definition, cif_flags, cif_usage_rec(), CLEAR_VARIANT_ATTR_INFO, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, colon_recovery, COMMA, CREATE_ERR_ATTR, CURR_BLK, CURR_BLK_ERR, CURR_BLK_NAME, CURR_BLK_NO_EXEC, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, Declaration_Stmt_Cat, Derived_Type, Derived_Type_Blk, Derived_Type_Stmt, EOS, EOS_STR, Error, FALSE, Find_EOS, Find_None, fnd_semantic_err(), Func_Entry, Func_Exit, Interface_Body_Blk, iss_blk_stk_err(), LA_CH_VALUE, LN_DEF_LOC, matched_specific_token(), MATCHED_TOKEN_CLASS, Module, NEXT_LA_CH, ntr_sym_tbl(), NULL, NULL_IDX, num_of_derived_types, Obj_Derived_Type, parse_err_flush(), PRINTMSG(), Private, Public, PUSH_BLK_STK, SCP_ATTR_IDX, SH_STMT_TYPE, srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, stmt_type, Tok_Class_Id, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Private, Tok_Kwd_Public, Tok_Punct_Colon_Colon, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and XREF_RECS.
Referenced by parse_type_dcl_stmt().
void parse_equivalence_stmt | ( | void | ) |
Definition at line 1622 of file p_dcls.c.
References AL_EQ_IDX, AL_IDX_IS_EQ, AL_NEXT_IDX, AT_ATTR_LINK, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CLASS, ATD_DCL_EQUIV, ATD_EQUIV, ATD_EQUIV_LIST, ATD_SEEN_OUTSIDE_IMP_DO, Char_Rslt_Bound_Ref, cif_flags, CIF_Symbol_Declaration, cif_usage_rec(), cmd_line_flags, cmd_line_flags_entry::co_array_fortran, COLON, COMMA, COPY_OPND, CURR_BLK, curr_scp_idx, curr_stmt_category, Data_Obj, Declaration_Stmt_Cat, EOS, EOS_STR, EQ_ATTR_IDX, EQ_COLUMN_NUM, EQ_GRP_END_IDX, EQ_GRP_IDX, EQ_LINE_NUM, EQ_NEXT_EQUIV_GRP, EQ_NEXT_EQUIV_OBJ, EQ_OPND_FLD, EQ_OPND_IDX, EQ_SUBSTRINGED, Equivalence_Stmt, Error, EXIT, expr_mode, FALSE, Find_Comma_Rparen, Find_EOS, fnd_semantic_err(), Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Initialization_Expr, IR_COL_NUM, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, is_substring_ref(), iss_blk_stk_err(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LBRKT, LN_DEF_LOC, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_ATTR_LIST_TBL, NTR_EQ_TBL, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, Obj_Equiv, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, parse_err_flush(), parse_expr(), parse_pe_array_spec(), PRINTMSG(), Regular_Expr, RPAREN, SCP_FIRST_EQUIV_GRP, SET_IMPL_TYPE, srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, Subscript_Opr, Substring_Opr, Tok_Class_Id, Tok_Class_Punct, Tok_Punct_Rparen, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, Variable, and XREF_RECS.
void parse_implicit_stmt | ( | void | ) |
Definition at line 1958 of file p_dcls.c.
References AL_ATTR_IDX, AL_NEXT_IDX, Ansi, Assumed_Size_Char, AT_ATTR_LINK, AT_USE_ASSOCIATED, AT_WORK_IDX, ATD_TYPE_IDX, ch_after_paren_grp(), Character, cif_flags, CIF_Implicit_None_Stmt, CIF_Implicit_Stmt, cif_stmt_type_rec(), COMMA, CURR_BLK, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, DASH, EOS, EOS_STR, Error, EXIT, FALSE, Find_Comma, Find_Comma_Rparen, Find_EOS, Func_Entry, Func_Exit, idx, IM_SET, IM_STORAGE, IM_TYPE_IDX, Impl_Automatic_Storage, Impl_Default_Storage, IMPL_IDX, Impl_Static_Storage, Implicit_None_Stmt, Implicit_None_Stmt_Cat, Implicit_Stmt, Implicit_Stmt_Cat, iss_blk_stk_err(), LA_CH_VALUE, LN_ATTR_IDX, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, MISC_RECS, NEXT_LA_CH, NULL, NULL_IDX, parse_err_flush(), parse_type_spec(), PRINTMSG(), retype_attr(), RPAREN, SCP_ATTR_LIST, SCP_IMPL_NONE, SCP_LN_FW_IDX, SCP_LN_LW_IDX, SH_STMT_TYPE, statement_number, STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, stmt_start_col, stmt_start_line, stmt_type, Tok_Class_Id, Tok_Class_Keyword, Tok_Kwd_Automatic, Tok_Kwd_None, Tok_Kwd_Static, Tok_Kwd_Type, Tok_Kwd_Undefined, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_CHAR_CLASS, and TYP_TYPE.
static boolean parse_initializer | ( | int | init_ir_idx | ) | [static] |
Definition at line 6273 of file p_dcls.c.
References COMMA, constant_value_semantics(), COPY_OPND, data_repeat_semantics(), EOS, Error, EXIT, FALSE, Find_EOS, find_opnd_line_and_column(), Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, MINUS, NEXT_LA_CH, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Paren_Opr, parse_err_flush(), parse_operand(), parse_operand_insert, PLUS, PRINTMSG(), Rep_Count_Opr, SLASH, STAR, strcpy, TRACE, TRUE, Uminus_Opr, and Uplus_Opr.
Referenced by parse_data_stmt(), and parse_type_dcl_stmt().
void parse_interface_stmt | ( | void | ) |
Definition at line 2372 of file p_dcls.c.
References AT_DCL_ERR, AT_MODULE_IDX, AT_OBJ_CLASS, ATI_CIF_SCOPE_ID, ATI_UNNAMED_INTERFACE, BASIC_RECS, BLK_CIF_SCOPE_ID, blk_stk_idx, BLK_UNNAMED_INTERFACE, cif_begin_scope_rec(), cif_flags, CIF_Interface_Assignment_Stmt, CIF_Interface_Explicit_Stmt, CIF_Interface_Generic_Stmt, CIF_Interface_Operator_Stmt, cif_stmt_type_rec(), CREATE_ID, CURR_BLK, CURR_BLK_ERR, CURR_BLK_NAME, CURR_BLK_NO_EXEC, curr_stmt_category, EOS, EOS_STR, Find_EOS, Func_Entry, Func_Exit, generic_spec_semantics(), Interface, Interface_Blk, Interface_Stmt, iss_blk_stk_err(), LA_CH_VALUE, MISC_RECS, name, NEXT_LA_CH, ntr_local_attr_list(), NULL, NULL_IDX, parse_err_flush(), parse_generic_spec(), PUSH_BLK_STK, statement_number, STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, id_str_entry::string, Sub_Func_Stmt_Cat, Tok_Id, Tok_Op_Assign, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, and TRUE.
void parse_namelist_stmt | ( | void | ) |
Definition at line 2515 of file p_dcls.c.
References Ansi, AT_DCL_ERR, AT_NAME_IDX, AT_NAME_LEN, AT_NAMELIST_OBJ, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATD_SEEN_OUTSIDE_IMP_DO, ATN_FIRST_NAMELIST_IDX, ATN_LAST_NAMELIST_IDX, ATN_NUM_NAMELIST, cif_flags, CIF_Symbol_Declaration, cif_usage_rec(), COMMA, CURR_BLK, curr_stmt_category, Data_Obj, Declaration_Stmt_Cat, EOS, EOS_STR, Error, Executable_Stmt_Cat, EXIT, FALSE, Find_EOS, fnd_semantic_err(), Func_Entry, Func_Exit, iss_blk_stk_err(), LA_CH_VALUE, LN_DEF_LOC, MATCHED_TOKEN_CLASS, Namelist_Grp, Namelist_Stmt, NEXT_LA_CH, ntr_host_in_sym_tbl(), NTR_SN_TBL, ntr_sym_tbl(), NULL, NULL_IDX, Obj_Namelist_Grp, parse_err_flush(), PRINTMSG(), Referenced, SET_IMPL_TYPE, SLASH, SN_ATTR_IDX, SN_COLUMN_NUM, SN_LINE_NUM, SN_NAME_IDX, SN_NAME_LEN, SN_SIBLING_LINK, srch_host_sym_tbl(), srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, stmt_start_col, stmt_start_line, Tok_Class_Id, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and XREF_RECS.
static void parse_only_spec | ( | int | module_attr_idx | ) | [static] |
Definition at line 4230 of file p_dcls.c.
References check_for_duplicate_renames(), COMMA, EOS, EOS_STR, EQUAL, FALSE, Find_Comma, Func_Entry, Func_Exit, LA_CH_VALUE, LPAREN, make_ro_entry(), matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NULL, NULL_IDX, parse_err_flush(), parse_generic_spec(), rename_only_tbl_idx, reset_lex(), RO_RENAME_IDX, Tok_Class_Id, Tok_Class_Punct, Tok_Punct_Rename, token, TOKEN_BUF_IDX, TOKEN_STMT_NUM, TRACE, and TRUE.
Referenced by parse_use_stmt().
void parse_parameter_stmt | ( | void | ) |
Definition at line 2717 of file p_dcls.c.
References array_bounds_resolution(), AT_ATTR_LINK, AT_DCL_ERR, AT_OBJ_CLASS, AT_REFERENCED, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_SEEN_OUTSIDE_IMP_DO, ATD_TYPE_IDX, char_bounds_resolution(), Char_Rslt_Bound_Ref, Character, Character_1, check_type_conversion, cif_flags, CIF_Symbol_Declaration, CIF_Symbol_Reference, cif_usage_rec(), COMMA, comp_gen_expr, Complex, Const_Len_Char, CURR_BLK, curr_stmt_category, Data_Obj, Declaration_Stmt_Cat, EQUAL, EXIT, expr_mode, expr_semantics(), FALSE, Find_Comma_Rparen, Find_EOS, Func_Entry, Func_Exit, Implicit_Stmt_Cat, Initialization_Expr, Integer, iss_blk_stk_err(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LN_DEF_LOC, LPAREN, MATCHED_TOKEN_CLASS, merge_parameter(), NEXT_LA_CH, ntr_sym_tbl(), NULL, NULL_IDX, Parameter_Stmt, parse_err_flush(), parse_expr(), expr_semantics_args::rank, Real, Regular_Expr, RPAREN, SET_IMPL_TYPE, srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, target_array_idx, target_char_len_idx, target_type_idx, Tok_Class_Id, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_CHAR_CLASS, TYP_IDX, TYP_TYPE, Unknown_Char, XREF_RECS, and xref_state.
void parse_sequence_stmt | ( | void | ) |
Definition at line 2911 of file p_dcls.c.
References AT_OBJ_NAME_PTR, ATT_FIRST_CPNT_IDX, ATT_SEQUENCE_SET, CURR_BLK, CURR_BLK_NAME, Derived_Type_Blk, EOS, EOS_STR, Error, Find_EOS, Func_Entry, Func_Exit, iss_blk_stk_err(), LA_CH_VALUE, NEXT_LA_CH, NULL, NULL_IDX, parse_err_flush(), PRINTMSG(), token, TOKEN_COLUMN, TOKEN_LINE, TRACE, and TRUE.
void parse_stmt_func_stmt | ( | int | sf_attr_idx, |
int | sf_name_idx | ||
) |
Definition at line 2969 of file p_dcls.c.
References AT_ATTR_LINK, AT_DCL_ERR, AT_ELEMENTAL_INTRIN, AT_IS_DARG, AT_IS_INTRIN, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, AT_TYPED, ATD_CLASS, ATD_SEEN_OUTSIDE_IMP_DO, ATD_SF_DARG, ATD_SF_LINK, ATD_TYPE_IDX, ATP_FIRST_IDX, ATP_NUM_DARGS, ATS_SF_FLD, ATS_SF_IDX, Char_Rslt_Bound_Ref, cif_flags, CIF_Statement_Function_Stmt, cif_stmt_type_rec(), CIF_Symbol_Declaration, CIF_Symbol_Is_Dummy_Arg, cif_usage_rec(), COMMA, COPY_COMMON_ATTR_INFO, CREATE_ERR_ATTR, CURR_BLK, curr_stmt_category, Data_Obj, Declaration_Stmt_Cat, Dummy_Argument, EOS, EOS_STR, Error, EXIT, expr_mode, FALSE, Find_Comma_Rparen, Find_EOS, fnd_semantic_err(), Func_Entry, Func_Exit, iss_blk_stk_err(), LA_CH_VALUE, LN_ATTR_IDX, LN_DEF_LOC, matched_specific_token(), MATCHED_TOKEN_CLASS, MISC_RECS, NEXT_LA_CH, NTR_ATTR_TBL, NTR_SN_TBL, ntr_sym_tbl(), NULL, NULL_IDX, Obj_Sf_Darg, Obj_Stmt_Func, OPND_FLD, OPND_IDX, parse_err_flush(), parse_expr(), PRINTMSG(), Regular_Expr, remove_ln_ntry(), RPAREN, SET_IMPL_TYPE, SN_ATTR_IDX, SN_COLUMN_NUM, SN_LINE_NUM, SN_NAME_IDX, SN_NAME_LEN, srch_kwd_name(), srch_sym_tbl(), statement_number, STMT_CANT_BE_IN_BLK, Stmt_Func, Stmt_Func_Expr, Stmt_Func_Stmt, STMT_OUT_OF_ORDER, stmt_type, Tok_Class_Id, Tok_Class_Punct, Tok_Punct_Eq, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and XREF_RECS.
Referenced by parse_assignment_stmt().
void parse_type_dcl_stmt | ( | void | ) |
Definition at line 3225 of file p_dcls.c.
References After, Allocatable_Attr, Ansi, array_bounds_resolution(), Assumed_Size_Char, AT_ATTR_LINK, AT_CIF_SYMBOL_ID, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_DEFINED, AT_IS_INTRIN, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, AT_TYPED, AT_WORK_IDX, ATD_ARRAY_IDX, ATD_PE_ARRAY_IDX, ATD_SEEN_OUTSIDE_IMP_DO, ATD_TYPE_IDX, ATP_RSLT_IDX, Automatic_Attr, BD_ARRAY_CLASS, BD_RANK, Call_Opr, Ch_Class_Letter, char_bounds_resolution(), Char_Rslt_Bound_Ref, Character, Character_1, check_type_conversion, cif_flags, cif_stmt_type_rec(), CIF_Symbol_Declaration, CIF_Symbol_Modification, CIF_Symbol_Reference, CIF_Type_Declaration_Stmt, CIF_Type_Stmt, cif_usage_rec(), CLEAR_ATTR_NTRY, cmd_line_flags, Co_Array_Attr, cmd_line_flags_entry::co_array_fortran, colon_recovery, COMMA, comp_gen_expr, Complex, Const_Len_Char, COPY_ATTR_NTRY, COPY_BD_NTRY, COPY_OPND, Cpnt_Decl_Stmt, CURR_BLK, curr_stmt_category, curr_stmt_sh_idx, Data_Obj, Data_Stmt, Declaration_Stmt_Cat, Deferred_Shape, Derived_Type_Blk, EOS, EOS_STR, EQUAL, Error, EXIT, expr_mode, expr_semantics(), External_Attr, FALSE, Find_Comma, Find_EOS, Func_Entry, Func_Exit, gen_sh(), GT, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_Tbl_Idx, Init_Opr, Init_Stmt_Cat, Initialization_Expr, Integer, Intent_Attr, Intent_Unseen, Interface, Intrinsic_Attr, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, iss_blk_stk_err(), issue_undefined_type_msg(), LA_CH_BUF_IDX, LA_CH_CLASS, LA_CH_COLUMN, LA_CH_LINE, LA_CH_STMT_NUM, LA_CH_VALUE, LBRKT, LN_DEF_LOC, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, merge_access(), merge_allocatable(), merge_automatic(), merge_co_array(), merge_data(), merge_dimension(), merge_external(), merge_intent(), merge_intrinsic(), merge_optional(), merge_parameter(), merge_pointer(), merge_save(), merge_target(), merge_type(), merge_volatile(), MISC_RECS, new_intent, NEXT_LA_CH, ntr_array_in_bd_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), ntr_type_tbl(), NULL, NULL_IDX, Null_Opr, OPND_FLD, OPND_IDX, Optional_Attr, Parameter_Attr, parse_array_spec(), parse_attr_spec(), parse_cpnt_dcl_stmt(), parse_derived_type_stmt(), parse_err_flush(), parse_expr(), parse_initializer(), parse_length_selector(), parse_pe_array_spec(), parse_type_spec(), parse_typed_function_stmt(), Pgm_Unit, Pointer_Attr, PRINTMSG(), Private, Private_Attr, Public, Public_Attr, expr_semantics_args::rank, Real, Regular_Expr, reserve_array_ntry(), reset_lex(), RPAREN, Save_Attr, SET_IMPL_TYPE, SH_COL_NUM, SH_COMPILER_GEN, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_STMT_TYPE, SLASH, srch_sym_tbl(), STAR, statement_number, STMT_CANT_BE_IN_BLK, stmt_has_double_colon(), STMT_OUT_OF_ORDER, stmt_type, Structure, Sub_Func_Stmt_Cat, target_array_idx, Target_Attr, target_char_len_idx, target_type_idx, Tok_Class_Id, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Character, Tok_Kwd_Elemental, Tok_Kwd_Function, Tok_Kwd_Pure, Tok_Kwd_Recursive, Tok_Kwd_Type, Tok_Punct_Colon_Colon, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, TYP_CHAR_CLASS, TYP_DCL_VALUE, TYP_DESC, TYP_IDX, TYP_TYPE, TYP_WORK_IDX, Type_Decl_Stmt, Type_Init_Stmt, TYPELESS_DEFAULT_TYPE, Unknown_Char, Volatile_Attr, XREF_RECS, and xref_state.
void parse_use_stmt | ( | void | ) |
Definition at line 3980 of file p_dcls.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AL_PREV_MODULE_IDX, AT_MODULE_IDX, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_ORIG_NAME_IDX, AT_ORIG_NAME_LEN, AT_REFERENCED, AT_Tbl_Idx, AT_USE_ASSOCIATED, ATP_GLOBAL_ATTR_IDX, ATP_MODULE_STR_IDX, ATP_PGM_UNIT, ATP_SCP_IDX, ATP_USE_LIST, ATP_USE_TYPE, check_for_duplicate_renames(), check_global_pgm_unit(), cif_flags, CIF_Symbol_Reference, cif_usage_rec(), COLON, COMMA, CREATE_ERR_ATTR, CURR_BLK, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, EOS, EOS_STR, Error, EXIT, FALSE, Find_Comma, Find_EOS, Func_Entry, Func_Exit, GN_NAME_IDX, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPR, IR_TYPE_IDX, iss_blk_stk_err(), LA_CH_VALUE, LN_DEF_LOC, MAKE_EXTERNAL_NAME, make_ro_entry(), matched_specific_token(), MATCHED_TOKEN_CLASS, Module, NEXT_LA_CH, NTR_ATTR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, parse_err_flush(), parse_only_spec(), Pgm_Unit, PRINTMSG(), Referenced, reset_lex(), RO_RENAME_IDX, SCP_USED_MODULE_LIST, SH_IR_IDX, SH_P2_SKIP_ME, srch_sym_tbl(), STMT_CANT_BE_IN_BLK, STMT_OUT_OF_ORDER, stmt_start_col, stmt_start_line, Tok_Class_Id, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Only, Tok_Punct_Rename, token, TOKEN_BUF_IDX, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STMT_NUM, TOKEN_STR, TRACE, TRUE, TYPELESS_DEFAULT_TYPE, Use_All, Use_Not, Use_Only, Use_Opr, Use_Renamed, Use_Stmt, Use_Stmt_Cat, and XREF_RECS.
static void retype_attr | ( | int | attr_idx | ) | [static] |
Definition at line 2278 of file p_dcls.c.
References AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_TYPED, ATD_CLASS, ATD_SYMBOLIC_CONSTANT, ATD_TYPE_IDX, ATP_PGM_UNIT, ATP_RSLT_IDX, ATP_RSLT_NAME, Compiler_Tmp, Constant, Data_Obj, Error, Func_Entry, Func_Exit, Function, get_basic_type_str(), Not_Referenced, NULL, Pgm_Unit, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.
Referenced by parse_implicit_stmt().