Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
p_utils.c File Reference
#include "defines.h"
#include "host.m"
#include "host.h"
#include "target.m"
#include "target.h"
#include "globals.m"
#include "tokens.m"
#include "sytb.m"
#include "p_globals.m"
#include "debug.m"
#include "globals.h"
#include "tokens.h"
#include "sytb.h"
#include "p_globals.h"
Include dependency graph for p_utils.c:

Go to the source code of this file.

Functions

static boolean create_kwd_text (opnd_type *, boolean)
static void check_cmic_blk_branches (int, int, int, int)
static void block_err_string (operator_type, char *, int *)
boolean matched_specific_token (token_values_type specific_token, token_class_type token_class)
boolean parse_err_flush (search_type rule, char *str)
boolean parse_actual_arg_spec (opnd_type *result_opnd, boolean function_call, int pgm_attr_idx)
boolean parse_deref (opnd_type *result_opnd, int struct_type_idx)
boolean parse_imp_do (opnd_type *result_opnd)
int check_label_ref (void)
void label_ref_semantics (int attr_idx, lbl_ref_type context, int ref_blk_idx, int ref_line_num, int ref_col_num)
void build_fwd_ref_entry (int lbl_attr_idx, lbl_ref_type fwd_ref_cntxt)
void resolve_fwd_lbl_refs (void)
void mark_attr_defined (opnd_type *opnd)
boolean paren_grp_is_cplx_const (void)
void check_for_vestigial_task_blks (void)
void set_up_fake_dt_blk (int dt_idx)

Variables

static char USMID [] = "\n@(#)5.0_pl/sources/p_utils.c 5.5 09/09/99 12:47:48\n"
boolean star_expected

Function Documentation

static void check_cmic_blk_branches ( int  ref_blk_sh_idx,
int  label_attr,
int  line,
int  col 
) [static]

Definition at line 3178 of file p_utils.c.

References ATL_CLASS, ATL_CMIC_BLK_STMT_IDX, block_err_string(), Error, Func_Entry, Func_Exit, IR_OPR, Lbl_User, msg_num_entry::msg_num, NULL, NULL_IDX, PRINTMSG(), SH_IR_IDX, strcpy, and TRACE.

Referenced by check_label_ref(), and resolve_fwd_lbl_refs().

Here is the call graph for this function:

boolean parse_deref ( opnd_type result_opnd,
int  struct_type_idx 
)

Definition at line 670 of file p_utils.c.

