Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
typedef enum act_arg_values act_arg_type |
Definition at line 290 of file s_globals.h.
typedef struct arg_strct arg_strct_type |
Definition at line 222 of file s_globals.h.
typedef struct stmt_tmp_entry stmt_tmp_tbl_type |
Definition at line 254 of file s_globals.h.
enum act_arg_values |
Definition at line 263 of file s_globals.h.
void add_substring_length | ( | int | ) |
Definition at line 3669 of file s_asg_expr.c.
References CG_INTEGER_DEFAULT_TYPE, CIF_No_Usage_Rec, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, copy_subtree(), EXIT, expr_mode, expr_semantics(), Func_Entry, Func_Exit, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Max_Opr, Minus_Opr, NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, Plus_Opr, expr_semantics_args::rank, Regular_Expr, TRACE, and xref_state.
Referenced by gen_whole_substring(), substring_opr_handler(), and transform_char_sequence_ref().
void allocate_stmt_semantics | ( | void | ) |
Definition at line 123 of file s_ctl_flow.c.
References ADD_ATTR_TO_LOCAL_LIST, After, Alloc_Obj_Opr, Allocate_Attr_Idx, ALLOCATE_LIB_ENTRY, ALLOCATE_NAME_LEN, asg_opnd_to_tmp(), Asg_Opr, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_PE_ARRAY_IDX, ATD_PTR_ASSIGNED, ATD_PTR_IDX, ATD_PURE, ATD_TYPE_IDX, ATD_VARIABLE_TMP_IDX, ATP_PURE, ATT_DEFAULT_INITIALIZED, ATT_POINTER_CPNT, BD_LB_IDX, BD_LEN_IDX, BD_RANK, BD_SM_IDX, BD_UB_IDX, BD_XT_IDX, Before, CG_INTEGER_DEFAULT_TYPE, check_stat_variable(), CIF_No_Usage_Rec, CIF_Symbol_Modification, cmp_ref_trees(), CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, create_lib_entry_attr(), curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Dv_Access_Base_Addr, Dv_Deref_Opr, Dv_Set_A_Contig, Dv_Set_Extent, Dv_Set_Low_Bound, Dv_Set_Stride_Mult, Error, EXIT, expr_semantics(), FALSE, find_base_attr(), find_left_attr(), find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, gen_alloc_header_const(), gen_Dv_Set_stmt(), gen_dv_whole_def_init(), gen_ir(), gen_opnd(), gen_split_alloc(), gen_whole_subscript(), glb_tbl_idx, size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PE_SUBSCRIPT, IL_PREV_LIST_IDX, IL_Tbl_Idx, Integer_8, Internal, 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_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Max_Opr, Minus_Opr, Mult_Opr, NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Plus_Opr, PRINTMSG(), process_cpnt_inits(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SCP_ATTR_IDX, set_stride_for_first_dim(), set_up_allocate_as_call(), SH_IR_IDX, stride, Structure, TRACE, TRUE, TYP_IDX, TYP_TYPE, Whole_Subscript_Opr, Whole_Substring_Opr, and xref_state.
void analyse_loops | ( | opnd_type * | , |
opnd_type * | , | ||
size_level_type * | |||
) |
Definition at line 1514 of file s_rcnstrct.c.
References analyse_loops(), And_Opr, Array_Construct_Opr, AT_Tbl_Idx, Band_Opr, Beqv_Opr, Bneqv_Opr, Bnot_Opr, Bor_Opr, Call_Opr, check_for_dependencies(), CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, compare_cn_and_value(), Concat_Opr, Constant_Array_Construct_Opr, Constant_Struct_Construct_Opr, COPY_OPND, determine_slice_size(), Div_Opr, Eq_Opr, Eqv_Opr, EXIT, find_opnd_line_and_column(), Func_Entry, Func_Exit, Ge_Opr, gen_ir(), Gt_Opr, Guess_Size, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Implied_Do_Opr, 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_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Le_Opr, Lg_Opr, Lt_Opr, Max_Opr, Minus_Opr, Mult_Opr, Ne_Opr, Neqv_Opr, NO_Tbl_Idx, Not_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, null_opnd, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Or_Opr, Paren_Opr, Plus_Opr, Power_Opr, SA_INTEGER_DEFAULT_TYPE, Section_Subscript_Opr, Simple_Expr_Size, Struct_Construct_Opr, Struct_Opr, Subscript_Opr, Substring_Opr, TRACE, TYPELESS_DEFAULT_TYPE, Uminus_Opr, Uplus_Opr, Whole_Subscript_Opr, and Whole_Substring_Opr.
Referenced by analyse_loops(), array_construct_opr_handler(), and determine_slice_size().
void arith_if_stmt_semantics | ( | void | ) |
Definition at line 701 of file s_ctl_flow.c.
References cast_typeless_constant(), CG_INTEGER_DEFAULT_TYPE, chk_for_unlabeled_stmt(), CIF_Symbol_Reference, CN_CONST, COPY_OPND, curr_stmt_sh_idx, Error, expr_semantics(), FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, Integer, INTEGER_DEFAULT_TYPE, IR_COL_NUM, IR_IDX_L, IR_LINE_NUM, IR_OPND_L, expr_semantics_args::linear_type, Long_Typeless, ntr_const_tbl(), NULL, PRINTMSG(), expr_semantics_args::rank, Real, SH_IR_IDX, Short_Typeless_Const, TRACE, expr_semantics_args::type, Typeless, and xref_state.
void assign_stmt_semantics | ( | void | ) |
Definition at line 799 of file s_ctl_flow.c.
References Aloc_Opr, Asg_Opr, AT_DCL_ERR, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ASSIGN_TMP_IDX, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATL_CLASS, ATL_EXECUTABLE, ATL_FORMAT_TMP, ATL_IN_ASSIGN_LBL_CHAIN, ATL_NEXT_ASG_LBL_IDX, check_for_legal_define(), CIF_Symbol_Reference, CN_Tbl_Idx, COPY_OPND, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Error, expr_semantics(), find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_compiler_tmp(), Integer_8, INTEGER_DEFAULT_TYPE, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Lbl_Format, expr_semantics_args::linear_type, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SCP_ASSIGN_LBL_CHAIN, SCP_SB_STACK_IDX, SH_IR_IDX, Shared, stmt_start_col, stmt_start_line, storage_bit_size_tbl, TRACE, TRUE, TYP_LINEAR, and xref_state.
void assignment_stmt_semantics | ( | void | ) |
Definition at line 198 of file s_asg_expr.c.
References active_forall_sh_idx, Ansi, ASG_EXTN, Asg_Opr, ASG_TYPE, Assignment_Stmt, AT_DEFINED, AT_IS_INTRIN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATD_CLASS, ATD_PE_ARRAY_IDX, ATD_POINTER, ATD_PTR_ASSIGNED, ATD_PURE, ATD_SYMBOLIC_CONSTANT, ATD_TARGET, ATD_TYPE_IDX, ATL_DEF_STMT_IDX, ATL_INFORM_ONLY, ATL_TOP_OF_LOOP, ATP_ELEMENTAL, ATP_PURE, ATP_RSLT_IDX, ATT_CHAR_SEQ, Before, Call_Opr, Call_Stmt, cast_typeless_constant(), change_asg_to_where(), expr_semantics_args::char_len, Character, check_dependence(), check_for_legal_define(), check_where_conformance(), CIF_Array_Assignment_Stmt, CIF_Assignment_Stmt, cif_flags, cif_stmt_type_rec(), CIF_Symbol_Modification, CIF_Symbol_Reference, CN_Tbl_Idx, compare_derived_types(), expr_semantics_args::constant, Continue_Stmt, COPY_OPND, copy_subtree(), CRI_Ch_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, defer_stmt_expansion, dump_flags, Dv_Deref_Opr, Err_Res, Error, EXIT, expr_semantics(), dump_flags_entry::f_minus_minus, FALSE, find_base_attr(), find_left_attr(), find_opnd_line_and_column(), opnd_entry::fld, fold_relationals(), Func_Entry, Func_Exit, gen_dv_whole_def_init(), gen_forall_if_mask(), gen_forall_loops(), gen_forall_tmp(), gen_internal_lbl(), gen_ir(), gen_opnd(), gen_sh(), get_basic_type_str(), idx, opnd_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_Tbl_Idx, Integer, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, Label_Opr, expr_semantics_args::linear_type, look_for_real_div(), MISC_RECS, Ne_Opr, Not_Referenced, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, expr_semantics_args::pointer, PRINTMSG(), process_deferred_functions(), Ptr_Asg_Opr, expr_semantics_args::rank, Real, expr_semantics_args::reference, resolve_ext_opr(), SCP_ATTR_IDX, set_directives_on_label(), SH_COMPILER_GEN, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, SH_STMT_TYPE, expr_semantics_args::shape, Short_Typeless_Const, statement_number, Struct_Component, Structure, Structure_Type, expr_semantics_args::target, expr_semantics_args::tmp_reference, TRACE, transform_char_sequence_ref(), transform_cri_ch_ptr(), TRUE, TYP_FLD, TYP_IDX, TYP_LINEAR, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, expr_semantics_args::vector_subscript, where_ir_idx, Whole_Subscript_Opr, Whole_Substring_Opr, and xref_state.
void backspace_stmt_semantics | ( | void | ) |
Definition at line 108 of file s_io.c.
References add_alt_return_lbl(), Alt_Return_Opr, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, Backspace, Backspace_Opr, Before, Br_True_Opr, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, curr_scp_idx, curr_stmt_sh_idx, enlarge_call_list_tables(), enlarge_info_list_table(), Eq_Opr, err_attr_idx, err_list_idx, FALSE, final_arg_work(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), If_Stmt, IL_OPND, io_ctl_list_semantics(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, LOGICAL_DEFAULT_TYPE, max_call_list_size, NTR_IR_TBL, NULL, Priv, Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, and TRUE.
void blockdata_stmt_semantics | ( | void | ) |
Definition at line 81 of file s_dcl_pu.c.
References Func_Entry, Func_Exit, NULL, and TRACE.
void buffer_stmt_semantics | ( | void | ) |
Definition at line 273 of file s_io.c.
References arg_info_list, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, ATD_TYPE_IDX, Buffer_Desc, Buffer_In_Attr_Idx, Buffer_In_Opr, Buffer_Out_Opr, cast_to_cg_default(), cast_typeless_constant(), CG_INTEGER_DEFAULT_TYPE, Character, CIF_Symbol_Modification, CIF_Symbol_Reference, CN_Tbl_Idx, CN_TYPE_IDX, compare_cn_and_value(), expr_semantics_args::constant, COPY_OPND, create_io_call_descriptor(), curr_scp_idx, curr_stmt_sh_idx, arg_strct::ed, enlarge_call_list_tables(), enlarge_info_list_table(), Error, expr_semantics(), FALSE, final_arg_work(), find_base_attr(), find_opnd_line_and_column(), expr_semantics_args::foldable, Func_Entry, Func_Exit, glb_tbl_idx, IL_ARG_DESC_IDX, IL_ARG_DESC_VARIANT, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, init_arg_info, init_exp_desc, Integer, Integer_8, INTEGER_DEFAULT_TYPE, IO_TYPE_CODE_TYPE, IR_IDX_L, IR_IDX_R, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, expr_semantics_args::linear_type, Long_Typeless, Lt_Opr, make_io_type_code(), max_call_list_size, arg_strct::maybe_modified, ntr_const_tbl(), NTR_IR_LIST_TBL, NULL, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SCP_DOES_IO, SH_IR_IDX, Short_Typeless_Const, storage_bit_size_tbl, Structure, TRACE, TRUE, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, Typeless, TYPELESS_DEFAULT_TYPE, and xref_state.
boolean call_list_semantics | ( | opnd_type * | , |
expr_arg_type * | , | ||
boolean | |||
) |
Definition at line 127 of file s_call.c.
References ADD_ATTR_TO_LOCAL_LIST, AL_ATTR_IDX, AL_NEXT_IDX, expr_semantics_args::allocatable, Aloc_Opr, Alt_Return_Opr, Amax0_Intrinsic, Amax1_Intrinsic, Ansi, arg_info_list, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list, arg_list_size, Assignment_Stmt, Assumed_Shape, expr_semantics_args::assumed_shape, Assumed_Size, expr_semantics_args::assumed_size, Assumed_Size_Char, AT_ALT_DARG, AT_ATTR_LINK, AT_CIF_SYMBOL_ID, AT_COMPILER_GEND, AT_DCL_ERR, AT_DEF_IN_CHILD, AT_DEFINED, AT_ELEMENTAL_INTRIN, AT_HOST_ASSOCIATED, AT_IGNORE_ATTR_LINK, AT_IS_DARG, AT_IS_INTRIN, AT_LOCKED_IN, AT_MODULE_IDX, AT_NAME_IDX, AT_NAME_LEN, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME, AT_OBJ_NAME_PTR, AT_OPTIONAL, AT_REF_IN_CHILD, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, AT_USE_ASSOCIATED, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_FUNC_IDX, ATD_IM_A_DOPE, ATD_INTENT, ATD_POINTER, ATD_STOR_BLK_IDX, ATD_TARGET, ATD_TYPE_IDX, ATI_CIF_SEEN_IN_CALL, ATI_FIRST_SPECIFIC_IDX, ATI_INTERFACE_CLASS, ATI_NUM_SPECIFICS, ATI_USER_SPECIFIED, ATP_ARGCHCK_CALL, ATP_DCL_EXTERNAL, ATP_DUMMY_PROC_LINK, ATP_ELEMENTAL, ATP_EXPL_ITRFC, ATP_EXTERNAL_INTRIN, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_HAS_ALT_RETURN, ATP_IN_INTERFACE_BLK, ATP_INTERFACE_IDX, ATP_INTRIN_ENUM, ATP_NUM_DARGS, ATP_PGM_UNIT, ATP_PROC, ATP_PURE, ATP_RECURSIVE, ATP_RSLT_IDX, ATP_RSLT_NAME, ATP_SCP_ALIVE, ATP_SCP_IDX, ATP_TASK_SHARED, ATP_VFUNCTION, cdir_switch_entry::autoscope, BD_ARRAY_CLASS, BD_RANK, Before, Bit_Size_Intrinsic, Blockdata, Br_Index_Opr, cdir_switches, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, Character, check_arg_for_co_array(), check_for_elementals(), check_for_legal_define(), cif_call_site_rec(), cif_flags, CIF_No_Usage_Rec, cif_object_rec_for_func_result(), CIF_Symbol_Reference, cif_usage_rec(), Clock_Intrinsic, cmd_line_flags, Cmplx_Intrinsic, CN_CONST, CN_INT_TO_C, CN_Tbl_Idx, CN_TYPE_IDX, cmd_line_flags_entry::co_array_fortran, arg_strct::col, Comment, compare_darg_to_actual_arg(), expr_semantics_args::contig_array, COPY_ATTR_NTRY, COPY_OPND, COPY_SHAPE, copy_subtree(), COPY_TBL_NTRY, create_argchck_descriptor(), CREATE_FUNC_RSLT, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Date_Intrinsic, Dble_Intrinsic, defer_stmt_expansion, Digits_Intrinsic, Dmax1_Intrinsic, expr_semantics_args::dope_vector, Dummy_Proc, arg_strct::ed, enlarge_call_list_tables(), enlarge_info_list_table(), Error, EXIT, expr_mode, expr_semantics(), FALSE, False_Parm_Opr, final_arg_work(), find_base_attr(), find_left_attr(), find_opnd_line_and_column(), flatten_function_call(), fnd_semantic_err(), expr_semantics_args::foldable, Func_Entry, Func_Exit, Function, FUNCTION_MUST_BE_SUBROUTINE, gen_compiler_tmp(), gen_sh(), Generic_Function_Interface, Generic_Subroutine_Interface, Generic_Unknown_Interface, get_char_len(), get_shape_from_attr(), expr_semantics_args::has_symbolic, host_associated_attr_semantics(), Huge_Intrinsic, idx, IL_ARG_DESC_IDX, IL_ARG_DESC_VARIANT, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IM_TYPE_IDX, IMPL_IDX, in_call_list, init_arg_info, init_exp_desc, Initialization_Expr, Integer, Intent_Inout, Intent_Out, Interface, Intern_Proc, Internal, Intrin_Proc, intrinsic_semantics, io_item_must_flatten, IR_ARRAY_SYNTAX, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_INLINE_STATE, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, Irtc_Intrinsic, Jdate_Intrinsic, Kind_Intrinsic, arg_strct::kwd, kwd, Kwd_Opr, Label, expr_semantics_args::label, label_allowed, Lbound_Intrinsic, Len_Intrinsic, arg_strct::line, expr_semantics_args::linear_type, Log2_Images_Intrinsic, Max0_Intrinsic, Max1_Intrinsic, max_call_list_size, Max_Intrinsic, Maxexponent_Intrinsic, arg_strct::maybe_modified, Merge_Intrinsic, Min0_Intrinsic, Min_Intrinsic, Minexponent_Intrinsic, MISC_RECS, Module, Module_Proc, msg_num_entry::msg_num, need_pure_function, no_func_expansion, cdir_switch_entry::no_internal_calls, NO_Tbl_Idx, Not_Referenced, Not_Specified_Sgi, NTR_ATTR_LIST_TBL, NTR_ATTR_TBL, NTR_IR_LIST_TBL, NTR_IR_TBL, NTR_SN_TBL, NULL, NULL_IDX, Null_Intrinsic, null_opnd, msg_num_entry::num_args, Num_Images_Intrinsic, Numarg_Intrinsic, Obj_Use_Extern_Func, Obj_Use_Extern_Subr, Obj_Use_Init_Expr, Obj_Use_Spec_Expr, on_off_flags, OPND_FLD, OPND_IDX, cdir_switch_entry::parallel_region, Pgm_Unit, arg_strct::pgm_unit, Pgm_Unknown, expr_semantics_args::pointer, Precision_Intrinsic, PRINTMSG(), Priv, Program, Radix_Intrinsic, Ranf_Intrinsic, Range_Intrinsic, expr_semantics_args::rank, Real, on_off_flags_entry::recursive, Referenced, Regular_Expr, Rem_Images_Intrinsic, Repeat_Intrinsic, Reshape_Intrinsic, Restricted_Imp_Do_Expr, Rtc_Intrinsic, cmd_line_flags_entry::runtime_arg_call, cmd_line_flags_entry::runtime_argument, SCP_ATTR_IDX, SCP_HAS_CALLS, SCP_SB_DARG_IDX, SCP_SB_STACK_IDX, SCP_TMP_LIST, sec_name_tbl, Section_Subscript_Opr, SET_IMPL_TYPE_IN_SCP, set_inline_state(), set_shape_for_deferred_funcs(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, Shape_Intrinsic, expr_semantics_args::shape_known, SIK_Intrinsic, Size_Intrinsic, SN_ATTR_IDX, SN_NAME_IDX, SN_NAME_LEN, SN_SIBLING_LINK, SOURCE_TO_SOURCE, Specification_Expr, srch_kwd_name(), srch_sym_tbl(), SRK_Intrinsic, stmt_expansion_control_end(), stmt_expansion_control_start(), Stmt_Expansion_Opr, Stmt_Func_Expr, storage_bit_size_tbl, Struct_Opr, Structure, Subroutine, Subscript_Opr, Substring_Opr, expr_semantics_args::target, expr_semantics_args::tmp_reference, TRACE, Transfer_Intrinsic, Trim_Intrinsic, Triplet_Opr, TRUE, TYP_CHAR_CLASS, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, Typeless, TYPELESS_DEFAULT_TYPE, Ubound_Intrinsic, Unknown_Intrinsic, Warning, where_ir_idx, Whole_Subscript_Opr, Whole_Substring_Opr, expr_semantics_args::will_fold_later, within_forall_construct, within_forall_mask_expr, XREF_RECS, and xref_state.
Referenced by call_stmt_semantics(), gen_bounds_check_call(), gen_conform_check_call(), gen_ptr_chk_call(), gen_rbounds_check_call(), and gen_sbounds_check_call().
void call_stmt_semantics | ( | void | ) |
Definition at line 982 of file s_ctl_flow.c.
References call_list_semantics(), CIF_Symbol_Reference, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, init_exp_desc, IR_Tbl_Idx, NULL, OPND_FLD, OPND_IDX, SH_IR_IDX, TRACE, and xref_state.
void case_stmt_semantics | ( | void | ) |
Definition at line 1024 of file s_ctl_flow.c.
References AT_Tbl_Idx, Case_Range_Opr, case_value_range_semantics(), cast_typeless_constant(), Character, CIF_Symbol_Reference, CN_BOZ_CONSTANT, CN_CONST, CN_Tbl_Idx, CN_TYPE_IDX, expr_semantics_args::constant, COPY_OPND, curr_stmt_sh_idx, Eq_Opr, Error, EXIT, expr_mode, expr_semantics(), find_opnd_line_and_column(), fold_relationals(), Func_Entry, Func_Exit, Gt_Opr, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Initialization_Expr, insert_on_left(), Integer, INTEGER_DEFAULT_TYPE, Internal, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, Logical, Lt_Opr, NO_Tbl_Idx, NTR_IR_LIST_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, Regular_Expr, SH_ERR_FLG, SH_IR_IDX, SH_PARENT_BLK_IDX, Short_Typeless_Const, THIS_IS_TRUE, TRACE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, Typeless, and xref_state.
void cast_opnd_to_type_idx | ( | opnd_type * | , |
int | |||
) |
Definition at line 8416 of file s_utils.c.
References AT_Tbl_Idx, ATD_TYPE_IDX, cast_to_type_idx(), CN_Tbl_Idx, CN_TYPE_IDX, find_opnd_line_and_column(), Func_Entry, Func_Exit, init_exp_desc, Internal, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, NULL, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, TRACE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, and expr_semantics_args::type_idx.
Referenced by create_scalar_type_tbl(), doall_cmic_semantics(), doparallel_cmic_semantics(), dshiftl_intrinsic(), generate_bounds_list(), ibits_intrinsic(), ibset_intrinsic(), ieee_real_intrinsic(), ishftc_intrinsic(), lbound_intrinsic(), namelist_static_dv_whole_def(), shape_intrinsic(), size_intrinsic(), and ubound_intrinsic().
void cast_to_cg_default | ( | opnd_type * | , |
expr_arg_type * | |||
) |
Definition at line 8309 of file s_utils.c.
References CG_INTEGER_DEFAULT_TYPE, CN_CONST, CN_Tbl_Idx, COPY_OPND, Cvrt_Opr, FALSE, find_opnd_line_and_column(), folder_driver(), Func_Entry, Func_Exit, Integer, IR_ARRAY_SYNTAX, IR_COL_NUM, IR_LINE_NUM, IR_OPND_L, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, Logical, ntr_const_tbl(), NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, expr_semantics_args::rank, expr_semantics_args::reference, storage_bit_size_tbl, expr_semantics_args::tmp_reference, TRACE, TRUE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, and expr_semantics_args::type_idx.
Referenced by all_intrinsic(), buffer_stmt_semantics(), change_section_to_do(), cshift_intrinsic(), eoshift_intrinsic(), gen_whole_subscript(), index_intrinsic(), io_ctl_list_semantics(), io_list_semantics(), lbound_intrinsic(), ranget_intrinsic(), repeat_intrinsic(), return_stmt_semantics(), selected_real_kind_intrinsic(), size_intrinsic(), spread_intrinsic(), subscript_opr_handler(), transfer_intrinsic(), triplet_opr_handler(), and ubound_intrinsic().
void change_asg_to_where | ( | int | ) |
Definition at line 2177 of file s_call.c.
References Call_Opr, COPY_OPND, Func_Entry, Func_Exit, IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_FLD_L, IR_IDX_L, IR_IDX_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NTR_IR_LIST_TBL, NULL, null_opnd, TRACE, where_ir_idx, and Where_Opr.
Referenced by assignment_stmt_semantics(), check_for_elementals(), and flatten_function_call().
void change_section_to_this_element | ( | opnd_type * | , |
opnd_type * | , | ||
int | |||
) |
Definition at line 10709 of file s_utils.c.
References C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, change_section_to_this_element(), CIF_No_Usage_Rec, CN_Tbl_Idx, COPY_OPND, copy_subtree(), expr_semantics(), find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_ir(), gen_opnd(), IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, IL_VECTOR_SUBSCRIPT, init_exp_desc, Internal, IR_COL_NUM, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_OPND_L, IR_OPR, IR_RANK, IR_Tbl_Idx, just_find_dope_and_rank(), Mult_Opr, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Plus_Opr, PRINTMSG(), expr_semantics_args::rank, Subscript_Opr, TRACE, Triplet_Opr, and xref_state.
Referenced by change_section_to_this_element(), and optimize_reshape().
Definition at line 10526 of file s_utils.c.
References AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_CLASS, ATD_FORALL_INDEX, ATD_INTENT, ATD_LIVE_DO_VAR, ATD_PURE, ATD_SYMBOLIC_CONSTANT, ATP_PURE, Constant, COPY_OPND, curr_scp_idx, Data_Obj, Dummy_Argument, Error, FALSE, Func_Entry, Func_Exit, Intent_In, IR_OPND_L, IR_Tbl_Idx, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, PRINTMSG(), SCP_ATTR_IDX, TRACE, TRUE, and Variable.
Referenced by assign_stmt_semantics(), assignment_stmt_semantics(), call_list_semantics(), check_stat_variable(), do_read_namelist_semantics(), do_stmt_semantics(), encode_decode_stmt_semantics(), inquire_stmt_semantics(), io_ctl_list_semantics(), and io_list_semantics().
Definition at line 10885 of file s_ctl_flow.c.
References AT_OBJ_CLASS, ATD_ARRAY_IDX, ATD_CLASS, BD_RANK, BD_XT_FLD, BD_XT_IDX, CN_Tbl_Idx, Compiler_Tmp, Data_Obj, FALSE, find_left_attr(), fold_relationals(), Func_Entry, Func_Exit, Internal, IR_COL_NUM, IR_LINE_NUM, IR_OPND_L, Ne_Opr, NULL, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, expr_semantics_args::shape, TRACE, TRUE, and where_ir_idx.
Referenced by assignment_stmt_semantics(), else_stmt_semantics(), and where_stmt_semantics().
void cif_object_rec_for_func_result | ( | int | ) |
Definition at line 6666 of file fecif.c.
References AT_CIF_DONE, AT_REFERENCED, ATP_RSLT_IDX, cif_send_attr(), FALSE, Func_Entry, Func_Exit, NULL, NULL_IDX, Referenced, and TRACE.
Referenced by call_list_semantics(), and resolve_ext_opr().
void close_stmt_semantics | ( | void | ) |
Definition at line 585 of file s_io.c.
References add_alt_return_lbl(), Alt_Return_Opr, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, Before, Br_True_Opr, CG_INTEGER_DEFAULT_TYPE, Close, Close_Desc, Close_Opr, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, create_io_call_descriptor(), curr_scp_idx, curr_stmt_sh_idx, enlarge_call_list_tables(), enlarge_info_list_table(), Eq_Opr, err_attr_idx, err_list_idx, FALSE, final_arg_work(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), If_Stmt, IL_OPND, io_ctl_list_semantics(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, LOGICAL_DEFAULT_TYPE, max_call_list_size, NTR_IR_TBL, NULL, Priv, Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, and TRUE.
boolean cmp_ref_trees | ( | opnd_type * | , |
opnd_type * | |||
) |
Definition at line 1243 of file s_utils.c.
References AT_Tbl_Idx, cmp_ref_trees(), CN_Tbl_Idx, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, Internal, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NO_Tbl_Idx, NULL, NULL_IDX, OPND_FLD, OPND_IDX, OPND_LIST_CNT, PRINTMSG(), SH_Tbl_Idx, TRACE, and TRUE.
Referenced by allocate_stmt_semantics(), cmp_ref_trees(), and deallocate_stmt_semantics().
boolean compare_dummy_arguments | ( | int | , |
int | |||
) |
Definition at line 4002 of file s_dcls.c.
References AT_OBJ_CLASS, ATD_CLASS, ATD_IGNORE_TKR, ATP_EXPL_ITRFC, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_NUM_DARGS, ATP_PGM_UNIT, ATP_RSLT_IDX, compare_darg_or_rslt_types(), compare_dummy_arguments(), Data_Obj, Dummy_Argument, FALSE, Func_Entry, Func_Exit, Function, NULL, Pgm_Unit, Pgm_Unknown, SN_ATTR_IDX, TRACE, and TRUE.
Referenced by compare_dummy_arguments(), compare_duplicate_interface_bodies(), and verify_interface().
void continue_stmt_semantics | ( | void | ) |
Definition at line 1407 of file s_ctl_flow.c.
References AT_DEF_COLUMN, AT_DEF_LINE, curr_stmt_sh_idx, Func_Entry, Func_Exit, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_COMPILER_GEN, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, and TRACE.
int create_alloc_descriptor | ( | int | , |
int | , | ||
int | , | ||
boolean | |||
) |
Definition at line 7839 of file s_ctl_flow.c.
References Asg_Opr, Assignment_Stmt, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_LB_FLD, BD_LB_IDX, BD_LEN_FLD, BD_LEN_IDX, BD_LINE_NUM, BD_RANK, BD_RESOLVED, BD_SM_FLD, BD_SM_IDX, BD_UB_FLD, BD_UB_IDX, BD_XT_FLD, BD_XT_IDX, Before, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ONE_IDX, CN_INTEGER_TWO_IDX, CN_Tbl_Idx, Constant_Size, curr_scp_idx, curr_stmt_sh_idx, Explicit_Shape, FALSE, Func_Entry, Func_Exit, gen_alloc_header_const(), gen_compiler_tmp(), gen_sh(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_Tbl_Idx, Integer_4, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, ntr_array_in_bd_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, PRINTMSG(), Priv, reserve_array_ntry(), SA_INTEGER_DEFAULT_TYPE, SCP_SB_STACK_IDX, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, Subscript_Opr, TRACE, TRUE, and TYP_LINEAR.
Referenced by create_runtime_array_constructor(), and flatten_function_call().
int create_argchck_descriptor | ( | opnd_type * | ) |
Definition at line 8762 of file s_call.c.
References argchck_suppress_msg, Asg_Opr, Assignment_Stmt, AT_DEF_COLUMN, AT_DEF_LINE, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_NUM_DARGS, ATP_PGM_UNIT, ATP_RSLT_IDX, Before, Bor_Opr, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, cmd_line_flags, CN_INTEGER_ONE_IDX, CN_INTEGER_TWO_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, FALSE, find_left_attr(), Func_Entry, Func_Exit, Function, gen_arg_type_descriptor(), gen_call_type_descriptor(), gen_compiler_tmp(), gen_sh(), gen_static_integer_array_tmp(), gen_whole_subscript(), IL_ARG_DESC_IDX, 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, Init_Reloc_Opr, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Loc_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, num_argchck_suppress_msg, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Priv, cmd_line_flags_entry::runtime_arg_count_only, SB_FIRST_ATTR_IDX, SCP_SB_STACK_IDX, set_sb_first_attr_idx(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, Shiftl_Opr, Subscript_Opr, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by call_list_semantics(), insert_argchck_calls(), and resolve_ext_opr().
Definition at line 139 of file s_cnstrct.c.
References Allocate_Stmt, Ansi, Arith_If_Stmt, Array_Construct_Opr, Assignment_Stmt, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_DATA_INIT, ATD_FLD, ATD_SAVED, ATD_STOR_BLK_IDX, ATD_TMP_IDX, ATD_TMP_INIT_NOT_DONE, ATD_TYPE_IDX, Backspace_Stmt, bcast_cn_bit_offset, BD_LB_FLD, BD_LB_IDX, BD_LEN_FLD, BD_LEN_IDX, BD_RANK, BD_RESOLVED, BD_XT_FLD, BD_XT_IDX, Before, bits_in_constructor, broadcast_scalar(), Buffer_Stmt, C_INT_TO_CN, Call_Stmt, Case_Stmt, cast_to_type_idx(), CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, char_result_offset, Character, Character_1, CHARACTER_DEFAULT_TYPE, check_asg_semantics(), check_type_conversion, CLEAR_TBL_NTRY, Close_Stmt, CN_INT_TO_C, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, compare_cn_and_value(), Const_Len_Char, expr_semantics_args::constant, Constant_Struct_Construct_Opr, expr_semantics_args::constructor, expr_semantics_args::constructor_size_level, expr_semantics_args::contig_array, COPY_OPND, copy_subtree(), create_bd_ntry_for_const(), curr_scp_idx, curr_stmt_sh_idx, Data_Stmt, Deallocate_Stmt, Decode_Stmt, defer_stmt_expansion, Do_Infinite_Stmt, Do_Iterative_Stmt, Do_While_Stmt, Else_If_Stmt, Else_Where_Stmt, Encode_Stmt, Endfile_Stmt, EXIT, FALSE, find_left_attr(), find_opnd_line_and_column(), opnd_entry::fld, expr_semantics_args::foldable, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), gen_whole_subscript(), gen_whole_substring(), Gt_Opr, opnd_entry::idx, If_Cstrct_Stmt, If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, increment_count(), init_exp_desc, Init_Opr, init_target_opnd, Inquire_Stmt, insert_subs_ok, Internal, interpret_constructor(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, arg_desc_node::line, expr_semantics_args::linear_type, Long_Typeless, Mult_Opr, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, null_opnd, Nullify_Stmt, Open_Stmt, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Outmoded_If_Stmt, print_cn(), Print_Stmt, PRINTMSG(), process_char_len(), expr_semantics_args::rank, Read_Stmt, Referenced, Rewind_Stmt, SCP_SB_STATIC_INIT_IDX, Select_Stmt, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, Shared, Simple_Expr_Size, single_value_array, single_value_opnd, stmt_type, storage_bit_size_tbl, STORAGE_WORD_SIZE, Structure, Subscript_Opr, target_array_idx, target_char_len_idx, target_type_idx, the_cn_bit_offset, the_cn_idx, expr_semantics_args::tmp_reference, TRACE, TRUE, TYP_BIT_LEN, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, expr_semantics_args::type, expr_semantics_args::type_idx, type_tbl, Typeless, TYPELESS_DEFAULT_TYPE, unequal_char_lens, Where_Cstrct_Stmt, Where_Stmt, expr_semantics_args::will_fold_later, words_in_constructor, Write_Stmt, and zero.
Referenced by array_construct_opr_handler(), check_for_constructors(), create_array_constructor_asg(), optimize_whole_array_init(), and struct_construct_opr_handler().
int create_equiv_stor_blk | ( | int | , |
sb_type_type | |||
) |
Definition at line 8562 of file s_dcls.c.
References AT_DEF_COLUMN, AT_DEF_LINE, CREATE_ID, curr_scp_idx, Equivalenced, Func_Entry, Func_Exit, ntr_stor_blk_tbl(), NULL, SB_EQUIVALENCED, SB_MODULE, SCP_SB_STATIC_IDX, Stack, id_str_entry::string, TRACE, and TRUE.
Referenced by attr_semantics(), equivalence_semantics(), init_whole_array(), and transform_cri_ch_ptr().
void create_loop_stmts | ( | int | , |
opnd_type * | , | ||
opnd_type * | , | ||
opnd_type * | , | ||
int | , | ||
int | |||
) |
Definition at line 5405 of file s_utils.c.
References After, Asg_Opr, Assignment_Stmt, AT_DEFINED, AT_Tbl_Idx, ATD_CLASS, ATD_TYPE_IDX, ATL_CONSTRUCTOR_LOOP, ATL_DEF_STMT_IDX, Before, Br_True_Opr, cast_typeless_constant(), CG_INTEGER_DEFAULT_TYPE, CIF_No_Usage_Rec, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, Compiler_Tmp, Continue_Stmt, COPY_OPND, curr_stmt_sh_idx, Div_Opr, Do_Iterative_Stmt, expr_semantics(), FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, GEN_COMPILER_TMP_ASG, gen_internal_lbl(), gen_ir(), gen_opnd(), gen_sh(), IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, in_constructor, IR_OPND_R, IR_Tbl_Idx, Label_Opr, Le_Opr, LOGICAL_DEFAULT_TYPE, Loop_End_Opr, Loop_Info_Opr, Lt_Opr, Minus_Opr, Mult_Opr, NO_Tbl_Idx, NTR_IR_LIST_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Plus_Opr, Priv, SH_IR_IDX, SH_LOOP_END, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_Tbl_Idx, Short_Typeless_Const, stmt_start_col, stmt_start_line, TRACE, TRUE, TYP_LINEAR, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, and xref_state.
Referenced by create_array_constructor_asg(), create_interp_stmts(), expand_imp_do(), gen_dv_def_loops(), and gen_forall_loops().
void create_namelist_descriptor | ( | int | ) |
Definition at line 4775 of file s_io.c.
References After, Aloc_Opr, Asg_Opr, Assignment_Stmt, AT_ATTR_LINK, AT_DEF_COLUMN, AT_DEF_LINE, AT_IGNORE_ATTR_LINK, AT_NAME_LEN, AT_OBJ_NAME_PTR, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATN_FIRST_NAMELIST_IDX, ATN_NAMELIST_DESC, ATN_NUM_NAMELIST, ATP_PGM_UNIT, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, char_len_in_bytes, Character, CN_Tbl_Idx, create_scalar_type_tbl(), create_strct_tbl(), CRI_Ch_Ptr_8, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, FALSE, find_left_attr(), opnd_entry::fld, FREE_SH_NODE, Func_Entry, Func_Exit, gen_array_element_init(), gen_compiler_tmp(), gen_dv_whole_def(), gen_ir(), gen_opnd(), gen_sh(), gen_static_integer_array_tmp(), gen_whole_subscript(), nmlist_group_hdr::icount, opnd_entry::idx, init_exp_desc, Init_Opr, Init_Reloc_Opr, insert_sh_chain_after_entries(), Integer_4, Integer_8, Internal, IR_OPND_L, IR_Tbl_Idx, expr_semantics_args::linear_type, Loc_Opr, Module, namelist_static_dv_whole_def(), NML_GRP_HDR_SIZE, NML_GRP_HDR_SIZE_FCD2, NML_GRP_ITEM_SIZE, NML_GRP_ITEM_SIZE_FCD2, NML_VALTYPE_ARRAY, NML_VALTYPE_SCALAR, NML_VALTYPE_STRCT, NML_VALTYPE_STRCT_ARRAY, NO_Tbl_Idx, ntr_const_tbl(), ntr_sh_tbl(), NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, PRINTMSG(), Priv, put_string_in_tmp(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SB_FIRST_ATTR_IDX, SCP_ATTR_IDX, SCP_SB_STACK_IDX, set_sb_first_attr_idx(), SH_COL_NUM, SH_COMPILER_GEN, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, SH_STMT_TYPE, size, SN_ATTR_IDX, SN_SIBLING_LINK, Structure, TRACE, TRUE, two_word_fcd, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, nmlist_goli::valtype, and nmlist_group_hdr::version.
Definition at line 114 of file s_rcnstrct.c.
References ADD_ATTR_TO_LOCAL_LIST, After, Alloc_Opr, expr_semantics_args::allocatable, Allocate_Attr_Idx, ALLOCATE_LIB_ENTRY, ALLOCATE_NAME_LEN, Aloc_Opr, Asg_Opr, assign_storage_blk(), Assignment_Stmt, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_AUTO_BASE_IDX, ATD_AUTOMATIC, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_DEFERRED_1_IDX, BD_FLOW_DEPENDENT, BD_LB_FLD, BD_LB_IDX, BD_LEN_FLD, BD_LEN_IDX, BD_LINE_NUM, BD_RANK, BD_RESOLVED, BD_SM_FLD, BD_SM_IDX, BD_UB_FLD, BD_UB_IDX, BD_XT_FLD, BD_XT_IDX, Before, BITS_TO_WORDS, C_INT_TO_CN, Call_Opr, Call_Stmt, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, char_len_in_bytes, Character, CHARACTER_DEFAULT_TYPE, CLEAR_TBL_NTRY, CN_INTEGER_ONE_IDX, CN_INTEGER_THREE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Complex, Const_Len_Char, size_offset_entry::constant, CONSTRUCTOR_GUESS_SIZE, expr_semantics_args::constructor_size_level, expr_semantics_args::contig_array, COPY_OPND, copy_subtree(), create_alloc_descriptor(), create_array_constructor_asg(), create_bd_ntry_for_const(), create_interp_stmts(), create_lib_entry_attr(), create_tmp_asg(), CRI_Ch_Ptr, CRI_Ptr, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Dealloc_Attr_Idx, DEALLOC_LIB_ENTRY, DEALLOC_NAME_LEN, Dealloc_Opr, Deallocate_Opr, defer_stmt_expansion, determine_tmp_size(), Dv_Access_El_Len, Dv_Deref_Opr, Dv_Set_Extent, Dv_Set_Low_Bound, Dv_Set_Stride_Mult, expand_stmts(), expr_semantics(), FALSE, size_offset_entry::fld, opnd_entry::fld, Func_Entry, Func_Exit, gen_alloc_header_const(), gen_compiler_tmp(), GEN_COMPILER_TMP_ASG, gen_copyin_bounds_stmt(), gen_entry_dope_code(), gen_sh(), gen_whole_subscript(), gen_whole_substring(), glb_tbl_idx, size_offset_entry::idx, opnd_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, in_constructor, init_exp_desc, Integer, Integer_4, Integer_8, Intent_In, Internal, Interp_Loop_Size, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, L, expr_semantics_args::linear_type, Loc_Opr, Logical, Max_Opr, Minus_Opr, Mult_Opr, NO_Tbl_Idx, ntr_array_in_bd_tbl(), ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, PRINTMSG(), Priv, process_char_len(), expr_semantics_args::rank, Real, Realloc_Attr_Idx, REALLOC_LIB_ENTRY, REALLOC_NAME_LEN, expr_semantics_args::reference, reserve_array_ntry(), SA_INTEGER_DEFAULT_TYPE, SCP_SB_BASED_IDX, SCP_SB_STACK_IDX, Section_Subscript_Opr, set_stride_for_first_dim(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, Shiftl_Opr, Simple_Expr_Size, size, stmt_expansion_control_end(), stmt_expansion_control_start(), stmt_start_col, stmt_start_line, storage_bit_size_tbl, STORAGE_WORD_SIZE, stride, Struct_Opr, Structure, Subscript_Opr, Substring_Opr, expr_semantics_args::tmp_reference, TRACE, Triplet_Opr, TRUE, TYP_BIT_LEN, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_ORIG_LEN_IDX, TYP_TYPE, TYP_WORK_IDX, expr_semantics_args::type, size_offset_entry::type_idx, expr_semantics_args::type_idx, type_tbl, Typeless, TYPELESS_DEFAULT_TYPE, Var_Len_Array, Var_Len_Char, Whole_Subscript_Opr, and Whole_Substring_Opr.
Referenced by check_for_constructors().
Definition at line 1446 of file s_rcnstrct.c.
References AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, create_struct_constructor_asg(), curr_scp_idx, defer_stmt_expansion, FALSE, Func_Entry, Func_Exit, gen_compiler_tmp(), IR_COL_NUM, IR_LINE_NUM, IR_TYPE_IDX, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Priv, SCP_SB_STACK_IDX, stmt_expansion_control_end(), stmt_expansion_control_start(), TRACE, and TRUE.
Referenced by check_for_constructors(), and struct_construct_opr_handler().
int create_tmp_asg | ( | opnd_type * | , |
expr_arg_type * | , | ||
opnd_type * | , | ||
int | , | ||
boolean | , | ||
boolean | |||
) |
Definition at line 4851 of file s_call.c.
References After, alloc_block_end_idx, alloc_block_start_idx, Alloc_Opr, Asg_Opr, Assignment_Stmt, AT_DEFINED, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_ASG_TMP, ATD_AUTO_BASE_IDX, ATD_AUTOMATIC, ATD_FLD, ATD_STOR_BLK_IDX, ATD_TMP_IDX, ATT_CHAR_SEQ, BD_LEN_FLD, BD_LEN_IDX, Before, Character, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, expr_semantics_args::constant, expr_semantics_args::contig_array, contig_test_ir_idx, COPY_OPND, copy_subtree(), curr_scp_idx, curr_stmt_sh_idx, Dealloc_Opr, defer_stmt_expansion, determine_tmp_size(), FALSE, find_opnd_line_and_column(), expr_semantics_args::foldable, Func_Entry, Func_Exit, gen_bd_entry(), GEN_COMPILER_TMP_ASG, gen_if_stmt(), gen_opnd(), gen_sh(), gen_whole_subscript(), gen_whole_substring(), get_stmt_tmp(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Intent_In, Intent_Inout, Intent_Out, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, Max_Opr, Ne_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sh_tbl(), NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, orig_sh_idx, PRINTMSG(), Priv, expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SCP_SB_BASED_IDX, expr_semantics_args::section, SH_COL_NUM, SH_COMPILER_GEN, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, SH_STMT_TYPE, stmt_expansion_control_end(), stmt_expansion_control_start(), stmt_start_col, stmt_start_line, Structure, expr_semantics_args::tmp_reference, TRACE, transform_char_sequence_ref(), TRUE, TYP_FLD, TYP_IDX, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, validate_char_len(), where_dealloc_stmt_idx, and expr_semantics_args::will_fold_later.
Referenced by adjustl_intrinsic(), create_runtime_array_constructor(), directive_stmt_semantics(), doall_cmic_semantics(), doparallel_cmic_semantics(), else_stmt_semantics(), encode_decode_stmt_semantics(), expand_io_list(), final_arg_work(), forall_semantics(), gen_assumed_shape_copy(), goto_stmt_semantics(), io_ctl_list_semantics(), make_logical_array_tmp(), mp_directive_semantics(), open_mp_directive_semantics(), optimize_reshape(), parallel_cmic_semantics(), random_seed_intrinsic(), ranget_intrinsic(), select_stmt_semantics(), stmt_func_call_opr_handler(), and where_stmt_semantics().
void data_stmt_semantics | ( | void | ) |
Definition at line 673 of file s_data.c.
References adjust_char_value_len(), After, Ansi, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_TYPE_IDX, BD_LEN_IDX, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, Character, check_target_and_value(), CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, compare_cn_and_value(), size_offset_entry::constant, COPY_OPND, curr_stmt_sh_idx, data_imp_do_semantics(), Data_Stmt, Data_Stmt_Target, Eq_Opr, Error, EXIT, FALSE, find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, gen_section_ref(), gen_sh(), size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IL_VECTOR_SUBSCRIPT, Implied_Do_Opr, Init_Opr, init_whole_array(), IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Mult_Opr, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, null_opnd, obj_count, obj_il_idx, object_semantics(), OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, expr_semantics_args::pointer, PRINTMSG(), expr_semantics_args::rank, rep_factor, section_semantics(), Section_Subscript_Opr, set_global_value_variables(), SH_ERR_FLG, SH_IR_IDX, size_offset_binary_calc(), stmt_start_col, stmt_start_line, stor_bit_size_of(), Struct_Opr, TRACE, TRUE, TYP_TYPE, size_offset_entry::type_idx, TYPELESS_DEFAULT_TYPE, value_il_idx, value_opnd, vv_subscript_semantics(), and Whole_Subscript_Opr.
void deallocate_stmt_semantics | ( | void | ) |
Definition at line 1479 of file s_ctl_flow.c.
References ADD_ATTR_TO_LOCAL_LIST, Aloc_Opr, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_PE_ARRAY_IDX, ATD_PURE, ATP_ELEMENTAL, ATP_PURE, check_stat_variable(), CIF_Symbol_Modification, cmp_ref_trees(), CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, create_lib_entry_attr(), CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Dealloc_Obj_Opr, Deallocate_Attr_Idx, DEALLOCATE_LIB_ENTRY, DEALLOCATE_NAME_LEN, Dv_Deref_Opr, Error, EXIT, expr_semantics(), FALSE, find_left_attr(), find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_alloc_header_const(), gen_split_alloc(), glb_tbl_idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Integer_8, Internal, IR_COL_NUM, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, null_opnd, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SCP_ATTR_IDX, set_up_allocate_as_call(), SH_IR_IDX, TRACE, TRUE, Whole_Subscript_Opr, Whole_Substring_Opr, and xref_state.
void default_init_semantics | ( | int | ) |
Definition at line 310 of file s_typ_init.c.
References After, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CPNT_INIT_IDX, ATD_FLD, ATD_POINTER, ATD_TYPE_IDX, attr_init_semantics(), Character, Character_1, check_type_conversion, CIF_Symbol_Reference, CN_Tbl_Idx, Complex, const_init_semantics(), Const_Len_Char, COPY_OPND, curr_stmt_sh_idx, Error, EXIT, expr_mode, expr_semantics(), FALSE, find_opnd_line_and_column(), expr_semantics_args::foldable, FREE_SH_NODE, Func_Entry, Func_Exit, gen_sh(), Init_Opr, Initialization_Expr, Integer, Internal, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NO_Tbl_Idx, NULL, NULL_IDX, Null_Intrinsic_Opr, Null_Opr, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, Real, Regular_Expr, SH_NEXT_IDX, SH_PREV_IDX, target_array_idx, target_char_len_idx, target_type_idx, TRACE, TRUE, TYP_CHAR_CLASS, TYP_IDX, TYP_TYPE, Type_Init_Stmt, and xref_state.
Referenced by attr_semantics().
void determine_tmp_size | ( | opnd_type * | , |
int | |||
) |
Definition at line 5924 of file s_call.c.
References AT_OBJ_NAME_PTR, ATT_CHAR_SEQ, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BITS_TO_WORDS, C_INT_TO_CN, C_TO_F_INT, CG_INTEGER_DEFAULT_TYPE, Character, CIF_No_Usage_Rec, CN_INTEGER_CHAR_BIT_IDX, CN_Tbl_Idx, size_offset_entry::constant, COPY_OPND, Div_Opr, expr_semantics(), FALSE, find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, size_offset_entry::idx, Internal, IR_COL_NUM, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Mult_Opr, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_TBL, NULL, OPND_FLD, OPND_IDX, Plus_Opr, PRINTMSG(), expr_semantics_args::rank, result, SA_INTEGER_DEFAULT_TYPE, size_offset_binary_calc(), storage_bit_size_tbl, Structure, TRACE, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, size_offset_entry::type_idx, and xref_state.
Referenced by create_runtime_array_constructor(), create_tmp_asg(), flatten_function_call(), and gen_forall_tmp().
void directive_stmt_semantics | ( | void | ) |
Definition at line 98 of file s_directiv.c.
References After, cdir_switch_entry::aggressiveinnerloopfission, Aggressiveinnerloopfission_Opr, cdir_switch_entry::align, Align_Cdir_Opr, Align_Symbol_Star_Opr, assert_semantics(), Assert_Star_Opr, AT_ATTR_LINK, AT_DCL_ERR, AT_IS_INTRIN, AT_LOCKED_IN, AT_NAME_LEN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CACHE_ALIGN, ATD_CACHE_BYPASS_ARRAY, ATD_CLASS, ATD_IN_COMMON, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATI_FIRST_SPECIFIC_IDX, ATI_PROC_IDX, Atomic_Open_Mp_Opr, ATP_PGM_UNIT, ATP_RSLT_IDX, ATP_RSLT_NAME, ATP_SGI_GLOBAL_INLINE, ATP_SGI_GLOBAL_NOINLINE, ATP_SGI_LOCAL_INLINE, ATP_SGI_LOCAL_NOINLINE, ATP_SGI_ROUTINE_INLINE, ATP_SGI_ROUTINE_NOINLINE, Barrier_Open_Mp_Opr, Barrier_Par_Opr, cdir_switch_entry::bl, Bl_Cdir_Opr, cdir_switch_entry::blockable_count, Blockable_Dir_Opr, cdir_switch_entry::blockable_group, cdir_switch_entry::blockable_sh_idx, Blockingsize_Dir_Opr, bounds_cdir_handler(), Bounds_Cdir_Opr, C_INT_TO_CN, Cache_Bypass_Cdir_Opr, cdir_switch_entry::cache_bypass_ir_idx, Cachealign_Cdir_Opr, cdir_switches, CG_INTEGER_DEFAULT_TYPE, CIF_Symbol_Reference, CN_INT_TO_C, CN_INTEGER_NEG_ONE_IDX, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, cdir_switch_entry::cncall, Cncall_Cmic_Opr, compare_cn_and_value(), Complex_8, cdir_switch_entry::concurrent, Concurrent_Cdir_Opr, cdir_switch_entry::concurrent_idx, Concurrentize_Star_Opr, const_safevl_idx, COPY_OPND, copy_to_gl_subtree(), Copyin_Dollar_Opr, create_tmp_asg(), Critical_Open_Mp_Opr, Critical_Section_Par_Opr, curr_gl_stmt_sh_idx, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Dependent_OpenAD_Opr, Directive_Stmt, cdir_switch_entry::do_inline, Do_Omp, Do_Open_Mp_Opr, Doacross, Doacross_Dollar_Opr, cdir_switch_entry::doacross_sh_idx, Doall_Cmic_Opr, doall_cmic_semantics(), cdir_switch_entry::doall_sh_idx, Doparallel_Cmic_Opr, doparallel_cmic_semantics(), Dv_Deref_Opr, Dynamic_Dollar_Opr, end_blk_mp_semantics(), End_Critical_Section_Par_Opr, End_Inline_Here_Star_Opr, End_Parallel_Par_Opr, End_Pdo_Par_Opr, End_Psection_Par_Opr, End_Singleprocess_Par_Opr, Endcritical_Open_Mp_Opr, Enddo_Cmic_Opr, Enddo_Open_Mp_Opr, Endguard_Cmic_Opr, Endmaster_Open_Mp_Opr, Endordered_Open_Mp_Opr, Endparallel_Cmic_Opr, endparallel_cmic_semantics(), Endparallel_Open_Mp_Opr, Endparalleldo_Open_Mp_Opr, Endparallelsections_Open_Mp_Opr, Endparallelworkshare_Open_Mp_Opr, Endsections_Open_Mp_Opr, EndSimple_OpenAD_Opr, Endsingle_Open_Mp_Opr, Endworkshare_Open_Mp_Opr, Eq_Opr, Error, expr_mode, expr_semantics(), FALSE, Fill_Symbol_Star_Opr, find_left_attr(), find_opnd_line_and_column(), Fission_Star_Opr, cdir_switch_entry::fissionable, Fissionable_Star_Opr, Flush_Open_Mp_Opr, Flush_Star_Opr, fold_relationals(), Func_Entry, Func_Exit, Function, cdir_switch_entry::fusable, Fusable_Star_Opr, Fuse_Star_Opr, GA_OBJ_CLASS, GAP_GLOBAL_DIR, GAP_INLINE_STATE, gen_gl_sh(), GL_SH_IR_IDX, GN_ATTR_IDX, Gt_Opr, Guard_Cmic_Opr, cdir_switch_entry::guard_in_par_reg, idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PE_SUBSCRIPT, IL_Tbl_Idx, in_call_list, Independent_OpenAD_Opr, Initialization_Expr, Inline_Cdir_Opr, inline_global_sgi, Inline_Global_Star_Opr, cdir_switch_entry::inline_here_list_idx, cdir_switch_entry::inline_here_sgi, Inline_Here_Star_Opr, Inline_Routine_Star_Opr, Inline_Sgi, Integer, Integer_8, Intent_In, cdir_switch_entry::interchange_count, Interchange_Dir_Opr, cdir_switch_entry::interchange_group, cdir_switch_entry::interchange_sh_idx, Interface, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, cdir_switch_entry::ivdep, Ivdep_Cdir_Opr, Logical, Logical_8, Lt_Opr, cdir_switch_entry::mark, Mark_Cdir_Opr, cdir_switch_entry::mark_dir_idx, Master_Open_Mp_Opr, Module, mp_directive_semantics(), Ne_Opr, cdir_switch_entry::nextscalar, Nextscalar_Cdir_Opr, NO_Tbl_Idx, Nobl_Cdir_Opr, cdir_switch_entry::noblocking, Noblocking_Dir_Opr, Nobounds_Cdir_Opr, Noconcurrentize_Star_Opr, cdir_switch_entry::nofission, Nofission_Star_Opr, cdir_switch_entry::nofusion, Nofusion_Star_Opr, Noinline_Cdir_Opr, noinline_global_sgi, Noinline_Global_Star_Opr, cdir_switch_entry::noinline_here_list_idx, cdir_switch_entry::noinline_here_sgi, Noinline_Here_Star_Opr, Noinline_Routine_Star_Opr, Noinline_Sgi, cdir_switch_entry::nointerchange, Nointerchange_Dir_Opr, Nomark_Cdir_Opr, Nopattern_Cdir_Opr, Norecurrence_Cdir_Opr, Nosplit_Cdir_Opr, Nostream_Dir_Opr, Notask_Cdir_Opr, cdir_switch_entry::notask_region, Nounroll_Cdir_Opr, Novector_Cdir_Opr, Novsearch_Cdir_Opr, ntr_global_name_tbl(), NTR_IR_LIST_TBL, NULL, NULL_IDX, Numcpus_Cmic_Opr, cdir_switch_entry::opaque, Opaque_Star_Opr, open_mp_directive_semantics(), OPND_FLD, OPND_IDX, Ordered_Open_Mp_Opr, Page_Place_Dollar_Opr, Parallel, Parallel_Cmic_Opr, parallel_cmic_semantics(), Parallel_Do, Parallel_Do_Omp, Parallel_Do_Par_Opr, Parallel_Omp, Parallel_Open_Mp_Opr, Parallel_Par_Opr, cdir_switch_entry::parallel_region, Parallel_Sections_Omp, Parallel_Workshare_Omp, Paralleldo_Open_Mp_Opr, Parallelsections_Open_Mp_Opr, Parallelworkshare_Open_Mp_Opr, cdir_switch_entry::pattern, Pattern_Cdir_Opr, Pdo, Pdo_Par_Opr, cdir_switch_entry::permutation, Permutation_Cmic_Opr, Pgm_Unit, power_o_two(), cdir_switch_entry::preferstream, Preferstream_Dir_Opr, cdir_switch_entry::preferstream_nocinv, Preferstream_Nocinv_Dir_Opr, cdir_switch_entry::prefertask, Prefertask_Cdir_Opr, cdir_switch_entry::prefervector, Prefervector_Cdir_Opr, Prefetch_Manual_Star_Opr, Prefetch_Ref_Disable_Star_Opr, prefetch_ref_semantics(), Prefetch_Ref_Star_Opr, Prefetch_Star_Opr, prev_idx, PRINTMSG(), Psection, Psection_Par_Opr, cdir_switch_entry::purpleconditional, Purpleconditional_Star_Opr, cdir_switch_entry::purpleunconditional, Purpleunconditional_Star_Opr, expr_semantics_args::rank, Real_8, cdir_switch_entry::recurrence, Recurrence_Cdir_Opr, Redistribute_Dollar_Opr, expr_semantics_args::reference, Regionbegin_Star_Opr, Regionend_Star_Opr, cdir_switch_entry::safevl_idx, SB_BLANK_COMMON, SB_BLK_TYPE, SB_NAME_PTR, SB_Tbl_Idx, SCP_ATTR_IDX, SCP_INLINE_SGI, SCP_NOINLINE_SGI, Section_Gp_Star_Opr, Section_Nongp_Star_Opr, Section_Open_Mp_Opr, Section_Par_Opr, Sections_Omp, Sections_Open_Mp_Opr, Send_Cmic_Opr, cdir_switch_entry::send_list_idx, SH_COMPILER_GEN, SH_IR_IDX, SH_NEXT_IDX, cdir_switch_entry::shortloop, cdir_switch_entry::shortloop128, Shortloop128_Cdir_Opr, Shortloop_Cdir_Opr, Simple_OpenAD_Opr, Single_Omp, Single_Open_Mp_Opr, Singleprocess, Singleprocess_Par_Opr, SN_ATTR_IDX, SN_SIBLING_LINK, cdir_switch_entry::split, Split_Cdir_Opr, srch_global_name_tbl(), Static, Static_Local, Static_Named, stmt_start_col, stmt_start_line, cdir_switch_entry::stream, Stream_Dir_Opr, Subscript_Opr, Suppress_Opr, cdir_switch_entry::task, Task_Cdir_Opr, Threadprivate, TRACE, TRUE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, Unroll_Cdir_Opr, cdir_switch_entry::unroll_count_idx, cdir_switch_entry::unroll_dir, Unroll_Star_Opr, Variable, cdir_switch_entry::vector, Vector_Cdir_Opr, cdir_switch_entry::vsearch, Vsearch_Cdir_Opr, Wait_Cmic_Opr, cdir_switch_entry::wait_list_idx, wait_send_semantics(), Warning, Whole_Subscript_Opr, Whole_Substring_Opr, Workshare_Open_Mp_Opr, xref_state, and XXX_OpenAD_Opr.
void do_stmt_semantics | ( | void | ) |
Definition at line 1808 of file s_ctl_flow.c.
References After, And_Opr, Ansi, Asg_Opr, Assignment_Stmt, AT_DCL_ERR, AT_DEF_LINE, AT_DEFINED, AT_REFERENCED, AT_Tbl_Idx, ATD_CLASS, ATD_LIVE_DO_VAR, ATD_TASK_SHARED, ATD_TYPE_IDX, ATL_DEF_STMT_IDX, ATL_TOP_OF_LOOP, Before, Bneqv_Opr, Br_True_Opr, calculate_iteration_count(), Caution, cdir_switches, check_for_legal_define(), cif_flags, CIF_No_Usage_Rec, CIF_Symbol_Modification, CIF_Symbol_Reference, clear_cdir_switches(), CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Compiler_Tmp, expr_semantics_args::constant, Continue_Stmt, COPY_OPND, copy_subtree(), CRI_Ptr, curr_stmt_sh_idx, defer_stmt_expansion, Div_Opr, Do_Infinite_Stmt, Do_Iterative_Stmt, do_loop_expr_semantics(), cdir_switch_entry::do_omp_sh_idx, Do_While_Stmt, cdir_switch_entry::doacross_sh_idx, cdir_switch_entry::doall_sh_idx, cdir_switch_entry::dopar_sh_idx, DOUBLE_DEFAULT_TYPE, Eq_Opr, Error, on_off_flags_entry::exec_doloops_once, EXIT, expr_semantics(), FALSE, find_opnd_line_and_column(), fold_relationals(), Func_Entry, Func_Exit, Ge_Opr, GEN_COMPILER_TMP_ASG, gen_internal_lbl(), gen_opnd(), gen_sh(), Gt_Opr, idx, If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, insert_sh_chain(), insert_sh_chain_before(), Integer, Integer_4, INTEGER_DEFAULT_TYPE, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Label_Opr, Le_Opr, expr_semantics_args::linear_type, Logical, LOGICAL_DEFAULT_TYPE, Lt_Opr, Max_Opr, Minus_Opr, MISC_RECS, Mult_Opr, Ne_Opr, cdir_switch_entry::no_internal_calls, Not_Opr, Not_Referenced, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, on_off_flags, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, cdir_switch_entry::parallel_region, cdir_switch_entry::paralleldo_omp_sh_idx, cdir_switch_entry::paralleldo_sh_idx, cdir_switch_entry::pdo_sh_idx, Plus_Opr, PRINTMSG(), Priv, process_deferred_functions(), processing_do_var, expr_semantics_args::rank, Real, REAL_DEFAULT_TYPE, Real_Div_To_Int_Opr, set_directives_on_label(), setup_interchange_level_list(), SH_COL_NUM, SH_COMPILER_GEN, SH_DOALL_LOOP_END, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_Tbl_Idx, stmt_start_col, stmt_start_line, stmt_type, target_triton, TRACE, tree_produces_dealloc(), TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, and xref_state.
void doall_end_semantics | ( | void | ) |
Definition at line 4664 of file s_directiv.c.
References AT_OBJ_CLASS, AT_Tbl_Idx, ATD_TASK_GETFIRST, ATD_TASK_LASTLOCAL, ATD_TASK_PRIVATE, ATD_TASK_REDUCTION, ATD_TASK_SHARED, ATP_PROC, ATP_TASK_SHARED, cdir_switch_entry::autoscope, cdir_switches, COPY_OPND, Data_Obj, Dummy_Proc, FALSE, find_left_attr(), Func_Entry, Func_Exit, cdir_switch_entry::getfirst_list_idx, IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, cdir_switch_entry::lastlocal_list_idx, cdir_switch_entry::lastthread_list_idx, cdir_switch_entry::no_internal_calls, NO_Tbl_Idx, NULL, NULL_IDX, cdir_switch_entry::parallel_region, Pgm_Unit, cdir_switch_entry::private_list_idx, cdir_switch_entry::reduction_list_idx, cdir_switch_entry::shared_list_idx, TRACE, and wait_send_semantics().
Referenced by pgm_unit_semantics().
void dope_vector_setup | ( | opnd_type * | , |
expr_arg_type * | , | ||
opnd_type * | , | ||
boolean | |||
) |
Definition at line 1433 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, Array_Ptr, Array_Tmp_Ptr, Assignment_Stmt, Assumed_Shape, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATT_CHAR_SEQ, BD_ARRAY_CLASS, BD_LB_FLD, BD_LB_IDX, Before, CG_INTEGER_DEFAULT_TYPE, Character, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Contig_Section, COPY_OPND, CRI_Ch_Ptr_8, CRI_Ptr_8, curr_stmt_sh_idx, Dv_Access_A_Contig, Dv_Access_Low_Bound, Dv_Access_Orig_Base, Dv_Access_Orig_Size, Dv_Access_Ptr_Alloc, Dv_Contig_Section, Dv_Set_A_Contig, Dv_Set_Assoc, Dv_Set_Base_Addr, Dv_Set_Extent, Dv_Set_Low_Bound, Dv_Set_Orig_Base, Dv_Set_Orig_Size, Dv_Set_Ptr_Alloc, Dv_Set_Stride_Mult, FALSE, find_base_attr(), find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_dv_stride_mult(), gen_ir(), gen_sh(), get_act_arg_type(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Internal, IR_COL_NUM, IR_COL_NUM_R, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, just_find_dope_and_rank(), Loc_Opr, make_base_subtree(), Max_Opr, Mult_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, expr_semantics_args::section, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, stmt_start_col, stmt_start_line, Struct_Opr, Structure, TRACE, transform_char_sequence_ref(), Triplet_Opr, TRUE, TYP_IDX, expr_semantics_args::type, expr_semantics_args::type_idx, Whole_Allocatable, Whole_Array_Constant, Whole_Ass_Shape, Whole_Sequence, Whole_Tmp_Allocatable, and Whole_Tmp_Sequence.
Referenced by create_struct_constructor_asg(), and lower_ptr_asg().
void else_stmt_semantics | ( | void | ) |
Definition at line 3365 of file s_ctl_flow.c.
References And_Opr, arg_info_list_base, arg_info_list_top, AT_DEF_COLUMN, AT_DEF_LINE, AT_DEFINED, AT_REFERENCED, AT_Tbl_Idx, ATL_DEF_STMT_IDX, Before, Br_Uncond_Opr, check_where_conformance(), CIF_Symbol_Reference, Continue_Stmt, COPY_OPND, create_tmp_asg(), curr_stmt_sh_idx, defer_stmt_expansion, Else_If_Stmt, Else_Opr, Else_Stmt, Else_Where_Mask_Stmt, Else_Where_Stmt, End_If_Stmt, Endif_Opr, Error, EXIT, expr_semantics(), FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_internal_lbl(), gen_ir(), gen_opnd(), gen_sh(), Goto_Stmt, has_present_opr, If_Cstrct_Stmt, If_Opr, If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, in_branch_true, Intent_In, Internal, io_item_must_flatten, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Label_Opr, Logical, LOGICAL_DEFAULT_TYPE, NO_Tbl_Idx, Not_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, number_of_functions, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, Referenced, SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_P2_SKIP_ME, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_STMT_TYPE, SH_Tbl_Idx, short_circuit_branch(), short_circuit_high_level_if(), stmt_start_col, stmt_start_line, stmt_type, TRACE, TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, where_ir_idx, and xref_state.
void encode_decode_stmt_semantics | ( | void | ) |
Definition at line 752 of file s_io.c.
References ADD_TMP_TO_SHARED_LIST, Ansi, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ASSIGN_TMP_IDX, ATD_CLASS, ATD_IN_ASSIGN, ATD_POINTER, ATL_CLASS, ATL_FORMAT_TMP, ATL_PP_FORMAT_TMP, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, Character, check_for_legal_define(), CIF_Symbol_Modification, CIF_Symbol_Reference, CN_INT_TO_C, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, expr_semantics_args::constant, COPY_OPND, create_tmp_asg(), curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Decode, Decode_Stmt, defer_stmt_expansion, expr_semantics_args::dist_reshape_ref, expr_semantics_args::dope_vector, Dummy_Argument, Encode, Encode_Stmt, Error, expr_semantics(), FALSE, find_base_attr(), find_opnd_line_and_column(), FL_IO_SINGLE, FREE_IR_LIST_NODE, Func_Entry, Func_Exit, Function_Result, gen_runtime_checks(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Integer, INTEGER_DEFAULT_TYPE, Intent_In, io_item_must_flatten, io_list_semantics(), io_stmt_must_be_split, IR_IDX_L, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, Label, Lbl_Format, expr_semantics_args::linear_type, Logical, NTR_IR_LIST_TBL, NULL, NULL_IDX, NUM_PDG_CONTROL_LIST_ITEMS, number_of_functions, OPND_FLD, OPND_IDX, PRINTMSG(), process_deferred_io_list(), expr_semantics_args::rank, REAL_DEFAULT_TYPE, expr_semantics_args::reference, SCP_DOES_IO, SH_IR_IDX, stmt_type, stmt_type_str, Subscript_Opr, TRACE, tree_has_constructor, TRUE, expr_semantics_args::type, Typeless, Variable, expr_semantics_args::vector_subscript, Whole_Subscript_Opr, Whole_Substring_Opr, and xref_state.
void end_forall_semantics | ( | void | ) |
Definition at line 321 of file s_end.c.
References active_forall_sh_idx, AT_ATTR_LINK, AT_IGNORE_ATTR_LINK, curr_stmt_sh_idx, EXIT, FALSE, Forall_Opr, Func_Entry, Func_Exit, IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_Tbl_Idx, Internal, IR_IDX_R, IR_OPR, NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_PARENT_BLK_IDX, TRACE, and within_forall_construct.
void end_function_semantics | ( | void | ) |
Definition at line 192 of file s_end.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_TYPE_IDX, ATP_RSLT_IDX, cdir_switch_entry::bounds, Br_Uncond_Opr, cdir_switches, Character, size_offset_entry::constant, copy_entry_exit_sh_list(), curr_scp_idx, curr_stmt_sh_idx, dump_flags, FALSE, Func_Entry, Func_Exit, gen_directive_ir(), Gt_Opr, idx, Inline_Cdir_Opr, opt_flags_entry::inline_lvl, Inline_Lvl_0, insert_sh_chain_before(), IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_OPR, opt_flags_entry::modinline, Nobounds_Cdir_Opr, NULL, NULL_IDX, opt_flags, dump_flags_entry::preinline, result, SCP_ALT_ENTRY_CNT, SCP_ATTR_IDX, SCP_ENTRY_IDX, SCP_EXIT_IR_SH_IDX, SCP_RETURN_LABEL, SH_IR_IDX, SH_NEXT_IDX, size, size_offset_logical_calc(), stor_bit_size_of(), Structure, THIS_IS_TRUE, TRACE, TRUE, TYP_TYPE, and size_offset_entry::type_idx.
void end_if_semantics | ( | void | ) |
void end_select_semantics | ( | void | ) |
Definition at line 562 of file s_end.c.
References curr_stmt_sh_idx, FREE_IR_LIST_NODE, FREE_IR_NODE, Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IR_IDX_L, IR_IDX_R, IR_LIST_CNT_R, NULL, SH_ERR_FLG, SH_IR_IDX, SH_PARENT_BLK_IDX, and TRACE.
void end_stmt_semantics | ( | void | ) |
Definition at line 81 of file s_end.c.
References cdir_switch_entry::bounds, cdir_switches, copy_entry_exit_sh_list(), curr_scp_idx, dump_flags, Func_Entry, Func_Exit, gen_directive_ir(), Inline_Cdir_Opr, opt_flags_entry::inline_lvl, Inline_Lvl_0, insert_sh_chain_before(), opt_flags_entry::modinline, Nobounds_Cdir_Opr, NULL, NULL_IDX, opt_flags, dump_flags_entry::preinline, SCP_EXIT_IR_SH_IDX, SH_NEXT_IDX, and TRACE.
void end_subroutine_semantics | ( | void | ) |
Definition at line 136 of file s_end.c.
References cdir_switch_entry::bounds, cdir_switches, copy_entry_exit_sh_list(), curr_scp_idx, dump_flags, Func_Entry, Func_Exit, gen_directive_ir(), Inline_Cdir_Opr, opt_flags_entry::inline_lvl, Inline_Lvl_0, insert_sh_chain_before(), opt_flags_entry::modinline, Nobounds_Cdir_Opr, NULL, NULL_IDX, opt_flags, dump_flags_entry::preinline, SCP_EXIT_IR_SH_IDX, SH_NEXT_IDX, and TRACE.
void end_where_semantics | ( | void | ) |
Definition at line 612 of file s_end.c.
References active_forall_sh_idx, alloc_block_end_idx, alloc_block_start_idx, curr_stmt_sh_idx, Else_Where_Mask_Stmt, Else_Where_Stmt, Forall_Cstrct_Stmt, Func_Entry, Func_Exit, IL_IDX, IL_Tbl_Idx, Internal, IR_FLD_L, IR_IDX_L, NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_STMT_TYPE, TRACE, Where_Cstrct_Stmt, where_dealloc_stmt_idx, and where_ir_idx.
void endfile_stmt_semantics | ( | void | ) |
Definition at line 1192 of file s_io.c.
References add_alt_return_lbl(), Alt_Return_Opr, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, Before, Br_True_Opr, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, curr_scp_idx, curr_stmt_sh_idx, Endfile, Endfile_Opr, enlarge_call_list_tables(), enlarge_info_list_table(), Eq_Opr, err_attr_idx, err_list_idx, FALSE, final_arg_work(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), If_Stmt, IL_OPND, io_ctl_list_semantics(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, LOGICAL_DEFAULT_TYPE, max_call_list_size, NTR_IR_TBL, NULL, Priv, Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, and TRUE.
void enlarge_call_list_tables | ( | void | ) |
Definition at line 1337 of file s_utils.c.
References arg_list, arg_list_size, CALL_LIST_TBL_INC, Func_Entry, Func_Exit, max_call_list_size, MEM_ALLOC, MEM_REALLOC, NULL, and TRACE.
Referenced by backspace_stmt_semantics(), buffer_stmt_semantics(), call_list_semantics(), close_stmt_semantics(), endfile_stmt_semantics(), inquire_stmt_semantics(), open_stmt_semantics(), resolve_ext_opr(), rewind_stmt_semantics(), stmt_func_call_opr_handler(), and stop_pause_stmt_semantics().
void enlarge_info_list_table | ( | void | ) |
Definition at line 1385 of file s_utils.c.
References arg_info_list, arg_info_list_size, CALL_LIST_TBL_INC, Func_Entry, Func_Exit, max_call_list_size, MEM_ALLOC, MEM_REALLOC, NULL, and TRACE.
Referenced by array_construct_opr_handler(), array_construct_semantics(), backspace_stmt_semantics(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), close_stmt_semantics(), cshift_intrinsic(), endfile_stmt_semantics(), eoshift_intrinsic(), index_intrinsic(), inquire_stmt_semantics(), io_list_semantics(), ishftc_intrinsic(), num_images_intrinsic(), open_stmt_semantics(), process_char_len(), process_variable_size_func(), resolve_ext_opr(), rewind_stmt_semantics(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), and struct_construct_opr_handler().
void entry_stmt_semantics | ( | void | ) |
Definition at line 111 of file s_dcl_pu.c.
References cdir_switch_entry::align, ATP_ALIGN, cdir_switches, curr_stmt_sh_idx, Error, FALSE, Func_Entry, Func_Exit, IR_IDX_L, NULL, cdir_switch_entry::parallel_region, PRINTMSG(), SH_IR_IDX, stmt_start_col, stmt_start_line, and TRACE.
boolean final_arg_work | ( | opnd_type * | , |
int | , | ||
int | , | ||
expr_arg_type * | |||
) |
Definition at line 2276 of file s_call.c.
References After, Aloc_Opr, arg_assoc_tbl, arg_info_list, Array_Tmp_Ptr, Asg_Opr, Assignment_Stmt, arg_strct::association, Assumed_Shape, Assumed_Size, AT_COMPILER_GEND, AT_IS_INTRIN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_OPTIONAL, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_AUTO_BASE_IDX, ATD_AUTOMATIC, ATD_AUXILIARY, ATD_CLASS, ATD_FLD, ATD_IGNORE_TKR, ATD_IM_A_DOPE, ATD_INTENT, ATD_INTRIN_DARG_TYPE, ATD_LIVE_DO_VAR, ATD_NOT_PT_UNIQUE_MEM, ATD_PE_ARRAY_IDX, ATD_POINTER, ATD_STOR_BLK_IDX, ATD_TARGET, ATD_TMP_IDX, ATD_TYPE_IDX, ATP_ELEMENTAL, ATP_EXPL_ITRFC, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_NUM_DARGS, ATP_PGM_UNIT, ATP_PROC, ATP_RSLT_IDX, ATP_VFUNCTION, ATT_CHAR_SEQ, Backspace_Attr_Idx, BD_ARRAY_CLASS, BD_LEN_FLD, BD_LEN_IDX, BD_RANK, Before, Buffer_In_Attr_Idx, Buffer_Out_Attr_Idx, C_INT_TO_CN, Call_Opr, Call_Stmt, cast_typeless_constant(), Caution, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, Character, Character_1, CHARACTER_DEFAULT_TYPE, check_call_for_global_def(), CHECK_CONTIG_FLAG, check_elemental_conformance(), check_for_constructors(), CIF_No_Usage_Rec, CLEAR_TBL_NTRY, Close_Attr_Idx, cmd_line_flags, CN_CONST, CN_HOLLERITH_TYPE, CN_INT_TO_C, CN_INTEGER_NEG_ONE_IDX, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_POOL_IDX, CN_Tbl_Idx, CN_TYPE_IDX, compare_cn_and_value(), Compiler_Tmp, Complex, Complex_4, Const_Len_Char, Const_Tmp_Loc_Opr, contig_test_ir_idx, COPY_IN, COPY_IN_COPY_OUT, COPY_IN_MAKE_DV, COPY_OPND, COPY_SHAPE, CP_CONSTANT, create_tmp_asg(), create_tmp_DV_asg(), CRI_Ch_Ptr_8, CRI_Parcel_Ptr_8, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, defer_stmt_expansion, expr_semantics_args::dope_vector, dummy, Dummy_Argument, Dv_Access_A_Contig, Dv_Access_Base_Addr, Dv_Deref_Opr, arg_strct::ed, Endfile_Attr_Idx, Eq_Opr, Error, ERROR_ASSOC, EXIT, Explicit_Shape, expr_mode, expr_semantics(), FALSE, False_Parm_Opr, Fcd_Opr, find_left_attr(), find_opnd_line_and_column(), opnd_entry::fld, fold_relationals(), Func_Entry, Func_Exit, Function, gen_compiler_tmp(), GEN_COMPILER_TMP_ASG, gen_dv_whole_def(), gen_dv_whole_def_init(), gen_if_stmt(), gen_internal_call_stmt(), gen_ir(), gen_opnd(), gen_runtime_ptr_chk(), gen_sh(), gen_whole_subscript(), gen_whole_substring(), GENERATE_WHIRL, get_act_arg_type(), get_dummy_arg_type(), glb_tbl_idx, Gt_Opr, H_Hollerith, opnd_entry::idx, ir_list_tbl_entry::il, IL_ARG_MULTI_FLAGS, IL_COL_NUM, IL_FLD, IL_IDX, IL_INTRIN_PLACE_HOLDER, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, init_exp_desc, Inquire_Attr_Idx, Integer, Integer_1, Integer_2, Integer_4, INTEGER_DEFAULT_TYPE, Intent_In, Intent_Inout, Intent_Out, Internal, Intrin_Proc, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_LIST_CNT_R, ir_list_tbl, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, IR_WHOLE_ARRAY, Kwd_Opr, L_Hollerith, expr_semantics_args::linear_type, ir_list_tbl_entry::link, Loc_Opr, Logical_1, Logical_2, Logical_4, LOGICAL_DEFAULT_TYPE, Lt_Opr, make_base_assumed_size(), make_base_subtree(), MAKE_DV, arg_strct::maybe_modified, Mult_Opr, Ne_Opr, NO_Tbl_Idx, Not_Hollerith, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, Null_Intrinsic_Opr, msg_num_entry::num_args, on_off_flags, Open_Attr_Idx, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, on_off_flags_entry::pad_char_literals, PASS_ADDRESS, PASS_ADDRESS_FROM_DV, PASS_DV, PASS_DV_COPY, PASS_SECTION_ADDRESS, Pgm_Unit, expr_semantics_args::pointer, Present_Opr, ir_list_link_entry::prev_idx, PRINTMSG(), Priv, expr_semantics_args::rank, Real, Real_4, expr_semantics_args::reference, Regular_Expr, Rewind_Attr_Idx, cmd_line_flags_entry::runtime_ptr_chk, SA_INTEGER_DEFAULT_TYPE, save_array_syntax_subscripts(), SCP_SB_STACK_IDX, Section_Subscript_Opr, set_at_actual_arg(), SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, Short_Char_Const, Short_Typeless_Const, SN_ATTR_IDX, stmt_expansion_control_end(), stmt_expansion_control_start(), stmt_start_col, stmt_start_line, stmt_type, storage_bit_size_tbl, Struct_Opr, Structure, Subscript_Opr, Substring_Opr, THIS_IS_TRUE, expr_semantics_args::tmp_reference, TRACE, transform_char_sequence_ref(), TRUE, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, expr_semantics_args::type, expr_semantics_args::type_idx, type_tbl, TYPELESS_DEFAULT_TYPE, Unknown_Dummy, validate_char_len(), expr_semantics_args::vector_subscript, Warning, Whole_Allocatable, Whole_Sequence, Whole_Subscript_Opr, Whole_Substring_Opr, and xref_state.
Referenced by adjustl_intrinsic(), backspace_stmt_semantics(), buffer_stmt_semantics(), call_list_semantics(), close_stmt_semantics(), endfile_stmt_semantics(), flatten_function_call(), inquire_stmt_semantics(), length_intrinsic(), open_stmt_semantics(), resolve_ext_opr(), rewind_stmt_semantics(), stop_pause_stmt_semantics(), and unit_intrinsic().
int find_base_attr | ( | opnd_type * | , |
int * | , | ||
int * | |||
) |
Definition at line 1117 of file s_utils.c.
References AT_OBJ_NAME_PTR, AT_Tbl_Idx, CN_Tbl_Idx, COPY_OPND, EXIT, Func_Entry, Func_Exit, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Struct_Opr, and TRACE.
Referenced by all_intrinsic(), alloc_obj_opr_handler(), allocate_stmt_semantics(), array_element_to_scalar(), assignment_stmt_semantics(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), check_array_bounds(), check_dependence(), check_stat_variable(), check_substring_bounds(), cif_usage_rec(), conform_check(), create_scalar_type_tbl(), create_strct_tbl(), create_tmp_DV_asg(), cvrt_exp_to_pdg(), dealloc_obj_opr_handler(), discombobulate_structure_ref(), dope_vector_setup(), encode_decode_stmt_semantics(), gen_arg_type_descriptor(), gen_dv_access_low_bound(), gen_dv_whole_def(), gen_init_stmt(), gen_runtime_bounds(), gen_runtime_ptr_chk(), gen_runtime_substring(), gen_whole_subscript(), gen_whole_substring(), interpret_ref(), io_ctl_list_semantics(), lbound_intrinsic(), len_intrinsic(), loc_intrinsic(), minval_intrinsic(), namelist_static_dv_whole_def(), needs_bounds_check(), null_intrinsic(), num_images_intrinsic(), optimize_reshape(), random_number_intrinsic(), reshape_intrinsic(), reshape_reference_subscripts(), resolve_ext_opr(), section_semantics(), size_intrinsic(), srch_for_calls(), subscript_opr_handler(), substring_opr_handler(), transfer_intrinsic(), and ubound_intrinsic().
int find_left_attr | ( | opnd_type * | ) |
Definition at line 1192 of file s_utils.c.
References AT_Tbl_Idx, COPY_OPND, EXIT, Func_Entry, Func_Exit, IR_OPND_L, IR_Tbl_Idx, NULL, NULL_IDX, OPND_FLD, OPND_IDX, and TRACE.
Referenced by allocate_stmt_semantics(), assignment_stmt_semantics(), call_list_semantics(), check_dependence(), check_for_elementals(), check_where_conformance(), cif_call_site_rec(), cif_usage_rec(), copy_sbtree(), create_argchck_descriptor(), create_array_constructor_asg(), create_constructor_constant(), create_namelist_descriptor(), create_scalar_type_tbl(), create_strct_tbl(), cvrt_exp_to_pdg(), deallocate_stmt_semantics(), directive_stmt_semantics(), do_single_asg(), doall_end_semantics(), equivalence_semantics(), final_arg_work(), fold_aggragate_expression(), gen_bd_entry(), gen_loop_end_ir(), gen_runtime_checks(), gen_runtime_ptr_chk(), gen_split_alloc(), inquire_stmt_semantics(), interpret_ref(), io_ctl_list_semantics(), io_list_semantics(), item_has_bounds_chk(), mp_directive_semantics(), namelist_static_dv_whole_def(), needs_bounds_check(), nullify_stmt_semantics(), process_cpnt_inits(), resolve_ext_opr(), set_mp_task_flags(), srch_for_calls(), transform_cri_ch_ptr(), and translate_dv_component().
void flatten_function_call | ( | opnd_type * | ) |
Definition at line 6485 of file s_call.c.
References ADD_ATTR_TO_LOCAL_LIST, After, Alloc_Opr, Aloc_Opr, Asg_Opr, Assignment_Stmt, Assumed_Size_Char, AT_ACTUAL_ARG, AT_DEFINED, AT_IS_INTRIN, AT_OBJ_NAME_PTR, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_AUTO_BASE_IDX, ATD_AUTOMATIC, ATD_ELEMENTAL_CALL_TMP, ATD_FLD, ATD_IM_A_DOPE, ATD_NOT_PT_UNIQUE_MEM, ATD_POINTER, ATD_STOR_BLK_IDX, ATD_TMP_IDX, ATD_TYPE_IDX, ATP_ELEMENTAL, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_INTRIN_ENUM, ATP_NUM_DARGS, ATP_PROC, ATP_RSLT_IDX, ATT_CHAR_SEQ, ATT_DEFAULT_INITIALIZED, ATT_POINTER_CPNT, BD_ARRAY_SIZE, BD_LEN_FLD, BD_LEN_IDX, BD_RANK, Before, C_INT_TO_CN, Call_Opr, Call_Stmt, CG_INTEGER_DEFAULT_TYPE, change_asg_to_where(), Character, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, create_alloc_descriptor(), create_lib_entry_attr(), CRI_Ch_Ptr_8, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Dealloc_Attr_Idx, DEALLOC_LIB_ENTRY, DEALLOC_NAME_LEN, Dealloc_Opr, Deallocate_Opr, defer_stmt_expansion, determine_tmp_size(), Dummy_Proc, Dv_Deref_Opr, Error, EXIT, FALSE, final_arg_work(), Func_Entry, Func_Exit, FUNCTION_MUST_BE_SUBROUTINE, gen_alloc_header_const(), gen_bd_entry(), gen_compiler_tmp(), GEN_COMPILER_TMP_ASG, gen_dv_whole_def_init(), gen_sh(), gen_whole_subscript(), gen_whole_substring(), get_stmt_tmp(), glb_tbl_idx, IL_ARG_DESC_VARIANT, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, init_exp_desc, Integer_4, Integer_8, IR_COL_NUM, IR_COL_NUM_L, IR_CONTIG_ARRAY, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, keep_orig_sh, L, expr_semantics_args::linear_type, Loc_Opr, make_base_subtree(), no_func_expansion, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, msg_num_entry::num_args, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, orig_sh_idx, PRINTMSG(), Priv, process_cpnt_inits(), process_variable_size_func(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SCP_ATTR_IDX, SCP_SB_BASED_IDX, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, Spread_Intrinsic, stmt_expansion_control_end(), stmt_expansion_control_start(), stmt_start_col, stmt_start_line, Structure, Subscript_Opr, TRACE, transform_char_sequence_ref(), TRUE, TYP_CHAR_CLASS, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, Var_Len_Array, Var_Len_Char, where_ir_idx, and Whole_Subscript_Opr.
Referenced by call_list_semantics().
void fold_clen_opr | ( | opnd_type * | , |
expr_arg_type * | |||
) |
Definition at line 6003 of file s_utils.c.
References AT_OBJ_CLASS, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_IM_A_DOPE, ATD_POINTER, ATD_TYPE_IDX, CG_INTEGER_DEFAULT_TYPE, char_len_in_bytes, Clen_Opr, CN_INTEGER_THREE_IDX, CN_Tbl_Idx, CN_TYPE_IDX, expr_semantics_args::constant, COPY_OPND, Data_Obj, Dv_Access_El_Len, EXIT, find_opnd_line_and_column(), expr_semantics_args::foldable, Func_Entry, Func_Exit, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Integer, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, SA_INTEGER_DEFAULT_TYPE, Shiftr_Opr, Substring_Opr, TRACE, TRUE, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, and Whole_Substring_Opr.
Referenced by attr_semantics(), char_len_resolution(), and len_intrinsic().
void forall_semantics | ( | void | ) |
Definition at line 3868 of file s_ctl_flow.c.
References active_forall_sh_idx, After, Asg_Opr, Assignment_Stmt, AT_ATTR_LINK, AT_IGNORE_ATTR_LINK, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_NAME_PTR, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_CLASS, ATD_FORALL_INDEX, ATD_STOR_BLK_IDX, ATD_TMP_NEEDS_CIF, ATD_TYPE_IDX, cast_to_type_idx(), check_forall_triplet_for_index(), cif_flags, CIF_Symbol_Modification, CIF_Symbol_Reference, cif_usage_rec(), CN_Tbl_Idx, Constant, COPY_OPND, create_tmp_asg(), curr_scp_idx, curr_stmt_sh_idx, Dv_Deref_Opr, Error, EXIT, expr_semantics(), FALSE, find_opnd_line_and_column(), forall_mask_needs_tmp(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_forall_branch_around(), gen_forall_if_mask(), gen_forall_loops(), gen_forall_max_expr(), gen_forall_tmp(), gen_ir(), gen_opnd(), gen_sh(), IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Integer, Intent_In, Internal, io_item_must_flatten, IR_COL_NUM, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Logical, LOGICAL_DEFAULT_TYPE, NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, null_opnd, OPND_FLD, OPND_IDX, Or_Opr, PRINTMSG(), Priv, expr_semantics_args::rank, remove_sh(), SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, within_forall_construct, within_forall_mask_expr, XREF_RECS, and xref_state.
void function_stmt_semantics | ( | void | ) |
Definition at line 151 of file s_dcl_pu.c.
References Func_Entry, Func_Exit, NULL, and TRACE.
int gen_alloc_header_const | ( | int | , |
int | , | ||
boolean | , | ||
int * | |||
) |
Definition at line 8017 of file s_ctl_flow.c.
References FALSE, Func_Entry, Func_Exit, Integer_4, ntr_const_tbl(), NULL, NULL_IDX, TRACE, and TYP_LINEAR.
Referenced by allocate_stmt_semantics(), create_alloc_descriptor(), create_runtime_array_constructor(), deallocate_local_allocatables(), deallocate_stmt_semantics(), flatten_function_call(), and gen_split_alloc().
boolean gen_bd_entry | ( | opnd_type * | , |
expr_arg_type * | , | ||
int * | , | ||
int | , | ||
int | |||
) |
Definition at line 5229 of file s_call.c.
References Asg_Opr, Assignment_Stmt, AT_DEFINED, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CLASS, ATD_TASK_PRIVATE, ATD_TYPE_IDX, ATL_DEF_STMT_IDX, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_FLOW_DEPENDENT, BD_LB_FLD, BD_LB_IDX, BD_LEN_FLD, BD_LEN_IDX, BD_LINE_NUM, BD_RANK, BD_RESOLVED, BD_SM_FLD, BD_SM_IDX, BD_UB_FLD, BD_UB_IDX, BD_XT_FLD, BD_XT_IDX, Before, Br_True_Opr, CG_INTEGER_DEFAULT_TYPE, Character, CIF_No_Usage_Rec, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, compare_cn_and_value(), Compiler_Tmp, expr_semantics_args::constant, Constant_Size, Continue_Stmt, COPY_OPND, curr_stmt_sh_idx, Data_Obj, determine_num_elements(), Eq_Opr, Explicit_Shape, expr_mode, expr_semantics(), FALSE, find_left_attr(), size_offset_entry::fld, Func_Entry, Func_Exit, Ge_Opr, GEN_COMPILER_TMP_ASG, gen_copyin_bounds_stmt(), gen_internal_lbl(), gen_sh(), gen_temp_init(), size_offset_entry::idx, If_Stmt, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, L, Label_Opr, LOGICAL_DEFAULT_TYPE, Minus_Opr, Mult_Opr, ntr_array_in_bd_tbl(), NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Plus_Opr, PRINTMSG(), Priv, expr_semantics_args::rank, reassign_XT_temps, Regular_Expr, reserve_array_ntry(), SA_INTEGER_DEFAULT_TYPE, set_stride_for_first_dim(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, SHAPE_FOLDABLE, SHAPE_WILL_FOLD_LATER, shared_bd_idx, stride, TRACE, TRUE, TYP_FLD, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, validate_char_len(), Var_Len_Array, and xref_state.
Referenced by create_tmp_asg(), flatten_function_call(), and optimize_reshape().
void gen_common_dv_init | ( | opnd_type * | , |
int | , | ||
sh_position_type | |||
) |
Definition at line 2155 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, After, Assignment_Stmt, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_IN_COMMON, ATD_POINTER, ATD_TYPE_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_RANK, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, char_len_in_bytes, Character, CN_INTEGER_CHAR_BIT_IDX, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, size_offset_entry::constant, COPY_OPND, create_dv_type_code(), curr_stmt_sh_idx, Dv_Set_A_Contig, Dv_Set_El_Len, Dv_Set_N_Dim, Dv_Set_P_Or_A, Dv_Set_Typ_Code, FALSE, find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, gen_sh(), size_offset_entry::idx, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Mult_Opr, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_TBL, NULL, result, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, size_offset_binary_calc(), storage_bit_size_tbl, Structure, TRACE, TRUE, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, and size_offset_entry::type_idx.
Referenced by gen_default_init_code(), and gen_entry_dope_code().
void gen_copyin_bounds_stmt | ( | int | ) |
Definition at line 11355 of file s_utils.c.
References AT_DEF_COLUMN, AT_DEF_LINE, AT_Tbl_Idx, Before, Copyin_Bound_Opr, curr_stmt_sh_idx, Directive_Stmt, FALSE, Func_Entry, Func_Exit, gen_ir(), gen_sh(), NO_Tbl_Idx, NULL, NULL_IDX, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by create_runtime_array_constructor(), gen_bd_entry(), gen_forall_tmp_bd_entry(), and make_new_bd_entries().
int gen_directive_ir | ( | operator_type | ) |
Definition at line 571 of file p_directiv.c.
References curr_stmt_sh_idx, Directive_Stmt, Func_Entry, Func_Exit, IR_COL_NUM, IR_LINE_NUM, IR_OPR, IR_TYPE_IDX, need_new_sh, NTR_IR_TBL, ntr_sh_tbl(), NULL, SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_STMT_TYPE, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by end_function_semantics(), end_stmt_semantics(), end_subroutine_semantics(), parse_assert_directive(), parse_dir_directives(), parse_dollar_directives(), parse_mic_directives(), parse_open_mp_directives(), parse_openad_directives(), parse_par_directives(), parse_redistribute_dir(), parse_sgi_dir_inline(), parse_star_dir_directives(), and parse_star_directives().
void gen_dv_access_low_bound | ( | opnd_type * | , |
opnd_type * | , | ||
int | |||
) |
Definition at line 11399 of file s_utils.c.
References Asg_Opr, Assumed_Shape, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CLASS, ATD_FLD, ATD_IM_A_DOPE, ATD_TMP_IDX, BD_ARRAY_CLASS, BD_LB_FLD, BD_LB_IDX, CIF_No_Usage_Rec, Compiler_Tmp, COPY_OPND, Dv_Access_Low_Bound, expr_semantics(), find_base_attr(), Func_Entry, Func_Exit, gen_ir(), gen_opnd(), Internal, IR_DV_DIM, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NO_Tbl_Idx, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, TRACE, variable_size_func_expr, and xref_state.
Referenced by gen_runtime_bounds(), gen_whole_subscript(), and subscript_opr_handler().
void gen_dv_whole_def | ( | opnd_type * | , |
opnd_type * | , | ||
expr_arg_type * | |||
) |
Definition at line 3529 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, Array_Ptr, Array_Tmp_Ptr, Assignment_Stmt, Assumed_Shape, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_POINTER, ATD_TYPE_IDX, ATT_CHAR_SEQ, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_ARRAY_CLASS, BD_LB_FLD, BD_LB_IDX, BD_RANK, Before, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, Character, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, compute_char_element_len(), Contig_Section, COPY_OPND, create_dv_type_code(), CRI_Ch_Ptr_8, CRI_Ptr_8, curr_stmt_sh_idx, Dv_Access_A_Contig, Dv_Access_Low_Bound, Dv_Access_Orig_Base, Dv_Access_Orig_Size, Dv_Access_Ptr_Alloc, Dv_Contig_Section, Dv_Def_Asg_Opr, Dv_Whole_Def_Opr, FALSE, find_base_attr(), find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_dv_stride_mult(), gen_ir(), gen_sh(), get_act_arg_type(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, just_find_dope_and_rank(), Loc_Opr, make_base_subtree(), Max_Opr, Mult_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, expr_semantics_args::section, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, expr_semantics_args::shape, storage_bit_size_tbl, Structure, TRACE, transform_char_sequence_ref(), Triplet_Opr, TRUE, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, Whole_Allocatable, Whole_Array_Constant, Whole_Ass_Shape, Whole_Sequence, Whole_Tmp_Allocatable, and Whole_Tmp_Sequence.
Referenced by create_namelist_descriptor(), create_strct_tbl(), final_arg_work(), and process_cpnt_inits().
void gen_dv_whole_def_init | ( | opnd_type * | , |
int | , | ||
sh_position_type | |||
) |
Definition at line 4291 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, After, Assignment_Stmt, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_POINTER, ATD_TYPE_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_RANK, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, char_len_in_bytes, Character, cmd_line_flags, CN_INTEGER_CHAR_BIT_IDX, CN_INTEGER_ONE_IDX, CN_INTEGER_TWO_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, size_offset_entry::constant, COPY_OPND, create_dv_type_code(), curr_stmt_sh_idx, Dv_Def_Asg_Opr, Dv_Whole_Def_Opr, FALSE, find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, gen_sh(), size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Mult_Opr, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, result, cmd_line_flags_entry::runtime_bounds, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, size_offset_binary_calc(), storage_bit_size_tbl, Structure, TRACE, TRUE, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, and size_offset_entry::type_idx.
Referenced by allocate_stmt_semantics(), assignment_stmt_semantics(), create_struct_constructor_asg(), final_arg_work(), flatten_function_call(), gen_entry_dope_code(), null_intrinsic(), and process_cpnt_inits().
void gen_entry_dope_code | ( | int | ) |
Definition at line 2841 of file s_utils.c.
References After, Asg_Opr, AT_DCL_ERR, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_AUTOMATIC, ATD_CLASS, ATD_IM_A_DOPE, ATD_IN_COMMON, ATD_PE_ARRAY_IDX, ATD_SAVED, ATD_TYPE_IDX, ATP_PGM_UNIT, ATP_SAVE_ALL, ATT_DEFAULT_INITIALIZED, ATT_POINTER_CPNT, curr_scp_idx, curr_stmt_sh_idx, EXIT, Func_Entry, Func_Exit, Function_Result, gen_common_dv_init(), gen_dv_whole_def_init(), gen_static_dv_whole_def(), gen_whole_subscript(), Init_Opr, Module, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, process_cpnt_inits(), SCP_ATTR_IDX, SH_COL_NUM, SH_GLB_LINE, Structure, TRACE, TYP_IDX, and TYP_TYPE.
Referenced by create_runtime_array_constructor(), and get_stmt_tmp().
void gen_forall_if_mask | ( | int | , |
int | |||
) |
Definition at line 10553 of file s_ctl_flow.c.
References active_forall_sh_idx, copy_subtree(), EXIT, Func_Entry, Func_Exit, gen_if_stmt(), IL_FLD, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, Internal, IR_IDX_R, NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, and TRACE.
Referenced by assignment_stmt_semantics(), forall_semantics(), and where_stmt_semantics().
void gen_forall_loops | ( | int | , |
int | |||
) |
Definition at line 9545 of file s_ctl_flow.c.
References active_forall_sh_idx, AT_ATTR_LINK, COPY_OPND, create_loop_stmts(), Func_Entry, Func_Exit, IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, IR_IDX_R, NULL, SH_IR_IDX, and TRACE.
Referenced by assignment_stmt_semantics(), forall_semantics(), and where_stmt_semantics().
void gen_forall_tmp | ( | expr_arg_type * | , |
opnd_type * | , | ||
int | , | ||
int | , | ||
boolean | |||
) |
Definition at line 9599 of file s_ctl_flow.c.
References active_forall_sh_idx, After, Alloc_Opr, Assignment_Stmt, AT_ATTR_LINK, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_AUTO_BASE_IDX, ATD_AUTOMATIC, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATT_FIRST_CPNT_IDX, BD_LB_FLD, BD_LB_IDX, BD_LEN_FLD, BD_LEN_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, Before, CG_INTEGER_DEFAULT_TYPE, Character, CIF_No_Usage_Rec, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, curr_scp_idx, curr_stmt_sh_idx, Dealloc_Opr, determine_tmp_size(), expr_semantics(), FALSE, Func_Entry, Func_Exit, gen_compiler_tmp(), GEN_COMPILER_TMP_ASG, gen_forall_derived_type(), gen_forall_tmp_bd_entry(), gen_ir(), gen_opnd(), gen_sh(), gen_whole_substring(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, init_exp_desc, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, Max_Opr, NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Priv, expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SCP_SB_BASED_IDX, SCP_SB_STACK_IDX, Section_Subscript_Opr, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, SN_ATTR_IDX, Struct_Opr, Subscript_Opr, TRACE, Triplet_Opr, TRUE, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, and xref_state.
Referenced by assignment_stmt_semantics(), and forall_semantics().
boolean gen_internal_dope_vector | ( | int_dope_type * | , |
opnd_type * | , | ||
boolean | , | ||
expr_arg_type * | |||
) |
Definition at line 6447 of file s_utils.c.
References _cptofcd(), int_dope_entry::a_contig, int_dope_entry::assoc, ATD_ARRAY_IDX, ATD_CLASS, ATD_CONST_IDX, ATD_FLD, ATD_TMP_IDX, ATT_CHAR_SEQ, ATT_STRUCT_BIT_LEN_IDX, int_dope_entry::base_addr, BD_SM_IDX, BD_XT_IDX, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, char_len_in_bytes, Character, CN_CONST, CN_INT_TO_C, CN_POOL_IDX, CN_Tbl_Idx, CN_TYPE_IDX, compare_cn_and_value(), Complex_4, Constant, COPY_OPND, CP_CONSTANT, create_bd_ntry_for_const(), int_dope_entry::dim, int_dope_entry::el_len, Error, EXIT, int_dope_entry::extent, FALSE, find_opnd_line_and_column(), opnd_entry::fld, fold_aggragate_expression(), Func_Entry, Func_Exit, Ge_Opr, opnd_entry::idx, Integer_8, Internal, IR_OPND_L, IR_Tbl_Idx, expr_semantics_args::linear_type, int_dope_entry::low_bound, Lt_Opr, make_io_type_code(), ntr_const_tbl(), NULL, int_dope_entry::num_dims, OPND_FLD, OPND_IDX, int_dope_entry::orig_base, int_dope_entry::orig_size, int_dope_entry::p_or_a, PRINTMSG(), int_dope_entry::ptr_alloc, expr_semantics_args::rank, expr_semantics_args::reference, expr_semantics_args::section, stmt_start_col, stmt_start_line, storage_bit_size_tbl, int_dope_entry::stride_mult, Structure, expr_semantics_args::tmp_reference, TRACE, TRUE, TYP_IDX, TYP_LINEAR, expr_semantics_args::type, int_dope_entry::type_code, expr_semantics_args::type_idx, and int_dope_entry::unused_1.
Referenced by interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), reshape_intrinsic(), and transfer_intrinsic().
void gen_loop_end_ir | ( | void | ) |
Definition at line 7273 of file s_ctl_flow.c.
References After, Asg_Opr, Assignment_Stmt, AT_OBJ_CLASS, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_DATA_INIT, ATD_LIVE_DO_VAR, ATD_SAVED, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, Before, Br_True_Opr, Br_Uncond_Opr, cif_flags, cif_loop_def_rec(), CIF_No_Usage_Rec, CN_CONST, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, compare_cn_and_value(), COPY_OPND, CRI_Ptr, curr_scp_idx, curr_stmt_sh_idx, cvrt_str_to_cn(), Data_Obj, Data_Stmt, defer_stmt_expansion, Do_Infinite_Stmt, Do_Iterative_Stmt, Do_While_Stmt, EXIT, expr_semantics(), FALSE, find_left_attr(), find_opnd_line_and_column(), fold_relationals(), folder_driver(), Func_Entry, Func_Exit, gen_compiler_tmp(), GEN_COMPILER_TMP_ASG, gen_sh(), Goto_Stmt, Gt_Opr, HUGE_INT1_F90, HUGE_INT2_F90, HUGE_INT4_F90, HUGE_INT8_F90, If_Stmt, 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, Integer, Integer_1, Integer_2, Integer_4, Integer_8, INTEGER_DEFAULT_TYPE, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, issue_overflow_msg_719, LOGICAL_DEFAULT_TYPE, Lt_Opr, MISC_RECS, Mult_Opr, need_to_issue_719, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Plus_Opr, PRINTMSG(), Priv, process_deferred_functions(), expr_semantics_args::rank, Referenced, SCP_SB_STATIC_INIT_IDX, SH_COL_NUM, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_P2_SKIP_ME, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_STMT_TYPE, Shared, stmt_start_col, stmt_start_line, TRACE, tree_produces_dealloc(), TRUE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type_idx, TYPELESS_DEFAULT_TYPE, Uminus_Opr, Warning, and xref_state.
Referenced by pgm_unit_semantics().
void gen_runtime_bounds | ( | int | ) |
Definition at line 9080 of file s_utils.c.
References Assumed_Size, AT_OBJ_NAME_PTR, ATD_ARRAY_IDX, ATD_IM_A_DOPE, BD_ARRAY_CLASS, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, copy_subtree(), defer_stmt_expansion, Dv_Access_Extent, Dv_Deref_Opr, find_base_attr(), Func_Entry, Func_Exit, gen_bounds_check_call(), gen_dv_access_low_bound(), gen_ir(), gen_opnd(), gen_rbounds_check_call(), IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, IL_VECTOR_SUBSCRIPT, Internal, IR_BOUNDS_DONE, IR_DV_DIM, IR_IDX_L, IR_IDX_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, Minus_Opr, NO_Tbl_Idx, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Plus_Opr, PRINTMSG(), SA_INTEGER_DEFAULT_TYPE, TRACE, Triplet_Opr, and TRUE.
Referenced by gen_runtime_checks().
void gen_runtime_conformance | ( | opnd_type * | , |
expr_arg_type * | , | ||
opnd_type * | , | ||
expr_arg_type * | |||
) |
Definition at line 8873 of file s_utils.c.
References defer_stmt_expansion, find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_conform_check_call(), Internal, NULL, PRINTMSG(), expr_semantics_args::rank, expr_semantics_args::shape, and TRACE.
Referenced by gen_assumed_shape_copy(), minval_intrinsic(), pack_intrinsic(), and unpack_intrinsic().
void gen_runtime_substring | ( | int | ) |
Definition at line 8930 of file s_utils.c.
References AT_OBJ_NAME_PTR, ATD_TYPE_IDX, CN_Tbl_Idx, COPY_OPND, defer_stmt_expansion, find_base_attr(), Func_Entry, Func_Exit, gen_sbounds_check_call(), IL_NEXT_LIST_IDX, IL_OPND, Internal, IR_BOUNDS_DONE, IR_IDX_R, IR_OPND_L, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, PRINTMSG(), TRACE, TRUE, TYP_FLD, and TYP_IDX.
Referenced by gen_runtime_checks().
int gen_sf_dv_whole_def | ( | opnd_type * | , |
int | , | ||
int | |||
) |
Definition at line 7250 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, Assignment_Stmt, AT_OBJ_CLASS, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CLASS, ATD_IM_A_DOPE, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATT_CHAR_SEQ, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_SM_FLD, BD_SM_IDX, BD_XT_FLD, BD_XT_IDX, Before, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, char_len_in_bytes, Character, CN_INTEGER_CHAR_BIT_IDX, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Compiler_Tmp, size_offset_entry::constant, COPY_OPND, create_dv_type_code(), CRI_Ch_Ptr, CRI_Ch_Ptr_8, CRI_Ptr, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Dv_Access_Base_Addr, Dv_Def_Asg_Opr, Dv_Whole_Def_Opr, FALSE, find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Loc_Opr, make_base_subtree(), Mult_Opr, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Priv, result, SA_INTEGER_DEFAULT_TYPE, SCP_SB_STACK_IDX, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, size_offset_binary_calc(), storage_bit_size_tbl, Structure, TRACE, transform_char_sequence_ref(), TRUE, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, and size_offset_entry::type_idx.
Referenced by process_cpnt_inits(), and process_variable_size_func().
void gen_split_alloc | ( | int | , |
int | , | ||
int | |||
) |
Definition at line 9151 of file s_ctl_flow.c.
References Allocate_Stmt, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_PE_ARRAY_IDX, Before, CN_Tbl_Idx, COPY_TBL_NTRY, curr_stmt_sh_idx, FALSE, find_left_attr(), Func_Entry, Func_Exit, gen_alloc_header_const(), 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, Integer_8, IR_COL_NUM, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_L, IR_LIST_CNT_R, ir_tbl, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, set_up_allocate_as_call(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, and TRUE.
Referenced by allocate_stmt_semantics(), deallocate_local_allocatables(), and deallocate_stmt_semantics().
void gen_static_dv_whole_def | ( | opnd_type * | , |
int | , | ||
sh_position_type | |||
) |
Definition at line 2465 of file s_utils.c.
References After, Assignment_Stmt, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_CLASS, ATD_FLD, ATD_POINTER, ATD_TMP_IDX, ATD_TMP_INIT_NOT_DONE, ATD_TYPE_IDX, ATT_STRUCT_BIT_LEN_IDX, BD_RANK, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, char_len_in_bytes, Character, CLEAR_TBL_NTRY, cmd_line_flags, CN_CONST, CN_INT_TO_C, CN_Tbl_Idx, compare_cn_and_value(), Compiler_Tmp, COPY_OPND, curr_stmt_sh_idx, DV_DIM_WORD_SIZE, DV_HD_WORD_SIZE, DV_SET_EL_LEN, Dv_Set_El_Len, DV_SET_LOW_BOUND, DV_SET_NUM_DIMS, DV_SET_P_OR_A, DV_SET_STRIDE_MULT, DV_SET_TYPE_CODE, Error, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, Ge_Opr, gen_init_stmt(), gen_sh(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, make_io_type_code(), Mult_Opr, ntr_const_tbl(), NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, PRINTMSG(), cmd_line_flags_entry::runtime_bounds, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, storage_bit_size_tbl, Structure, TRACE, TRUE, TYP_BIT_LEN, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, type_tbl, and Typeless.
Referenced by gen_default_init_code(), gen_entry_dope_code(), and struct_construct_opr_handler().
int gen_static_integer_array_tmp | ( | int | , |
int | , | ||
int | |||
) |
Definition at line 7984 of file s_utils.c.
References AT_SEMANTICS_DONE, ATD_ARRAY_IDX, ATD_DATA_INIT, ATD_SAVED, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, CN_Tbl_Idx, create_bd_ntry_for_const(), curr_scp_idx, opnd_entry::fld, Func_Entry, Func_Exit, gen_compiler_tmp(), opnd_entry::idx, init_exp_desc, Integer, expr_semantics_args::linear_type, NULL, expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SCP_SB_STATIC_INIT_IDX, expr_semantics_args::shape, Shared, TRACE, TRUE, TYP_LINEAR, expr_semantics_args::type, and expr_semantics_args::type_idx.
Referenced by create_argchck_descriptor(), create_namelist_descriptor(), create_strct_tbl(), create_struct_argchck_tbl(), gen_arg_type_descriptor(), gen_call_type_descriptor(), and namelist_static_dv_whole_def().
boolean gen_whole_subscript | ( | opnd_type * | , |
expr_arg_type * | |||
) |
Definition at line 2528 of file s_asg_expr.c.
References ADD_TMP_TO_SHARED_LIST, Assignment_Stmt, Assumed_Size, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_LCV_IS_CONST, ATD_PE_ARRAY_IDX, ATD_TYPE_IDX, BD_ARRAY_CLASS, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, BD_XT_FLD, BD_XT_IDX, cast_to_cg_default(), CG_INTEGER_DEFAULT_TYPE, Character, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, CN_TYPE_IDX, COPY_OPND, copy_subtree(), curr_stmt_sh_idx, Data_Obj, Dv_Access_Extent, Dv_Deref_Opr, Error, EXIT, FALSE, find_base_attr(), FREE_IR_NODE, Func_Entry, Func_Exit, gen_dv_access_low_bound(), gen_whole_substring(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PE_SUBSCRIPT, IL_PREV_LIST_IDX, IL_Tbl_Idx, in_call_list, in_io_list, INTEGER_DEFAULT_TYPE, io_item_must_flatten, IR_ARRAY_SYNTAX, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, Minus_Opr, My_Pe_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, expr_semantics_args::pe_dim_ref, Plus_Opr, PRINTMSG(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, SH_IR_IDX, SH_STMT_TYPE, expr_semantics_args::shape, SHAPE_FOLDABLE, SHAPE_WILL_FOLD_LATER, Subscript_Opr, TRACE, Triplet_Opr, TRUE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, expr_semantics_args::type_idx, and Whole_Subscript_Opr.
Referenced by adjustl_intrinsic(), allocate_stmt_semantics(), create_argchck_descriptor(), create_constructor_constant(), create_namelist_descriptor(), create_runtime_array_constructor(), create_strct_tbl(), create_struct_constructor_asg(), create_tmp_asg(), discombobulate_structure_ref(), final_arg_work(), flatten_function_call(), fold_aggragate_expression(), gen_arg_type_descriptor(), gen_call_type_descriptor(), gen_default_init_code(), gen_entry_dope_code(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), lbound_intrinsic(), null_intrinsic(), optimize_reshape(), process_all_initialized_cpnts(), process_cpnt_inits(), reshape_intrinsic(), shape_intrinsic(), struct_construct_opr_handler(), struct_opr_handler(), subscript_opr_handler(), transfer_intrinsic(), and ubound_intrinsic().
Definition at line 4679 of file s_call.c.
References expr_semantics_args::allocatable, Array_Elt, expr_semantics_args::array_elt, Array_Expr, Array_Ptr, Array_Tmp_Elt, Array_Tmp_Ptr, expr_semantics_args::assumed_shape, expr_semantics_args::constant, Constant_Array_Section, expr_semantics_args::contig_array, Contig_Section, expr_semantics_args::dope_vector, Dv_Array_Section, Dv_Contig_Section, Func_Entry, Func_Exit, expr_semantics_args::has_symbolic, NULL, expr_semantics_args::pointer, expr_semantics_args::rank, expr_semantics_args::reference, Scalar_Constant, Scalar_Expression, Scalar_Ptr, Scalar_Tmp_Ptr, Scalar_Tmp_Var, Scalar_Var, expr_semantics_args::section, Sequence_Array_Section, expr_semantics_args::tmp_reference, TRACE, expr_semantics_args::vector_subscript, Vector_Subscript_Section, Whole_Allocatable, Whole_Array_Constant, Whole_Ass_Shape, Whole_Sequence, Whole_Tmp_Allocatable, and Whole_Tmp_Sequence.
Referenced by dope_vector_setup(), final_arg_work(), and gen_dv_whole_def().
void get_char_len | ( | opnd_type * | , |
opnd_type * | |||
) |
Definition at line 7142 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, AT_Tbl_Idx, Character, CN_Tbl_Idx, CN_TYPE_IDX, COPY_OPND, find_opnd_line_and_column(), Func_Entry, Func_Exit, get_char_len(), IL_NEXT_LIST_IDX, IL_OPND, Internal, IR_IDX_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NO_Tbl_Idx, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Paren_Opr, PRINTMSG(), Stmt_Expansion_Opr, Substring_Opr, TRACE, TYP_FLD, TYP_IDX, TYP_TYPE, and Whole_Substring_Opr.
Referenced by call_list_semantics(), get_char_len(), get_concat_len(), and resolve_ext_opr().
void get_concat_len | ( | int | , |
opnd_type * | |||
) |
Definition at line 7076 of file s_utils.c.
References CG_INTEGER_DEFAULT_TYPE, COPY_OPND, Func_Entry, Func_Exit, get_char_len(), IL_NEXT_LIST_IDX, IL_OPND, IR_COL_NUM, IR_IDX_L, IR_LINE_NUM, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NO_Tbl_Idx, NTR_IR_TBL, NULL, null_opnd, OPND_FLD, OPND_IDX, Plus_Opr, and TRACE.
Referenced by compute_char_element_len(), transfer_intrinsic(), and validate_char_len().
void get_shape_from_attr | ( | expr_arg_type * | , |
int | , | ||
int | , | ||
int | , | ||
int | |||
) |
Definition at line 7742 of file s_utils.c.
References ADD_TMP_TO_SHARED_LIST, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_LCV_IS_CONST, BD_XT_FLD, BD_XT_IDX, CN_Tbl_Idx, Data_Obj, Dv_Access_Extent, FALSE, Func_Entry, Func_Exit, IR_COL_NUM, IR_COL_NUM_L, IR_DV_DIM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NTR_IR_TBL, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, SA_INTEGER_DEFAULT_TYPE, expr_semantics_args::shape, SHAPE_FOLDABLE, SHAPE_WILL_FOLD_LATER, TRACE, and TRUE.
Referenced by call_list_semantics(), gen_assumed_shape_copy(), resolve_ext_opr(), and set_shape_for_deferred_funcs().
int get_stmt_tmp | ( | int | , |
boolean | , | ||
int | |||
) |
Definition at line 8050 of file s_call.c.
References AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_ASG_TMP, ATD_ELEMENTAL_CALL_TMP, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, cdir_switches, comp_phase, curr_scp_idx, curr_stmt_sh_idx, stmt_tmp_entry::dope_vector_tmps_head, stmt_tmp_entry::dope_vector_tmps_tail, dump_flags, EXIT, FALSE, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_entry_dope_code(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, dump_flags_entry::mp, NTR_IR_LIST_TBL, NULL, NULL_IDX, cdir_switch_entry::parallel_region, Pass2_Semantics, Priv, stmt_tmp_entry::scalar_tmps_head, stmt_tmp_entry::scalar_tmps_tail, SCP_SB_STACK_IDX, SH_PREV_IDX, stmt_start_col, stmt_start_line, stmt_tmp_tbl, TRACE, TRUE, and TYP_LINEAR.
Referenced by create_tmp_asg(), and flatten_function_call().
void goto_stmt_semantics | ( | void | ) |
Definition at line 4191 of file s_ctl_flow.c.
References AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_IN_ASSIGN, ATD_TYPE_IDX, ATL_IN_ASSIGN, ATP_HAS_TASK_DIRS, Br_Asg_Opr, Br_Index_Opr, Br_Uncond_Opr, chk_for_unlabeled_stmt(), CIF_Symbol_Reference, CN_Tbl_Idx, COPY_OPND, create_tmp_asg(), curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Error, EXIT, expr_semantics(), FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, IL_COL_NUM, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, Integer, INTEGER_DEFAULT_TYPE, Intent_In, Internal, IR_COL_NUM_L, IR_IDX_L, IR_IDX_R, IR_LINE_NUM_L, IR_OPND_L, IR_OPR, IR_Tbl_Idx, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SCP_ATTR_IDX, SH_COMPILER_GEN, SH_IR_IDX, stmt_start_col, stmt_start_line, TRACE, TRUE, TYP_LINEAR, expr_semantics_args::type, Warning, and xref_state.
void if_stmt_semantics | ( | void | ) |
Definition at line 4384 of file s_ctl_flow.c.
References arg_info_list_base, arg_info_list_top, AT_Tbl_Idx, Br_True_Opr, Br_Uncond_Opr, CIF_Symbol_Reference, COPY_OPND, curr_stmt_sh_idx, Cycle_Stmt, defer_stmt_expansion, Error, Exit_Stmt, expr_semantics(), FALSE, Func_Entry, Func_Exit, gen_internal_lbl(), Goto_Stmt, has_present_opr, If_Cstrct_Stmt, If_Opr, If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, in_branch_true, io_item_must_flatten, IR_COL_NUM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Logical, Not_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, null_opnd, number_of_functions, PRINTMSG(), expr_semantics_args::rank, SH_COMPILER_GEN, SH_ERR_FLG, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_STMT_TYPE, short_circuit_branch(), short_circuit_high_level_if(), stmt_start_col, stmt_start_line, TRACE, TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, and xref_state.
void illegal_stmt_type | ( | void | ) |
Definition at line 534 of file s_driver.c.
References curr_stmt_sh_idx, Func_Entry, Func_Exit, Internal, NULL, PRINTMSG(), SH_GLB_LINE, and TRACE.
void inquire_stmt_semantics | ( | void | ) |
Definition at line 1356 of file s_io.c.
References add_alt_return_lbl(), After, Alt_Return_Opr, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, Asg_Opr, Assignment_Stmt, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, Before, Br_True_Opr, C_INT_TO_CN, Call_Opr, CG_INTEGER_DEFAULT_TYPE, check_for_legal_define(), CIF_Symbol_Modification, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, create_io_call_descriptor(), curr_scp_idx, curr_stmt_sh_idx, defer_stmt_expansion, enlarge_call_list_tables(), enlarge_info_list_table(), Eq_Opr, err_attr_idx, err_list_idx, Error, expr_semantics(), FALSE, final_arg_work(), find_left_attr(), find_opnd_line_and_column(), FL_IO_SINGLE, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_runtime_checks(), gen_sh(), If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_OPND, Inquire, Inquire_Desc, Inquire_Opr, Integer, INTEGER_DEFAULT_TYPE, io_ctl_list_semantics(), io_item_must_flatten, io_list_semantics(), io_stmt_must_be_split, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, LOGICAL_DEFAULT_TYPE, max_call_list_size, NTR_IR_TBL, NULL, number_of_functions, PRINTMSG(), Priv, process_deferred_io_list(), expr_semantics_args::rank, expr_semantics_args::reference, Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, tree_has_constructor, TRUE, expr_semantics_args::type, and xref_state.
void interface_stmt_semantics | ( | void | ) |
boolean is_local_forall_index | ( | int | ) |
Definition at line 9275 of file s_ctl_flow.c.
References active_forall_sh_idx, AT_ATTR_LINK, ATD_FORALL_INDEX, FALSE, Func_Entry, Func_Exit, IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_Tbl_Idx, IR_IDX_R, NULL, result, SH_IR_IDX, TRACE, and TRUE.
Referenced by check_forall_triplet_for_index().
void label_def_stmt_semantics | ( | void | ) |
Definition at line 1697 of file s_driver.c.
References cdir_switch_entry::align, AT_REFERENCED, ATL_ALIGN, ATL_BL, ATL_CLASS, ATL_NORECURRENCE, ATL_NOTASK, ATL_NOVECTOR, ATL_NOVSEARCH, ATL_PATTERN, cdir_switch_entry::bl, cdir_switches, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_IDX_L, Lbl_User, cdir_switch_entry::notask_region, NULL, cdir_switch_entry::pattern, cdir_switch_entry::recurrence, Referenced, SH_IR_IDX, cdir_switch_entry::task, TRACE, TRUE, cdir_switch_entry::vector, and cdir_switch_entry::vsearch.
void look_for_real_div | ( | opnd_type * | ) |
Definition at line 4641 of file s_asg_expr.c.
References Caution, COPY_OPND, Div_Opr, Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, IR_COL_NUM, IR_LINE_NUM, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, look_for_real_div(), NULL, on_off_flags, OPND_FLD, OPND_IDX, PRINTMSG(), Real, Real_Div_To_Int_Opr, on_off_flags_entry::round_integer_divide, TRACE, and TYP_TYPE.
Referenced by assignment_stmt_semantics(), int_intrinsic(), and look_for_real_div().
void make_base_subtree | ( | opnd_type * | , |
opnd_type * | , | ||
int * | , | ||
int * | |||
) |
Definition at line 4638 of file s_utils.c.
References AT_Tbl_Idx, Call_Opr, CN_Tbl_Idx, COPY_OPND, COPY_TBL_NTRY, Dv_Deref_Opr, find_opnd_line_and_column(), Func_Entry, Func_Exit, idx, IL_ARG_DESC_VARIANT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Internal, IR_COL_NUM, IR_IDX_L, IR_LINE_NUM, ir_list_tbl, IR_OPND_L, IR_OPND_R, IR_OPR, IR_RANK, ir_tbl, IR_Tbl_Idx, make_base_subtree(), NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, OPND_LIST_CNT, PRINTMSG(), Section_Subscript_Opr, Subscript_Opr, TRACE, Triplet_Opr, and Whole_Subscript_Opr.
Referenced by create_strct_tbl(), dope_vector_setup(), final_arg_work(), flatten_function_call(), gen_dv_whole_def(), gen_init_stmt(), gen_sf_dv_whole_def(), loc_intrinsic(), make_base_subtree(), namelist_static_dv_whole_def(), optimize_reshape(), and ranget_intrinsic().
void make_triplet_extent_tree | ( | opnd_type * | , |
int | |||
) |
Definition at line 3329 of file s_asg_expr.c.
References CG_INTEGER_DEFAULT_TYPE, CIF_No_Usage_Rec, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, copy_subtree(), Div_Opr, expr_mode, expr_semantics(), find_opnd_line_and_column(), expr_semantics_args::foldable, Func_Entry, Func_Exit, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Max_Opr, Minus_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, OPND_FLD, OPND_IDX, Plus_Opr, expr_semantics_args::rank, Regular_Expr, SHAPE_FOLDABLE, SHAPE_WILL_FOLD_LATER, TRACE, TRUE, expr_semantics_args::will_fold_later, and xref_state.
Referenced by subscript_opr_handler().
void module_stmt_semantics | ( | void | ) |
Definition at line 180 of file s_dcl_pu.c.
References Func_Entry, Func_Exit, NULL, and TRACE.
void no_semantics_routine | ( | void | ) |
Definition at line 567 of file s_driver.c.
References curr_stmt_sh_idx, Func_Entry, Func_Exit, Internal, NULL, PRINTMSG(), SH_GLB_LINE, stmt_type, stmt_type_str, and TRACE.
void nullify_stmt_semantics | ( | void | ) |
Definition at line 4598 of file s_ctl_flow.c.
References Assignment_Stmt, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATD_PURE, ATP_ELEMENTAL, ATP_PURE, Before, Call_Opr, CG_INTEGER_DEFAULT_TYPE, CIF_Symbol_Modification, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COPY_OPND, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Dv_Deref_Opr, Dv_Set_Assoc, Error, expr_semantics(), FALSE, find_left_attr(), find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_sh(), IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, Internal, IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, expr_semantics_args::pointer, PRINTMSG(), expr_semantics_args::rank, remove_sh(), SCP_ATTR_IDX, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, TRUE, Whole_Subscript_Opr, Whole_Substring_Opr, and xref_state.
void open_stmt_semantics | ( | void | ) |
Definition at line 1650 of file s_io.c.
References add_alt_return_lbl(), Alt_Return_Opr, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, Before, Br_True_Opr, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, create_io_call_descriptor(), curr_scp_idx, curr_stmt_sh_idx, enlarge_call_list_tables(), enlarge_info_list_table(), Eq_Opr, err_attr_idx, err_list_idx, FALSE, final_arg_work(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), If_Stmt, IL_OPND, io_ctl_list_semantics(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, LOGICAL_DEFAULT_TYPE, max_call_list_size, NTR_IR_TBL, NULL, Open, Open_Desc, Open_Opr, Priv, Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, and TRUE.
boolean operation_is_intrinsic | ( | operator_type | , |
int | , | ||
int | , | ||
int | , | ||
int | |||
) |
Definition at line 3077 of file s_asg_expr.c.
References And_Opr, AND_OR_EXTN, AND_OR_TYPE, ASG_EXTN, Asg_Opr, ASG_TYPE, BIN_ADD_EXTN, BIN_ADD_TYPE, BIN_SUB_EXTN, BIN_SUB_TYPE, Character, Concat_Opr, Div_Opr, EQ_NE_EXTN, EQ_NE_TYPE, Eq_Opr, Eqv_Opr, Err_Res, EXIT, FALSE, Func_Entry, Func_Exit, Ge_Opr, GT_LT_EXTN, GT_LT_TYPE, Gt_Opr, Le_Opr, Lt_Opr, Minus_Opr, MULT_DIV_EXTN, MULT_DIV_TYPE, Mult_Opr, Ne_Opr, Neqv_Opr, NOT_EXTN, Not_Opr, NOT_TYPE, NULL, Null_Opr, Or_Opr, Plus_Opr, POWER_EXTN, Power_Opr, POWER_TYPE, Structure_Type, TRACE, TRUE, TYP_LINEAR, TYP_TYPE, Typeless, UN_PLUS_EXTN, and UN_PLUS_TYPE.
Referenced by verify_interface().
void outmoded_if_stmt_semantics | ( | void | ) |
Definition at line 4736 of file s_ctl_flow.c.
References After, Br_True_Opr, Br_Uncond_Opr, cast_typeless_constant(), CG_INTEGER_DEFAULT_TYPE, chk_for_unlabeled_stmt(), cif_flags, CIF_If_Indirect_Logical_Stmt, CIF_If_Two_Branch_Arithmetic_Stmt, cif_stmt_type_rec(), CIF_Symbol_Reference, CN_CONST, COPY_OPND, curr_stmt_sh_idx, Error, EXIT, expr_semantics(), FALSE, find_opnd_line_and_column(), FREE_IR_LIST_NODE, Func_Entry, Func_Exit, gen_sh(), Goto_Stmt, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, Integer, INTEGER_DEFAULT_TYPE, IR_COL_NUM, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_TYPE_IDX, expr_semantics_args::linear_type, Logical, LOGICAL_DEFAULT_TYPE, Long_Typeless, MISC_RECS, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, PRINTMSG(), expr_semantics_args::rank, Real, SH_ERR_FLG, SH_IR_IDX, Short_Typeless_Const, statement_number, stmt_start_col, stmt_start_line, TRACE, TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, Typeless, TYPELESS_DEFAULT_TYPE, and xref_state.
void pause_stmt_semantics | ( | void | ) |
void print_stmt_semantics | ( | void | ) |
Definition at line 1815 of file s_io.c.
References ADD_ATTR_TO_LOCAL_LIST, Aloc_Opr, AT_Tbl_Idx, Before, Call_Opr, Call_Stmt, CG_INTEGER_DEFAULT_TYPE, COPY_OPND, create_lib_entry_attr(), CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, defer_stmt_expansion, Error, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_runtime_checks(), gen_sh(), IL_FLD, IL_IDX, IL_OPND, IL_Tbl_Idx, io_ctl_list_semantics(), io_item_must_flatten, io_list_semantics(), io_stmt_must_be_split, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, is_namelist, Loc_Opr, namelist_descriptor_attr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, number_of_functions, Print, PRINTMSG(), process_deferred_io_list(), SCP_DOES_IO, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, stmt_start_col, stmt_start_line, TRACE, tree_has_constructor, and TRUE.
void process_char_len | ( | opnd_type * | ) |
Definition at line 3479 of file s_rcnstrct.c.
References arg_info_list, arg_info_list_base, arg_info_list_size, arg_info_list_top, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_FLD, ATD_IMP_DO_LCV, ATD_TMP_IDX, Call_Opr, CIF_No_Usage_Rec, COPY_OPND, copy_subtree(), Data_Obj, arg_strct::ed, enlarge_info_list_table(), expr_sem(), Func_Entry, Func_Exit, gen_opnd(), IL_ARG_DESC_IDX, IL_FLD, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, IR_IDX_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NO_Tbl_Idx, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, process_char_len(), expr_semantics_args::rank, TRACE, and xref_state.
Referenced by create_constructor_constant(), create_runtime_array_constructor(), and process_char_len().
void process_cpnt_inits | ( | opnd_type * | , |
int | , | ||
void(*)() | , | ||
int | , | ||
sh_position_type | |||
) |
Definition at line 2960 of file s_utils.c.
References After, Asg_Opr, Assignment_Stmt, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_CPNT_INIT_IDX, ATD_FLD, ATD_POINTER, ATD_TMP_IDX, ATD_TYPE_IDX, ATT_DEFAULT_INITIALIZED, ATT_FIRST_CPNT_IDX, ATT_POINTER_CPNT, BD_LB_FLD, BD_LB_IDX, BD_RANK, Before, Character, CN_Tbl_Idx, CN_TYPE_IDX, expr_semantics_args::constant, COPY_OPND, curr_stmt_sh_idx, FALSE, find_left_attr(), find_opnd_line_and_column(), fold_aggragate_expression(), expr_semantics_args::foldable, FREE_SH_NODE, Func_Entry, Func_Exit, gen_dv_def_loops(), gen_dv_whole_def(), gen_dv_whole_def_init(), gen_init_stmt(), gen_opnd(), gen_sf_dv_whole_def(), gen_sh(), gen_whole_subscript(), gen_whole_substring(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, init_exp_desc, Init_Opr, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, Mult_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), process_cpnt_inits(), remove_sh(), SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, SN_ATTR_IDX, SN_SIBLING_LINK, Struct_Opr, Structure, Subscript_Opr, target_array_idx, TRACE, TRUE, TYP_IDX, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, and expr_semantics_args::type_idx.
Referenced by allocate_stmt_semantics(), flatten_function_call(), gen_entry_dope_code(), and process_cpnt_inits().
void process_deferred_functions | ( | opnd_type * | ) |
Definition at line 4841 of file s_utils.c.
References After, Before, COPY_OPND, curr_stmt_sh_idx, find_opnd_line_and_column(), Func_Entry, Func_Exit, IL_FLD, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, insert_sh_chain(), Internal, IR_COL_NUM, IR_FLD_L, IR_FLD_R, IR_LINE_NUM, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NO_Tbl_Idx, NULL, NULL_IDX, null_opnd, OPND_FLD, OPND_IDX, PRINTMSG(), process_deferred_functions(), SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_Tbl_Idx, STMT_EXPAND_AFTER_END_SH, STMT_EXPAND_AFTER_START_SH, STMT_EXPAND_BEFORE_END_SH, STMT_EXPAND_BEFORE_START_SH, Stmt_Expansion_Opr, and TRACE.
Referenced by assignment_stmt_semantics(), do_stmt_semantics(), expand_imp_do(), expand_io_list(), expand_stmts(), gen_loop_end_ir(), interpret_constructor(), process_deferred_functions(), select_stmt_semantics(), short_circuit_branch(), and short_circuit_high_level_if().
void program_stmt_semantics | ( | void | ) |
Definition at line 210 of file s_dcl_pu.c.
References Func_Entry, Func_Exit, NULL, and TRACE.
void ptr_assign_from_ptr | ( | opnd_type * | , |
opnd_type * | |||
) |
Definition at line 3553 of file s_asg_expr.c.
References After, Assignment_Stmt, Before, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, curr_stmt_sh_idx, Dv_Deref_Opr, Dv_Set_P_Or_A, Dv_Whole_Copy_Opr, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_sh(), Internal, IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NTR_IR_TBL, NULL, OPND_FLD, OPND_IDX, PRINTMSG(), SH_IR_IDX, SH_LABELED, SH_PREV_IDX, stmt_start_col, stmt_start_line, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by create_struct_constructor_asg(), and lower_ptr_asg().
void read_stmt_semantics | ( | void | ) |
Definition at line 1961 of file s_io.c.
References ADD_ATTR_TO_LOCAL_LIST, After, Aloc_Opr, Alt_Return_Opr, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATL_DEF_STMT_IDX, Before, Br_Index_Opr, Br_True_Opr, Call_Opr, Call_Stmt, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Continue_Stmt, COPY_OPND, create_lib_entry_attr(), CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, defer_stmt_expansion, end_list_idx, eor_list_idx, err_list_idx, Error, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_internal_lbl(), gen_runtime_checks(), gen_sh(), have_iostat, If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, io_ctl_list_semantics(), io_item_must_flatten, io_list_semantics(), io_stmt_must_be_split, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, is_namelist, Label_Opr, Loc_Opr, LOGICAL_DEFAULT_TYPE, namelist_descriptor_attr, Ne_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, number_of_functions, PRINTMSG(), Priv, process_deferred_io_list(), Read, Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, stmt_start_col, stmt_start_line, TRACE, tree_has_constructor, TRUE, and TYPELESS_DEFAULT_TYPE.
void return_stmt_semantics | ( | void | ) |
Definition at line 4903 of file s_ctl_flow.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, ATP_PGM_UNIT, ATP_RSLT_IDX, Br_Uncond_Opr, cast_to_cg_default(), cdir_switches, Character, CIF_Symbol_Reference, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, size_offset_entry::constant, copy_entry_exit_sh_list(), COPY_OPND, curr_scp_idx, curr_stmt_sh_idx, Error, expr_semantics(), FALSE, Func_Entry, Func_Exit, Function, Gt_Opr, idx, insert_sh_chain_before(), Integer, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_OPND_L, IR_OPR, NO_Tbl_Idx, NULL, NULL_IDX, cdir_switch_entry::parallel_region, PRINTMSG(), expr_semantics_args::rank, result, SCP_ALT_ENTRY_CNT, SCP_ATTR_IDX, SCP_ENTRY_IDX, SCP_EXIT_IR_SH_IDX, SCP_RETURN_LABEL, SH_IR_IDX, SH_NEXT_IDX, size, size_offset_logical_calc(), stmt_start_col, stmt_start_line, stor_bit_size_of(), Structure, Subroutine, THIS_IS_TRUE, TRACE, TRUE, TYP_TYPE, expr_semantics_args::type, size_offset_entry::type_idx, and xref_state.
void rewind_stmt_semantics | ( | void | ) |
Definition at line 2322 of file s_io.c.
References add_alt_return_lbl(), Alt_Return_Opr, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list_size, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_HAS_ALT_RETURN, Before, Br_True_Opr, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COPY_OPND, curr_scp_idx, curr_stmt_sh_idx, enlarge_call_list_tables(), enlarge_info_list_table(), Eq_Opr, err_attr_idx, err_list_idx, FALSE, final_arg_work(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), If_Stmt, IL_OPND, io_ctl_list_semantics(), IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, LOGICAL_DEFAULT_TYPE, max_call_list_size, NTR_IR_TBL, NULL, Priv, Referenced, Rewind, Rewind_Opr, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, TRACE, and TRUE.
void select_stmt_semantics | ( | void | ) |
Definition at line 5065 of file s_ctl_flow.c.
References After, arg_info_list_base, arg_info_list_top, Assignment_Stmt, AT_OBJ_CLASS, AT_Tbl_Idx, ATL_DEF_STMT_IDX, Before, Character, CIF_Symbol_Reference, COPY_OPND, create_tmp_asg(), curr_stmt_sh_idx, defer_stmt_expansion, End_Select_Stmt, Error, expr_semantics(), FALSE, find_opnd_line_and_column(), FREE_SH_NODE, Func_Entry, Func_Exit, gen_sh(), IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, insert_sh_chain(), Integer, Intent_In, Internal, IR_IDX_L, IR_IDX_R, IR_OPND_L, IR_TYPE_IDX, Label, Logical, NULL, NULL_IDX, number_of_functions, PRINTMSG(), process_deferred_functions(), expr_semantics_args::rank, remove_sh(), SH_ERR_FLG, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_STMT_TYPE, TRACE, tree_produces_dealloc(), TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, validate_char_len(), where_dealloc_stmt_idx, and xref_state.
void set_directives_on_label | ( | int | ) |
Definition at line 8094 of file s_ctl_flow.c.
References cdir_switch_entry::aggressiveinnerloopfission, cdir_switch_entry::align, AT_DEF_COLUMN, AT_DEF_LINE, ATL_AGGRESSIVEINNERLOOPFISSION, ATL_ALIGN, ATL_BL, ATL_CNCALL, ATL_CONCURRENT, ATL_DIRECTIVE_LIST, ATL_FISSIONABLE, ATL_FUSABLE, ATL_FUSION, ATL_IVDEP, ATL_MAXCPUS, ATL_NEXTSCALAR, ATL_NOBLOCKING, ATL_NOFISSION, ATL_NOFUSION, ATL_NOINTERCHANGE, ATL_NORECURRENCE, ATL_NOTASK, ATL_NOVECTOR, ATL_NOVSEARCH, ATL_PATTERN, ATL_PERMUTATION, ATL_PREFERSTREAM, ATL_PREFERSTREAM_NOCINV, ATL_PREFERTASK, ATL_PREFERVECTOR, ATL_SHORTLOOP, ATL_SHORTLOOP128, ATL_SPLIT, ATL_STREAM, ATL_UNROLL_DIR, cdir_switch_entry::bl, cdir_switch_entry::blockable_count, Blockable_Dir_Idx, cdir_switch_entry::blockable_group, C_INT_TO_CN, Cache_Bypass_Dir_Idx, cdir_switch_entry::cache_bypass_ir_idx, cdir_switches, CG_INTEGER_DEFAULT_TYPE, clear_cdir_switches(), CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, cdir_switch_entry::cncall, cdir_switch_entry::concurrent, Concurrent_Dir_Idx, cdir_switch_entry::concurrent_idx, COPY_OPND, FALSE, cdir_switch_entry::fissionable, Func_Entry, Func_Exit, cdir_switch_entry::fusable, opt_flags_entry::fusion, idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_LIST_CNT, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, cdir_switch_entry::interchange_count, Interchange_Dir_Idx, cdir_switch_entry::interchange_group, cdir_switch_entry::interchange_level, Interchange_Level_Dir_Idx, IR_FLD_L, IR_IDX_L, IR_LIST_CNT_L, cdir_switch_entry::ivdep, cdir_switch_entry::mark, cdir_switch_entry::mark_cmdline_idx, Mark_Dir_Idx, cdir_switch_entry::mark_dir_idx, cdir_switch_entry::maxcpus, Maxcpus_Dir_Idx, cdir_switch_entry::maxcpus_opnd, cdir_switch_entry::nextscalar, cdir_switch_entry::noblocking, cdir_switch_entry::nofission, cdir_switch_entry::nofusion, cdir_switch_entry::nointerchange, cdir_switch_entry::notask_region, NTR_IR_LIST_TBL, NULL, NULL_IDX, Num_Dir_On_List, opt_flags, cdir_switch_entry::pattern, cdir_switch_entry::permutation, cdir_switch_entry::preferstream, cdir_switch_entry::preferstream_nocinv, cdir_switch_entry::prefertask, cdir_switch_entry::prefervector, cdir_switch_entry::recurrence, Safevl_Dir_Idx, cdir_switch_entry::safevl_idx, cdir_switch_entry::shortloop, cdir_switch_entry::shortloop128, cdir_switch_entry::split, cdir_switch_entry::stream, cdir_switch_entry::task, TRACE, TRUE, cdir_switch_entry::unroll_count_idx, cdir_switch_entry::unroll_dir, Unroll_Dir_Idx, opt_flags_entry::unroll_lvl, Unroll_Lvl_2, cdir_switch_entry::vector, and cdir_switch_entry::vsearch.
Referenced by assignment_stmt_semantics(), and do_stmt_semantics().
void set_sb_first_attr_idx | ( | int | ) |
Definition at line 8468 of file s_io.c.
References AT_SEMANTICS_DONE, ATD_OFFSET_ASSIGNED, ATD_OFFSET_FLD, ATD_OFFSET_IDX, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, CLEAR_TBL_NTRY, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Func_Entry, Func_Exit, gen_compiler_tmp(), Long_Typeless, ntr_type_tbl(), NULL, Priv, SB_FIRST_ATTR_IDX, stmt_start_col, stmt_start_line, TRACE, TRUE, TYP_BIT_LEN, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, type_tbl, and Typeless.
Referenced by create_argchck_descriptor(), create_namelist_descriptor(), create_scalar_type_tbl(), create_strct_tbl(), and namelist_static_dv_whole_def().
void set_shape_for_deferred_funcs | ( | expr_arg_type * | , |
int | |||
) |
Definition at line 6173 of file s_utils.c.
References arg_info_list, Assumed_Shape, Assumed_Size, Assumed_Size_Char, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_FLD, ATD_SF_ARG_IDX, ATD_SF_DARG, ATD_SF_LINK, ATD_TMP_IDX, ATD_TYPE_IDX, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_RSLT_IDX, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, Character, CIF_No_Usage_Rec, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, Const_Len_Char, Constant_Size, COPY_OPND, copy_subtree(), Deferred_Shape, Dv_Access_Extent, Explicit_Shape, expr_semantics(), FALSE, opnd_entry::fld, expr_semantics_args::foldable, Func_Entry, Func_Exit, get_shape_from_attr(), opnd_entry::idx, IL_ARG_DESC_IDX, IL_NEXT_LIST_IDX, IL_OPND, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_DV_DIM, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Minus_Opr, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Plus_Opr, PRINTMSG(), expr_semantics_args::rank, SA_INTEGER_DEFAULT_TYPE, expr_semantics_args::shape, SHAPE_FOLDABLE, SHAPE_WILL_FOLD_LATER, SN_ATTR_IDX, TRACE, TRUE, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_ORIG_LEN_IDX, TYP_TYPE, Var_Len_Array, Whole_Subscript_Opr, Whole_Substring_Opr, expr_semantics_args::will_fold_later, and xref_state.
Referenced by call_list_semantics(), and resolve_ext_opr().
void set_up_allocate_as_call | ( | int | , |
int | , | ||
int | , | ||
boolean | |||
) |
Definition at line 9007 of file s_ctl_flow.c.
References AT_Tbl_Idx, Call_Opr, curr_stmt_sh_idx, Func_Entry, Func_Exit, idx, IL_NEXT_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_L, IR_LIST_CNT_R, IR_OPR, IR_TYPE_IDX, NTR_IR_TBL, NULL, NULL_IDX, SH_IR_IDX, TRACE, and TYPELESS_DEFAULT_TYPE.
Referenced by allocate_stmt_semantics(), deallocate_local_allocatables(), deallocate_stmt_semantics(), and gen_split_alloc().
void set_up_exp_desc | ( | opnd_type * | , |
expr_arg_type * | |||
) |
Definition at line 10278 of file s_utils.c.
References AT_OBJ_CLASS, AT_Tbl_Idx, ATD_TYPE_IDX, CN_Tbl_Idx, CN_TYPE_IDX, Data_Obj, find_opnd_line_and_column(), Func_Entry, Func_Exit, init_exp_desc, Internal, IR_RANK, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, NULL, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, TRACE, TYP_LINEAR, TYP_TYPE, expr_semantics_args::type, and expr_semantics_args::type_idx.
Referenced by change_section_to_do().
void short_circuit_branch | ( | void | ) |
Definition at line 4993 of file s_utils.c.
References After, And_Opr, Assignment_Stmt, AT_DEFINED, AT_REFERENCED, AT_Tbl_Idx, ATL_DEF_STMT_IDX, Before, Br_True_Opr, Continue_Stmt, COPY_OPND, curr_stmt_sh_idx, EXIT, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, GEN_COMPILER_TMP_ASG, gen_internal_lbl(), gen_sh(), If_Stmt, IL_OPND, IL_Tbl_Idx, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_SHORT_CIRCUIT_L, IR_SHORT_CIRCUIT_R, IR_Tbl_Idx, IR_TYPE_IDX, Label_Opr, LOGICAL_DEFAULT_TYPE, Not_Opr, NTR_IR_TBL, NULL, OPND_FLD, OPND_IDX, Or_Opr, Paren_Opr, Priv, process_deferred_functions(), Referenced, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, short_circuit_branch(), stmt_start_line, TRACE, tree_produces_dealloc(), TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by else_stmt_semantics(), if_stmt_semantics(), and short_circuit_branch().
boolean stmt_func_semantics | ( | int | ) |
Definition at line 4433 of file s_asg_expr.c.
References ASG_TYPE, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_NAME_PTR, ATD_SF_DARG, ATD_TYPE_IDX, ATP_FIRST_IDX, ATP_NUM_DARGS, ATS_SF_ACTIVE, ATS_SF_FLD, ATS_SF_IDX, ATS_SF_SEMANTICS_DONE, cdir_switches, CIF_Symbol_Reference, compare_derived_types(), copy_subtree(), Err_Res, Error, expr_mode, expr_semantics(), FALSE, Func_Entry, Func_Exit, expr_semantics_args::linear_type, no_func_expansion, NULL, OPND_FLD, OPND_IDX, cdir_switch_entry::parallel_region, PRINTMSG(), expr_semantics_args::rank, SN_ATTR_IDX, Stmt_Func_Expr, Structure_Type, TRACE, TRUE, TYP_LINEAR, expr_semantics_args::type_idx, and xref_state.
Referenced by final_attr_semantics(), and stmt_func_call_opr_handler().
void stop_pause_stmt_semantics | ( | void | ) |
Definition at line 5214 of file s_ctl_flow.c.
References ADD_ATTR_TO_LOCAL_LIST, Ansi, arg_info_list, arg_info_list_base, arg_info_list_size, arg_info_list_top, arg_list, arg_list_size, AT_DCL_ERR, AT_Tbl_Idx, ATP_DOES_NOT_RETURN, ATP_NOSIDE_EFFECTS, C_INT_TO_CN, Call_Opr, CG_INTEGER_DEFAULT_TYPE, expr_semantics_args::char_len, Character, Character_1, CHARACTER_DEFAULT_TYPE, CIF_Symbol_Reference, CLEAR_TBL_NTRY, cmd_line_flags, CN_CONST, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, cmd_line_flags_entry::co_array_fortran, compare_cn_and_value(), Const_Len_Char, expr_semantics_args::constant, convert_to_string(), COPY_OPND, create_lib_entry_attr(), curr_stmt_sh_idx, Default_Typed, arg_strct::ed, enlarge_call_list_tables(), enlarge_info_list_table(), Error, expr_semantics(), FALSE, final_arg_work(), opnd_entry::fld, Func_Entry, Func_Exit, glb_tbl_idx, Gt_Opr, opnd_entry::idx, IL_ARG_DESC_IDX, IL_ARG_DESC_VARIANT, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_OPND, IL_Tbl_Idx, init_arg_info, Integer, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, Lt_Opr, max_call_list_size, arg_strct::maybe_modified, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, ntr_type_tbl(), NULL, NULL_IDX, Pause_Attr_Idx, PAUSE_LIB_ENTRY, PAUSE_NAME_LEN, Pause_Opr, PRINTMSG(), expr_semantics_args::rank, SH_IR_IDX, STOP_ALL_LIB_ENTRY, STOP_ALL_NAME_LEN, Stop_Attr_Idx, STOP_LIB_ENTRY, STOP_NAME_LEN, TRACE, TRUE, TYP_CHAR_CLASS, TYP_DESC, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, expr_semantics_args::type, expr_semantics_args::type_idx, type_tbl, TYPELESS_DEFAULT_TYPE, and xref_state.
void subroutine_stmt_semantics | ( | void | ) |
Definition at line 241 of file s_dcl_pu.c.
References Func_Entry, Func_Exit, NULL, and TRACE.
void then_stmt_semantics | ( | void | ) |
Definition at line 5539 of file s_ctl_flow.c.
References curr_stmt_sh_idx, FREE_SH_NODE, Func_Entry, Func_Exit, NULL, remove_sh(), SH_PREV_IDX, and TRACE.
void transform_char_sequence_ref | ( | opnd_type * | , |
int | |||
) |
Definition at line 6806 of file s_utils.c.
References add_substring_length(), ADD_TMP_TO_SHARED_LIST, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_TYPE_IDX, ATT_CHAR_SEQ, ATT_FIRST_CPNT_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_LB_FLD, BD_LB_IDX, BD_RANK, Character, CHARACTER_DEFAULT_TYPE, CLEAR_TBL_NTRY, CN_INTEGER_CHAR_BIT_IDX, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, Const_Len_Char, size_offset_entry::constant, COPY_OPND, Default_Typed, Div_Opr, Dv_Deref_Opr, EXIT, FALSE, find_opnd_line_and_column(), size_offset_entry::fld, Func_Entry, Func_Exit, size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Internal, IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, OPND_FLD, OPND_IDX, print_ir(), PRINTMSG(), Section_Subscript_Opr, SH_Tbl_Idx, size_offset_binary_calc(), SN_ATTR_IDX, Struct_Opr, Structure, Subscript_Opr, Substring_Opr, TRACE, transform_char_sequence_ref(), TYP_CHAR_CLASS, TYP_DESC, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, size_offset_entry::type_idx, type_tbl, and Whole_Subscript_Opr.
Referenced by assignment_stmt_semantics(), create_scalar_type_tbl(), create_strct_tbl(), create_tmp_asg(), dope_vector_setup(), final_arg_work(), flatten_function_call(), gen_dv_whole_def(), gen_sf_dv_whole_def(), namelist_static_dv_whole_def(), optimize_reshape(), and transform_char_sequence_ref().
void transform_cri_ch_ptr | ( | opnd_type * | ) |
Definition at line 14672 of file s_asg_expr.c.
References Asg_Opr, Assignment_Stmt, AT_DEFINED, AT_OBJ_CLASS, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_CLASS, ATD_EQUIV, ATD_FLD, ATD_OFFSET_ASSIGNED, ATD_OFFSET_FLD, ATD_OFFSET_IDX, ATD_PTR_IDX, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATD_VARIABLE_TMP_IDX, Before, COPY_TBL_NTRY, create_equiv_stor_blk(), CRI__Pointee, CRI_Ch_Ptr, CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, Data_Obj, defer_stmt_expansion, Dummy_Argument, EQ_ATTR_IDX, EQ_NEXT_EQUIV_GRP, EQ_NEXT_EQUIV_OBJ, equiv_tbl, FALSE, find_left_attr(), find_opnd_line_and_column(), FOUND, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), INTEGER_DEFAULT_TYPE, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, Loc_Opr, NTR_EQ_TBL, NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), Referenced, SB_BLK_TYPE, SB_EQUIVALENCED, SB_HOSTED_STATIC, SB_IS_COMMON, SB_MODULE, SCP_FIRST_EQUIV_GRP, SCP_SB_BASED_IDX, SCP_SB_STACK_IDX, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, Shared, Stack, stmt_start_col, stmt_start_line, TRACE, TRUE, TYP_TYPE, and Variable.
Referenced by assignment_stmt_semantics(), and object_semantics().
boolean tree_produces_dealloc | ( | opnd_type * | root | ) |
Definition at line 5309 of file s_utils.c.
References Adjustl_Opr, Adjustr_Opr, Array_Construct_Opr, COPY_OPND, EXIT, FALSE, Func_Entry, Func_Exit, IL_FLD, IL_NEXT_LIST_IDX, IL_OPND, IL_Tbl_Idx, IR_FLD_L, IR_FLD_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NULL, NULL_IDX, OPND_FLD, OPND_IDX, OPND_LIST_CNT, STMT_EXPAND_AFTER_START_SH, Stmt_Expansion_Opr, TRACE, tree_produces_dealloc(), and TRUE.
Referenced by do_stmt_semantics(), gen_loop_end_ir(), select_stmt_semantics(), short_circuit_branch(), short_circuit_high_level_if(), and tree_produces_dealloc().
void type_init_semantics | ( | void | ) |
Definition at line 84 of file s_typ_init.c.
References Ansi, AT_DCL_ERR, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_EQUIV, ATD_IN_COMMON, ATD_POINTER, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATP_PGM_UNIT, attr_init_semantics(), Blockdata, Character, Character_1, check_type_conversion, CIF_Symbol_Reference, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Common, comp_gen_expr, Complex, const_init_semantics(), Const_Len_Char, COPY_OPND, CRI_Ch_Ptr, curr_scp_idx, curr_stmt_sh_idx, Error, EXIT, expr_mode, expr_semantics(), FALSE, find_opnd_line_and_column(), expr_semantics_args::foldable, FREE_IR_NODE, FREE_SH_NODE, Func_Entry, Func_Exit, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, init_target_opnd, Initialization_Expr, Integer, IR_COL_NUM_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, NTR_IR_LIST_TBL, NULL, NULL_IDX, Null_Intrinsic_Opr, null_opnd, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, PRINTMSG(), Real, Regular_Expr, SB_BLANK_COMMON, SB_BLK_TYPE, SB_IS_COMMON, SCP_ATTR_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, target_array_idx, target_char_len_idx, target_type_idx, Task_Common, TRACE, TRUE, TYP_CHAR_CLASS, TYP_IDX, TYP_TYPE, Warning, and xref_state.
boolean validate_char_len | ( | opnd_type * | , |
expr_arg_type * | |||
) |
Definition at line 8686 of file s_utils.c.
References Assignment_Stmt, AT_Tbl_Idx, Before, expr_semantics_args::char_len, Character, CHARACTER_DEFAULT_TYPE, CIF_No_Usage_Rec, CLEAR_TBL_NTRY, CN_Tbl_Idx, Concat_Opr, Const_Len_Char, expr_semantics_args::constant, COPY_OPND, curr_stmt_sh_idx, expr_semantics(), FALSE, find_opnd_line_and_column(), opnd_entry::fld, Func_Entry, Func_Exit, GEN_COMPILER_TMP_ASG, gen_sh(), get_concat_len(), opnd_entry::idx, Internal, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, expr_semantics_args::linear_type, NO_Tbl_Idx, ntr_type_tbl(), NULL, OPND_FLD, OPND_IDX, PRINTMSG(), Priv, expr_semantics_args::rank, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, stmt_start_col, stmt_start_line, Substring_Opr, TRACE, TRUE, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_ORIG_LEN_IDX, TYP_TYPE, TYP_WORK_IDX, expr_semantics_args::type, expr_semantics_args::type_idx, type_tbl, Var_Len_Char, Whole_Substring_Opr, and xref_state.
Referenced by compare_darg_to_actual_arg(), create_tmp_asg(), final_arg_work(), gen_bd_entry(), select_stmt_semantics(), and stmt_func_call_opr_handler().
void where_stmt_semantics | ( | void | ) |
Definition at line 5575 of file s_ctl_flow.c.
References active_forall_sh_idx, alloc_block_end_idx, alloc_block_start_idx, And_Opr, Assignment_Stmt, check_where_conformance(), CIF_Symbol_Reference, COPY_OPND, create_tmp_asg(), curr_stmt_sh_idx, Else_Where_Mask_Stmt, Else_Where_Stmt, Error, EXIT, expr_semantics(), FALSE, find_opnd_line_and_column(), FREE_SH_NODE, Func_Entry, Func_Exit, gen_forall_if_mask(), gen_forall_loops(), gen_ir(), gen_opnd(), IL_IDX, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, Intent_In, Internal, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LIST_CNT_L, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, Logical, NO_Tbl_Idx, Not_Opr, NTR_IR_LIST_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, PRINTMSG(), expr_semantics_args::rank, SH_COL_NUM, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_STMT_TYPE, SH_Tbl_Idx, Statement_Num_Stmt, statement_number, stmt_end_col, stmt_end_line, stmt_semantics, stmt_start_col, stmt_start_line, stmt_type, TRACE, TRUE, expr_semantics_args::type, expr_semantics_args::type_idx, Where_Cnstrct_Opr, Where_Cstrct_Stmt, where_ir_idx, Where_Stmt, and xref_state.
void write_stmt_semantics | ( | void | ) |
Definition at line 2487 of file s_io.c.
References ADD_ATTR_TO_LOCAL_LIST, After, Aloc_Opr, Alt_Return_Opr, AT_DEFINED, AT_REFERENCED, AT_SEMANTICS_DONE, AT_Tbl_Idx, ATD_STOR_BLK_IDX, ATD_TYPE_IDX, ATL_DEF_STMT_IDX, Before, Br_Index_Opr, Br_True_Opr, Call_Opr, Call_Stmt, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Continue_Stmt, COPY_OPND, create_lib_entry_attr(), CRI_Ptr_8, curr_scp_idx, curr_stmt_sh_idx, defer_stmt_expansion, end_list_idx, eor_list_idx, err_list_idx, Error, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, gen_compiler_tmp(), gen_internal_lbl(), gen_runtime_checks(), gen_sh(), have_iostat, If_Stmt, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, io_ctl_list_semantics(), io_item_must_flatten, io_list_semantics(), io_stmt_must_be_split, IR_COL_NUM, IR_COL_NUM_L, IR_COL_NUM_R, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, is_namelist, Label_Opr, Loc_Opr, LOGICAL_DEFAULT_TYPE, namelist_descriptor_attr, Ne_Opr, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, number_of_functions, PRINTMSG(), Priv, process_deferred_io_list(), Referenced, SCP_DOES_IO, SCP_SB_STACK_IDX, SH_IR_IDX, SH_NEXT_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, stmt_start_col, stmt_start_line, TRACE, tree_has_constructor, TRUE, TYPELESS_DEFAULT_TYPE, and Write.
Definition at line 1198 of file main.h.
Referenced by assignment_stmt_semantics(), end_forall_semantics(), end_where_semantics(), forall_mask_needs_tmp(), forall_semantics(), gen_forall_branch_around(), gen_forall_if_mask(), gen_forall_loops(), gen_forall_tmp(), gen_forall_tmp_bd_entry(), is_local_forall_index(), and where_stmt_semantics().
Definition at line 1203 of file main.h.
Referenced by create_tmp_asg(), end_where_semantics(), and where_stmt_semantics().
Definition at line 1202 of file main.h.
Referenced by create_tmp_asg(), end_where_semantics(), and where_stmt_semantics().
Definition at line 448 of file s_call.h.
Referenced by abs_intrinsic(), adjustl_intrinsic(), aimag_intrinsic(), aint_intrinsic(), all_intrinsic(), allocated_intrinsic(), anint_intrinsic(), array_construct_opr_handler(), array_construct_semantics(), associated_intrinsic(), atan2_intrinsic(), bit_size_intrinsic(), btest_intrinsic(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), ceiling_intrinsic(), char_intrinsic(), check_elemental_conformance(), check_for_constructors(), cif_call_site_rec(), clock_intrinsic(), cmplx_intrinsic(), compare_darg_to_actual_arg(), compare_global_type_rank(), conform_check(), conjg_intrinsic(), create_array_constructor_asg(), create_struct_constructor_asg(), create_tmp_DV_asg(), cshift_intrinsic(), csmg_intrinsic(), cvmgp_intrinsic(), determine_slice_size(), digits_intrinsic(), dim_intrinsic(), do_slice_asg(), dot_product_intrinsic(), dprod_intrinsic(), dshiftl_intrinsic(), dsm_numthreads_intrinsic(), enlarge_info_list_table(), eoshift_intrinsic(), epsilon_intrinsic(), expand_io_list(), fetch_and_add_intrinsic(), final_arg_work(), floor_intrinsic(), fraction_intrinsic(), gen_arg_type_descriptor(), get_ieee_status_intrinsic(), global_name_semantics(), huge_intrinsic(), iand_intrinsic(), ibits_intrinsic(), ibset_intrinsic(), ichar_intrinsic(), idate_intrinsic(), ieee_real_intrinsic(), ilen_intrinsic(), index_intrinsic(), int_intrinsic(), interpret_data_imp_do(), interpret_repeat_intrinsic(), interpret_reshape_intrinsic(), interpret_shape_intrinsic(), interpret_size_intrinsic(), interpret_transfer_intrinsic(), interpret_ubound_intrinsic(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), ishftc_intrinsic(), kind_intrinsic(), lbound_intrinsic(), leadz_intrinsic(), len_trim_intrinsic(), lge_intrinsic(), loc_intrinsic(), logical_intrinsic(), mask_intrinsic(), matmul_intrinsic(), max_intrinsic(), maxexponent_intrinsic(), mergee_intrinsic(), minexponent_intrinsic(), minval_intrinsic(), mod_intrinsic(), modulo_intrinsic(), mvbits_intrinsic(), nearest_intrinsic(), nint_intrinsic(), not_intrinsic(), ntr_ref_in_global_tbl(), null_intrinsic(), num_images_intrinsic(), omp_set_lock_intrinsic(), optimize_reshape(), pack_intrinsic(), precision_intrinsic(), present_intrinsic(), process_char_len(), process_variable_size_func(), random_number_intrinsic(), random_seed_intrinsic(), range_intrinsic(), ranget_intrinsic(), real_intrinsic(), repeat_intrinsic(), reshape_intrinsic(), resolve_ext_opr(), rrspacing_intrinsic(), scale_intrinsic(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), semantics_pass_driver(), set_exponent_intrinsic(), set_ieee_exception_intrinsic(), set_shape_for_deferred_funcs(), shape_intrinsic(), shift_intrinsic(), sign_intrinsic(), sin_intrinsic(), size_intrinsic(), sizeof_intrinsic(), spacing_intrinsic(), spread_intrinsic(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), struct_construct_opr_handler(), system_clock_intrinsic(), tiny_intrinsic(), transfer_intrinsic(), transpose_intrinsic(), trim_intrinsic(), ubound_intrinsic(), and unpack_intrinsic().
Definition at line 452 of file s_call.h.
Referenced by array_construct_opr_handler(), array_construct_semantics(), backspace_stmt_semantics(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), close_stmt_semantics(), cshift_intrinsic(), data_imp_do_semantics(), else_stmt_semantics(), endfile_stmt_semantics(), eoshift_intrinsic(), if_stmt_semantics(), index_intrinsic(), inquire_stmt_semantics(), io_ctl_list_semantics(), io_list_semantics(), ishftc_intrinsic(), num_images_intrinsic(), open_stmt_semantics(), pgm_unit_semantics(), process_char_len(), process_variable_size_func(), resolve_ext_opr(), rewind_stmt_semantics(), select_stmt_semantics(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), and struct_construct_opr_handler().
Definition at line 451 of file s_call.h.
Referenced by array_construct_opr_handler(), array_construct_semantics(), backspace_stmt_semantics(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), close_stmt_semantics(), cshift_intrinsic(), endfile_stmt_semantics(), enlarge_info_list_table(), eoshift_intrinsic(), index_intrinsic(), inquire_stmt_semantics(), io_list_semantics(), ishftc_intrinsic(), num_images_intrinsic(), open_stmt_semantics(), process_char_len(), process_variable_size_func(), resolve_ext_opr(), rewind_stmt_semantics(), semantics_pass_driver(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), and struct_construct_opr_handler().
Definition at line 453 of file s_call.h.
Referenced by array_construct_opr_handler(), array_construct_semantics(), backspace_stmt_semantics(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), close_stmt_semantics(), cshift_intrinsic(), data_imp_do_semantics(), else_stmt_semantics(), endfile_stmt_semantics(), eoshift_intrinsic(), if_stmt_semantics(), index_intrinsic(), inquire_stmt_semantics(), io_list_semantics(), ishftc_intrinsic(), num_images_intrinsic(), open_stmt_semantics(), pgm_unit_semantics(), process_char_len(), process_variable_size_func(), resolve_ext_opr(), rewind_stmt_semantics(), select_stmt_semantics(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), and struct_construct_opr_handler().
int* arg_list |
Definition at line 449 of file s_call.h.
Referenced by call_list_semantics(), DRA_Demangle(), DRA_Demangle_Arglist(), enlarge_call_list_tables(), io_ctl_list_semantics(), semantics_pass_driver(), and stop_pause_stmt_semantics().
int arg_list_size |
Definition at line 450 of file s_call.h.
Referenced by backspace_stmt_semantics(), buffer_stmt_semantics(), call_list_semantics(), close_stmt_semantics(), endfile_stmt_semantics(), enlarge_call_list_tables(), inquire_stmt_semantics(), open_stmt_semantics(), resolve_ext_opr(), rewind_stmt_semantics(), semantics_pass_driver(), stmt_func_call_opr_handler(), and stop_pause_stmt_semantics().
Definition at line 130 of file main.h.
Referenced by create_tmp_asg(), final_arg_work(), and gen_assumed_shape_copy().
Definition at line 578 of file main.h.
Referenced by array_construct_opr_handler(), assignment_stmt_semantics(), call_list_semantics(), create_constructor_constant(), create_runtime_array_constructor(), create_runtime_struct_constructor(), create_tmp_asg(), do_stmt_semantics(), else_stmt_semantics(), encode_decode_stmt_semantics(), final_arg_work(), flatten_function_call(), gen_loop_end_ir(), gen_runtime_bounds(), gen_runtime_conformance(), gen_runtime_substring(), gen_sh(), gen_stmt_expansion_opr(), if_stmt_semantics(), inquire_stmt_semantics(), print_stmt_semantics(), read_stmt_semantics(), resolve_ext_opr(), select_stmt_semantics(), stmt_expansion_control_end(), stmt_expansion_control_start(), stmt_func_call_opr_handler(), struct_construct_opr_handler(), substring_opr_handler(), transform_cri_ch_ptr(), translate_distant_ref(), translate_dv_component(), and write_stmt_semantics().
Definition at line 577 of file main.h.
Referenced by and_opr_handler(), else_stmt_semantics(), and if_stmt_semantics().
Definition at line 576 of file main.h.
Referenced by alloc_obj_opr_handler(), and_opr_handler(), array_construct_opr_handler(), call_list_semantics(), concat_opr_handler(), dealloc_obj_opr_handler(), defined_bin_opr_handler(), defined_un_opr_handler(), directive_stmt_semantics(), eq_opr_handler(), gen_whole_subscript(), io_ctl_list_semantics(), lg_opr_handler(), lt_opr_handler(), max_opr_handler(), minus_opr_handler(), mult_opr_handler(), not_opr_handler(), paren_opr_handler(), plus_opr_handler(), power_opr_handler(), resolve_ext_opr(), struct_construct_opr_handler(), struct_opr_handler(), subscript_opr_handler(), substring_opr_handler(), triplet_opr_handler(), and uplus_opr_handler().
Definition at line 589 of file main.h.
Referenced by gen_whole_subscript(), io_list_semantics(), subscript_opr_handler(), and triplet_opr_handler().
Definition at line 455 of file s_call.h.
Referenced by array_construct_opr_handler(), array_construct_semantics(), buffer_stmt_semantics(), build_loop_tbl(), call_list_semantics(), cshift_intrinsic(), eoshift_intrinsic(), index_intrinsic(), init_call_structs(), io_ctl_list_semantics(), io_list_semantics(), ishftc_intrinsic(), num_images_intrinsic(), process_variable_size_func(), resolve_ext_opr(), stmt_func_call_opr_handler(), stop_pause_stmt_semantics(), and struct_construct_opr_handler().
Definition at line 582 of file main.h.
Referenced by adjustl_intrinsic(), array_construct_opr_handler(), call_list_semantics(), char_intrinsic(), compare_and_swap_intrinsic(), concat_opr_handler(), cshift_intrinsic(), dim_intrinsic(), dot_product_intrinsic(), else_stmt_semantics(), encode_decode_stmt_semantics(), eoshift_intrinsic(), fetch_and_add_intrinsic(), forall_semantics(), gen_whole_subscript(), if_stmt_semantics(), ilen_intrinsic(), inquire_stmt_semantics(), io_ctl_list_semantics(), io_list_semantics(), ishft_intrinsic(), lbound_intrinsic(), lock_release_intrinsic(), matmul_intrinsic(), mergee_intrinsic(), minval_intrinsic(), omp_set_lock_intrinsic(), pack_intrinsic(), power_opr_handler(), print_stmt_semantics(), read_stmt_semantics(), selected_int_kind_intrinsic(), shape_intrinsic(), short_circuit_high_level_if(), sin_intrinsic(), spread_intrinsic(), stmt_func_call_opr_handler(), struct_construct_opr_handler(), subscript_opr_handler(), synchronize_intrinsic(), transfer_intrinsic(), translate_distant_ref(), translate_dv_component(), transpose_intrinsic(), ubound_intrinsic(), unpack_intrinsic(), and write_stmt_semantics().
Definition at line 1194 of file main.h.
Referenced by call_list_semantics(), and io_ctl_list_semantics().
Definition at line 581 of file main.h.
Referenced by and_opr_handler(), array_construct_semantics(), else_stmt_semantics(), encode_decode_stmt_semantics(), gen_stmt_expansion_opr(), if_stmt_semantics(), inquire_stmt_semantics(), io_list_semantics(), print_stmt_semantics(), read_stmt_semantics(), resolve_ext_opr(), select_stmt_semantics(), stmt_func_call_opr_handler(), substring_opr_handler(), and write_stmt_semantics().
Definition at line 604 of file main.h.
Referenced by decl_semantics(), gen_assumed_shape_copy(), and gen_bd_entry().
int shared_bd_idx |
Definition at line 603 of file main.h.
Referenced by decl_semantics(), gen_assumed_shape_copy(), and gen_bd_entry().
Definition at line 228 of file s_driver.h.
Referenced by free_stmt_tmp_tbl(), get_stmt_tmp(), and reset_stmt_tmp_tbl().
Definition at line 583 of file main.h.
Referenced by encode_decode_stmt_semantics(), inquire_stmt_semantics(), io_list_semantics(), print_stmt_semantics(), read_stmt_semantics(), and write_stmt_semantics().
Definition at line 9222 of file s_asg_expr.h.
Referenced by random_seed_intrinsic(), and stmt_func_call_opr_handler().
Definition at line 59 of file s_call.c.
Referenced by gen_dv_access_low_bound(), and process_variable_size_func().
Definition at line 1199 of file main.h.
Referenced by call_list_semantics(), end_forall_semantics(), forall_semantics(), and resolve_ext_opr().
Definition at line 1200 of file main.h.
Referenced by call_list_semantics(), forall_semantics(), and resolve_ext_opr().