References Ansi, Assumed_Size_Char, AT_ATTR_LINK, AT_CIF_SYMBOL_ID, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_ELEMENTAL_INTRIN, AT_IS_INTRIN, AT_LOCKED_IN, AT_MODULE_IDX, AT_NAME_IDX, AT_NAME_LEN, AT_NAMELIST_OBJ, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, AT_TYPED, AT_USE_ASSOCIATED, ATD_ALLOCATABLE, ATD_ARRAY_IDX, ATD_CLASS, ATD_FIRST_SEEN_IL_IDX, ATD_PE_ARRAY_IDX, ATD_POINTER, ATD_SEEN_IN_IMP_DO, ATD_SEEN_OUTSIDE_IMP_DO, ATD_SF_DARG, ATD_SYMBOLIC_CONSTANT, ATD_TARGET, ATD_TYPE_IDX, Atd_Unknown, ATI_FIRST_SPECIFIC_IDX, ATI_INTRIN_PASSABLE, ATI_INTRIN_TBL_IDX, ATP_DCL_EXTERNAL, ATP_INTERFACE_IDX, ATP_NON_ANSI_INTRIN, ATP_PGM_UNIT, ATP_PROC, ATP_RSLT_IDX, ATP_RSLT_NAME, ATP_SCP_ALIVE, ATP_SCP_IDX, ATT_FIRST_CPNT_IDX, ATT_PRIVATE_CPNT, BD_RANK, Call_Opr, Character, chg_data_obj_to_pgm_unit(), cmd_line_flags, cmd_line_flags_entry::co_array_fortran, COLON, COMMA, complete_intrinsic_definition(), Complex_16, Complex_4, Complex_8, COMPLEX_DEFAULT_TYPE, COPY_ATTR_NTRY, COPY_OPND, COPY_VARIANT_ATTR_INFO, CREATE_FUNC_RSLT, create_kwd_text(), curr_scp_idx, curr_stmt_sh_idx, Data_Obj, Data_Stmt, intrin_tbl_entry::data_type, Dcl_Bound_Ref, Derived_Type, DOUBLE_COMPLEX_DEFAULT_TYPE, DOUBLE_DEFAULT_TYPE, Dummy_Argument, on_off_flags_entry::enable_double_precision, Error, EXIT, expr_mode, Extern_Proc, FALSE, Find_Comma_Rparen, Find_EOS, find_opnd_line_and_column(), Find_Ref_End, Find_Rparen, fnd_semantic_err(), Func_Entry, Func_Exit, Function, get_basic_type_str(), id_str(), intrin_map_entry::id_str, 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_implied_do, initial_token, Initialization_Expr, Integer_1, Integer_2, Integer_4, Integer_8, INTEGER_DEFAULT_TYPE, Interface, Internal, intrin_map, Intrin_Proc, intrin_tbl, INTRINSIC_SCP_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_LIST_CNT_L, IR_LIST_CNT_R, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IS_STMT_ENTITY, is_substring_ref(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, Label, LBRKT, LN_DEF_LOC, LPAREN, MAKE_EXTERNAL_NAME, matched_specific_token(), MATCHED_TOKEN_CLASS, MAX_INTRIN_MAP_SIZE, Module, Namelist_Grp, next_arg_is_kwd_equal(), NEXT_LA_CH, NO_Tbl_Idx, Not_Referenced, ntr_host_in_sym_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_sym_tbl(), NULL, NULL_IDX, Obj_Use_Extern_Func, on_off_flags, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, parse_actual_arg_spec(), parse_deref(), parse_err_flush(), parse_expr(), PERCENT, Pgm_Unit, Pgm_Unknown, PRINTMSG(), RBRKT, Real_16, Real_4, Real_8, REAL_DEFAULT_TYPE, Referenced, RPAREN, cmd_line_flags_entry::s_default64, cmd_line_flags_entry::s_float64, SCP_IMPL_NONE, SET_IMPL_TYPE, SH_ERR_FLG, SN_ATTR_IDX, Specification_Expr, srch_host_sym_tbl(), srch_linked_sn(), srch_sym_tbl(), STAR, star_expected, Stmt_Func, Stmt_Func_Call_Opr, Stmt_Func_Expr, stmt_type, strcpy, id_str_entry::string, Struct_Construct_Opr, Struct_Opr, Structure, Subscript_Opr, Substring_Opr, Tok_Class_Id, Tok_Class_Punct, Tok_Id, Tok_Punct_Rparen, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, Triplet_Opr, TRUE, TYP_CHAR_CLASS, TYP_IDX, TYP_TYPE, and Unknown_Proc.

Referenced by parse_allocate_stmt(), parse_assert_directive(), parse_assign_stmt(), parse_buffer_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_deref(), parse_dir_var_list(), parse_do_stmt(), parse_dollar_directives(), parse_encode_stmt(), parse_forall(), parse_inquire_stmt(), parse_io_control_list(), parse_lhs(), parse_mp_directive(), parse_nullify_stmt(), parse_open_mp_directives(), parse_operand(), parse_par_directives(), parse_prefetch_ref(), parse_reference_list(), parse_star_directives(), parse_var_common_list(), and parse_var_name_list().

Here is the call graph for this function:

boolean parse_err_flush ( search_type  rule,
char *  str 
)

Definition at line 174 of file p_utils.c.

References AT_SIGN, Ch_Class_Symbol, COLON, colon_recovery, COMMA, DOLLAR, EOS, Error, FALSE, Find_Comma, Find_Comma_Rparen, Find_Comma_Slash, Find_EOS, Find_Expr_End, Find_Lparen, Find_Matching_Rparen, Find_None, Find_Ref_End, Find_Rparen, flush_LA_to_EOS(), flush_LA_to_symbol(), Func_Entry, Func_Exit, la_ch, LA_CH_CLASS, LA_CH_COLUMN, LA_CH_LINE, LA_CH_TO_ERR_STR, LA_CH_VALUE, LPAREN, matched_specific_token(), NULL, PERCENT, PRINTMSG(), reset_lex(), RPAREN, search_str, SLASH, Tok_Class_Punct, Tok_Punct_Colon, Tok_Punct_Colon_Colon, Tok_Punct_Rbrkt, token, TOKEN_BUF_IDX, TOKEN_STMT_NUM, TRACE, TRUE, and USCORE.

Referenced by create_kwd_text(), parse_access_stmt(), parse_actual_arg_spec(), parse_allocate_stmt(), parse_array_spec(), parse_assert_directive(), parse_assign_stmt(), parse_assignment_stmt(), parse_attr_spec(), parse_attrs(), parse_auxiliary_dir(), parse_backspace_stmt(), parse_block_stmt(), parse_buffer_stmt(), parse_cache_align_name_list(), parse_cache_bypass_dir(), parse_cache_noalloc(), parse_call_stmt(), parse_case_stmt(), parse_close_stmt(), parse_common_dirs(), parse_common_stmt(), parse_contains_stmt(), parse_continue_stmt(), parse_copy_assumed_shape_dir(), parse_cpnt_dcl_stmt(), parse_cycle_stmt(), parse_data_imp_do(), parse_data_stmt(), parse_deallocate_stmt(), parse_decode_stmt(), parse_deref(), parse_derived_type_stmt(), parse_dir_directives(), parse_dir_var_list(), parse_directive_stmt(), parse_distribution_dir(), parse_do_stmt(), parse_doall_cmic(), parse_dollar_directives(), parse_doparallel_cmic(), parse_dummy_args(), parse_else_stmt(), parse_encode_stmt(), parse_end_stmt(), parse_endfile_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_exit_stmt(), parse_fill_align_symbol(), parse_forall(), parse_format_stmt(), parse_function_stmt(), parse_generic_spec(), parse_goto_stmt(), parse_id_directive(), parse_if_stmt(), parse_ignore_tkr(), parse_imp_do(), parse_implicit_stmt(), parse_initializer(), parse_inline_always_never(), parse_inquire_stmt(), parse_intent_spec(), parse_intent_stmt(), parse_interface_stmt(), parse_io_control_list(), parse_io_list(), parse_label_list(), parse_length_selector(), parse_lhs(), parse_mic_directives(), parse_module_stmt(), parse_mp_directive(), parse_mult_opnd(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_nullify_stmt(), parse_only_spec(), parse_open_mp_clauses(), parse_open_mp_directives(), parse_open_stmt(), parse_openad_directives(), parse_openad_varlist(), parse_operand(), parse_par_directives(), parse_parallel_cmic(), parse_parameter_stmt(), parse_pe_array_spec(), parse_permutation_mic(), parse_pointer_stmt(), parse_prefetch_ref(), parse_prefix_spec(), parse_print_stmt(), parse_prog_unit(), parse_program_stmt(), parse_read_stmt(), parse_redistribute_dir(), parse_reference_list(), parse_return_stmt(), parse_rewind_stmt(), parse_select_stmt(), parse_sequence_stmt(), parse_sgi_dir_inline(), parse_slash_common_dirs(), parse_star_dir_directives(), parse_star_directives(), parse_stmt_func_stmt(), parse_stop_pause_stmt(), parse_subroutine_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_type_spec(), parse_typed_function_stmt(), parse_use_stmt(), parse_var_common_list(), parse_var_name_list(), parse_vfunction_dir(), parse_where_stmt(), parse_write_stmt(), and set_function_rslt().

Here is the call graph for this function:

void set_up_fake_dt_blk ( int  dt_idx)

Variable Documentation

Definition at line 81 of file p_ctl_flow.c.

Referenced by parse_allocate_stmt(), and parse_deref().

char USMID[] = "\n@(#)5.0_pl/sources/p_utils.c 5.5 09/09/99 12:47:48\n" [static]

Definition at line 37 of file p_utils.c.

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines