Open64 (mfef90, whirl2f, and IR tools): osprey1.0/crayf90/fe90/p_dcl_util.c File Reference

Open64 (mfef90, whirl2f, and IR tools) TAG: version-openad; SVN changeset: 916

#include "defines.h"
#include "host.m"
#include "host.h"
#include "target.m"
#include "target.h"
#include "globals.m"
#include "tokens.m"
#include "sytb.m"
#include "p_globals.m"
#include "debug.m"
#include "globals.h"
#include "tokens.h"
#include "sytb.h"
#include "p_globals.h"

Include dependency graph for p_dcl_util.c:

Go to the source code of this file.

Functions
static int	ntr_bnds_tmp_list (opnd_type *)
static boolean	parse_int_spec_expr (long , fld_type , boolean, boolean)
static void	parse_kind_selector (void)
static boolean	is_attr_referenced_in_bound (int, int)
int	parse_array_spec (int attr_idx)
boolean	parse_generic_spec (void)
intent_type	parse_intent_spec ()
void	parse_length_selector (int attr_idx, boolean i_can_have_len_equal, boolean parsing_length_selector)
boolean	parse_type_spec (boolean chk_kind)
boolean	merge_access (int attr_idx, int line, int column, access_type access)
boolean	merge_allocatable (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_automatic (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_dimension (int attr_idx, int line, int column, int array_idx)
boolean	merge_data (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_external (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_intent (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_intrinsic (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_optional (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_pointer (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_save (boolean chk_semantics, int line, int column, int attr_idx)
boolean	merge_target (boolean chk_semantics, int line, int column, int attr_idx)
int	generic_spec_semantics (void)
int	parse_pe_array_spec (int attr_idx)
boolean	merge_co_array (boolean chk_semantics, int line, int column, int attr_idx, int pe_array_idx)
boolean	merge_volatile (boolean chk_semantics, int line, int column, int attr_idx)
Variables
static char	USMID [] = "\n@(#)5.0_pl/sources/p_dcl_util.c 5.7 10/28/99 10:03:56\n"
static boolean	kind0seen
static boolean	kind0E0seen
static boolean	kind0D0seen
static boolean	kindconstseen

Function Documentation

int generic_spec_semantics ( void )

Definition at line 3245 of file p_dcl_util.c.

References And_Opr, Asg_Opr, AT_ATTR_LINK, AT_DEF_COLUMN, AT_DEF_LINE, AT_ELEMENTAL_INTRIN, AT_IS_INTRIN, AT_MODULE_IDX, AT_NAME_IDX, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, AT_TYPED, AT_USE_ASSOCIATED, ATD_SEEN_OUTSIDE_IMP_DO, ATD_TYPE_IDX, ATI_DEFINED_OPR, ATI_FIRST_SPECIFIC_IDX, ATI_INTERFACE_CLASS, ATI_PROC_IDX, ATI_USER_SPECIFIED, ATP_PROC, ATP_RSLT_IDX, Char_Rslt_Bound_Ref, cif_flags, CIF_Symbol_Declaration, cif_usage_rec(), CLEAR_VARIANT_ATTR_INFO, complete_intrinsic_definition(), Concat_Opr, COPY_COMMON_ATTR_INFO, COPY_VARIANT_ATTR_INFO, CREATE_ERR_ATTR, CURR_BLK, curr_scp_idx, Data_Obj, Defined_Assign_Interface, Defined_Binary_Interface, Defined_Unary_Interface, Defined_Unary_Or_Binary_Interface, Div_Opr, Eq_Opr, Eqv_Opr, Error, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Ge_Opr, Generic_Unknown_Interface, Gt_Opr, Interface, Interface_Stmt, INTRINSIC_SCP_IDX, Le_Opr, Lg_Opr, LN_ATTR_IDX, LN_DEF_LOC, LN_NAME_IDX, Lt_Opr, Minus_Opr, Module_Blk, Module_Proc, Mult_Opr, Ne_Opr, Neqv_Opr, Not_Opr, NTR_ATTR_TBL, ntr_host_in_sym_tbl(), ntr_sym_tbl(), NULL, NULL_IDX, Null_Opr, Obj_Generic_Interface, Or_Opr, Pgm_Unit, Plus_Opr, Power_Opr, PRINTMSG(), SET_IMPL_TYPE, srch_host_sym_tbl(), srch_sym_tbl(), stmt_type, Tok_Id, Tok_Op_Add, Tok_Op_And, Tok_Op_Assign, Tok_Op_Concat, Tok_Op_Defined, Tok_Op_Div, Tok_Op_Eq, Tok_Op_Eqv, Tok_Op_Ge, Tok_Op_Gt, Tok_Op_Le, Tok_Op_Lg, Tok_Op_Lt, Tok_Op_Mult, Tok_Op_Ne, Tok_Op_Neqv, Tok_Op_Not, Tok_Op_Or, Tok_Op_Power, Tok_Op_Sub, token, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, TRACE, TRUE, and XREF_RECS.

Referenced by parse_access_stmt(), and parse_interface_stmt().

Here is the call graph for this function:

static boolean is_attr_referenced_in_bound	(	int	bd_idx,
		int	attr_idx
	)		`[static]`

Definition at line 3585 of file p_dcl_util.c.

References AT_DCL_ERR, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATD_FLD, ATD_TMP_IDX, BD_ARRAY_CLASS, BD_DCL_ERR, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, Deferred_Shape, error(), Error, FALSE, find_attr_in_ir(), Func_Entry, Func_Exit, IR_Tbl_Idx, NULL, OPND_COL_NUM, OPND_LINE_NUM, PRINTMSG(), TRACE, and TRUE.

Referenced by merge_dimension(), parse_array_spec(), and parse_pe_array_spec().

Here is the call graph for this function:

boolean merge_access	(	int	attr_idx,
		int	line,
		int	column,
		access_type	access
	)

Definition at line 1609 of file p_dcl_util.c.

References access, Ansi, AT_ACCESS_SET, AT_ATTR_LINK, AT_IS_INTRIN, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_PRIVATE, ATD_SYMBOLIC_CONSTANT, ATI_FIRST_SPECIFIC_IDX, ATI_PROC_IDX, ATP_PGM_UNIT, ATP_PROC, Blockdata, Data_Obj, fnd_semantic_err(), Func_Entry, Func_Exit, Interface, Internal, Intrin_Proc, Label, Module, NULL, NULL_IDX, Obj_Private, Obj_Public, Pgm_Unit, PRINTMSG(), Program, Public, SN_ATTR_IDX, SN_SIBLING_LINK, Stmt_Func, TRACE, and TRUE.

Referenced by parse_access_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_allocatable	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 1743 of file p_dcl_util.c.

References Ansi, AT_OBJ_NAME_PTR, ATD_ALLOCATABLE, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, NULL, Obj_Allocatable, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_allocatable_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_automatic	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 1806 of file p_dcl_util.c.

References Ansi, AT_DCL_ERR, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATD_ARRAY_IDX, ATD_CLASS, ATD_POINTER, ATD_STACK, ATD_TYPE_IDX, ATP_PGM_UNIT, ATP_RSLT_IDX, Character, CREATE_FUNC_RSLT, Error, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Function, Function_Result, NULL, NULL_IDX, Obj_Automatic, Pgm_Unit, PRINTMSG(), SET_IMPL_TYPE, Structure, TRACE, TRUE, and TYP_TYPE.

Referenced by parse_automatic_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_co_array	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx,
		int	pe_array_idx
	)

Definition at line 3922 of file p_dcl_util.c.

References ATD_PE_ARRAY_IDX, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, NULL, Obj_Co_Array, TRACE, and TRUE.

Referenced by parse_attrs(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_data	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2153 of file p_dcl_util.c.

References AT_DEFINED, ATD_CLASS, ATD_DATA_INIT, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, NULL, Obj_Data_Init, TRACE, TRUE, and Variable.

Referenced by parse_data_imp_do(), parse_data_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_dimension	(	int	attr_idx,
		int	line,
		int	column,
		int	array_idx
	)

Definition at line 1894 of file p_dcl_util.c.

References Ansi, Assumed_Shape, Assumed_Size, AT_DCL_ERR, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATD_ARRAY_IDX, ATI_PROC_IDX, ATP_PGM_UNIT, ATP_RECURSIVE, ATP_RSLT_IDX, ATP_RSLT_NAME, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_DCL_ERR, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, Caution, CN_Tbl_Idx, CREATE_FUNC_RSLT, Deferred_Shape, Error, EXIT, Explicit_Shape, FALSE, fnd_semantic_err(), fold_relationals(), Func_Entry, Func_Exit, Function, Interface, is_attr_referenced_in_bound(), Module, Ne_Opr, Not_Referenced, NULL, NULL_IDX, Obj_Assum_Shp_Arr, Obj_Assum_Size_Arr, Obj_Defrd_Shp_Arr, Obj_Expl_Shp_Arr, on_off_flags, Pgm_Unit, PRINTMSG(), on_off_flags_entry::recursive, SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_attrs(), parse_common_stmt(), parse_pointer_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_external	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2206 of file p_dcl_util.c.

References Ansi, AT_IS_INTRIN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATI_PROC_IDX, ATP_DCL_EXTERNAL, ATP_PROC, ATP_SCP_IDX, chg_data_obj_to_pgm_unit(), curr_scp_idx, Data_Obj, Extern_Proc, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Interface, NULL, NULL_IDX, Obj_Dcl_Extern, Pgm_Unknown, PRINTMSG(), SCP_ATTR_IDX, TRACE, TRUE, and Unknown_Proc.

Referenced by parse_external_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_intent	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2294 of file p_dcl_util.c.

References Ansi, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATD_CLASS, ATD_INTENT, ATI_PROC_IDX, Dummy_Argument, Error, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Intent_Unseen, Interface, new_intent, NULL, NULL_IDX, Obj_Intent, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_intent_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_intrinsic	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2368 of file p_dcl_util.c.

References Ansi, AT_ELEMENTAL_INTRIN, AT_IS_INTRIN, AT_NAME_LEN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_TYPED, ATD_TYPE_IDX, ATI_DCL_INTRINSIC, ATI_FIRST_SPECIFIC_IDX, ATI_GENERIC_INTRINSIC, ATI_INTERFACE_CLASS, ATI_NUM_SPECIFICS, ATI_PROC_IDX, ATP_PGM_UNIT, ATP_RSLT_IDX, complete_intrinsic_definition(), COPY_VARIANT_ATTR_INFO, curr_scp_idx, Data_Obj, Error, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Function, Generic_Subroutine_Interface, Interface, INTRINSIC_SCP_IDX, NULL, NULL_IDX, Obj_Dcl_Intrin, Pgm_Unit, PRINTMSG(), SET_IMPL_TYPE, SN_SIBLING_LINK, srch_host_sym_tbl(), srch_sym_tbl(), TRACE, and TRUE.

Referenced by parse_intrinsic_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_optional	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2563 of file p_dcl_util.c.

References Ansi, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_OPTIONAL, ATD_CLASS, ATP_PROC, Data_Obj, Dummy_Argument, Dummy_Proc, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, NULL, Obj_Optional, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_optional_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_pointer	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2627 of file p_dcl_util.c.

References Ansi, AT_DCL_ERR, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATD_POINTER, ATI_PROC_IDX, ATP_PGM_UNIT, ATP_RSLT_IDX, ATP_RSLT_NAME, CREATE_FUNC_RSLT, Error, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Function, Interface, NULL, NULL_IDX, Obj_Pointer, Pgm_Unit, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_pointer_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_save	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2719 of file p_dcl_util.c.

References Ansi, AT_OBJ_NAME_PTR, ATD_CLASS, ATD_SAVED, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, NULL, Obj_Saved, PRINTMSG(), SET_IMPL_TYPE, TRACE, TRUE, and Variable.

Referenced by parse_save_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_target	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 2773 of file p_dcl_util.c.

References Ansi, AT_DCL_ERR, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATD_TARGET, ATI_PROC_IDX, ATP_PGM_UNIT, ATP_RSLT_IDX, ATP_RSLT_NAME, CREATE_FUNC_RSLT, Error, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, Function, Interface, NULL, NULL_IDX, Obj_Target, Pgm_Unit, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_target_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean merge_volatile	(	boolean	chk_semantics,
		int	line,
		int	column,
		int	attr_idx
	)

Definition at line 3971 of file p_dcl_util.c.

References Ansi, AT_OBJ_NAME_PTR, ATD_VOLATILE, FALSE, fnd_semantic_err(), Func_Entry, Func_Exit, NULL, Obj_Volatile, PRINTMSG(), SET_IMPL_TYPE, TRACE, and TRUE.

Referenced by parse_type_dcl_stmt(), and parse_volatile_stmt().

Here is the call graph for this function:

static int ntr_bnds_tmp_list ( opnd_type * opnd ) [static]

Definition at line 3122 of file p_dcl_util.c.

References AL_ATTR_IDX, AL_NEXT_IDX, AT_REFERENCED, ATD_CLASS, ATD_TMP_IDX, cif_flags, compare_opnds(), Constant, COPY_OPND, curr_scp_idx, EXIT, FALSE, find_opnd_line_and_column(), free_ir_stream(), Func_Entry, Func_Exit, GEN_COMPILER_TMP_ASG, INTEGER_DEFAULT_TYPE, IR_OPND_R, IR_Tbl_Idx, Not_Referenced, NTR_ATTR_LIST_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, Priv, SCP_TMP_FW_IDX, TRACE, and XREF_RECS.

Referenced by parse_int_spec_expr().

Here is the call graph for this function:

int parse_array_spec ( int attr_idx )

Definition at line 95 of file p_dcl_util.c.

References Assumed_Shape, Assumed_Size, AT_REFERENCED, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_DCL_ERR, BD_LB_FLD, BD_LB_IDX, BD_LINE_NUM, BD_RANK, BD_UB_FLD, BD_UB_IDX, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COLON, COMMA, Constant_Size, CURR_BLK, Deferred_Shape, Derived_Type_Blk, Error, EXIT, Explicit_Shape, FALSE, Find_None, Find_Rparen, Func_Entry, Func_Exit, Internal, is_attr_referenced_in_bound(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LPAREN, NEXT_LA_CH, NO_Tbl_Idx, Not_Referenced, ntr_array_in_bd_tbl(), NULL, NULL_IDX, parse_err_flush(), parse_int_spec_expr(), PRINTMSG(), reserve_array_ntry(), RPAREN, STAR, TRACE, TRUE, and Unknown_Array.

Referenced by parse_attr_spec(), parse_attrs(), parse_common_stmt(), parse_cpnt_dcl_stmt(), parse_pointer_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean parse_generic_spec ( void )

Definition at line 404 of file p_dcl_util.c.

References EQUAL, Error, FALSE, Find_Comma, Find_Rparen, Func_Entry, Func_Exit, LA_CH_VALUE, LPAREN, MATCHED_TOKEN_CLASS, NEXT_LA_CH, NULL, parse_err_flush(), PRINTMSG(), reset_lex(), RPAREN, SLASH, Tok_Class_Id, Tok_Class_Keyword, Tok_Class_Op, Tok_Const_False, Tok_Const_True, Tok_Id, Tok_Kwd_Assignment, Tok_Kwd_Operator, Tok_Op_Assign, Tok_Op_Deref, Tok_Op_Div, Tok_Op_Eq, Tok_Op_Ge, Tok_Op_Gt, Tok_Op_Le, Tok_Op_Lg, Tok_Op_Lt, Tok_Op_Ne, Tok_Op_Ptr_Assign, token, TOKEN_BUF_IDX, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STMT_NUM, TOKEN_STR, TRACE, and TRUE.

Referenced by parse_access_stmt(), parse_interface_stmt(), and parse_only_spec().

Here is the call graph for this function:

static boolean parse_int_spec_expr	(	long *	len_idx,
		fld_type *	field_type,
		boolean	fold_it,
		boolean	char_len
	)		`[static]`

Definition at line 2864 of file p_dcl_util.c.

References Ansi, AT_Tbl_Idx, ATD_TMP_HAS_CVRT_OPR, ATD_TMP_SEMANTICS_DONE, cast_typeless_constant(), CIF_Symbol_Reference, cmd_line_flags, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, CN_TYPE_IDX, COPY_OPND, Cvrt_Opr, Error, EXIT, expr_mode, expr_semantics(), FALSE, Func_Entry, Func_Exit, get_basic_type_str(), init_exp_desc, Initialization_Expr, Integer, Integer_4, INTEGER_DEFAULT_TYPE, IR_COL_NUM, IR_LINE_NUM, IR_OPND_L, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, kind0D0seen, expr_semantics_args::kind0D0seen, kind0E0seen, expr_semantics_args::kind0E0seen, kind0seen, expr_semantics_args::kind0seen, kindconstseen, expr_semantics_args::kindnotconst, LA_CH_COLUMN, LA_CH_LINE, ntr_bnds_tmp_list(), NTR_IR_TBL, NULL, NULL_IDX, OPND_FLD, OPND_IDX, parse_expr(), parsing_kind_selector, PRINTMSG(), expr_semantics_args::rank, cmd_line_flags_entry::s_pointer8, SA_INTEGER_DEFAULT_TYPE, Short_Typeless_Const, Specification_Expr, TRACE, TRUE, TYP_LINEAR, TYP_TYPE, Typeless, and xref_state.

Referenced by parse_array_spec(), parse_kind_selector(), parse_length_selector(), and parse_pe_array_spec().

Here is the call graph for this function:

intent_type parse_intent_spec ( void )

Definition at line 562 of file p_dcl_util.c.

References Find_Rparen, Func_Entry, Func_Exit, Intent_In, Intent_Inout, Intent_Out, Intent_Unseen, LA_CH_VALUE, LPAREN, matched_specific_token(), NEXT_LA_CH, NULL, parse_err_flush(), RPAREN, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_In, Tok_Kwd_Out, Tok_Punct_Rparen, and TRACE.

Referenced by parse_attr_spec(), and parse_intent_stmt().

Here is the call graph for this function:

static void parse_kind_selector ( void ) [static]

Definition at line 634 of file p_dcl_util.c.

References AL_NEXT_IDX, AT_DCL_ERR, AT_REFERENCED, AT_Tbl_Idx, AT_WORK_IDX, ATD_TYPE_IDX, Complex, curr_scp_idx, on_off_flags_entry::enable_double_precision, Error, FALSE, field_type(), Func_Entry, Func_Exit, kind0D0seen, kind0E0seen, kind0seen, kind_to_linear_type(), kindconstseen, LA_CH_COLUMN, LA_CH_LINE, matched_specific_token(), Not_Referenced, NULL, on_off_flags, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, parse_int_spec_expr(), parsing_kind_selector, PRINTMSG(), Real, reset_lex(), SCP_TMP_FW_IDX, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Kind, Tok_Punct_Eq, token, TOKEN_BUF_IDX, TOKEN_STMT_NUM, TRACE, TRUE, TYP_DCL_VALUE, TYP_TYPE, and Warning.

Referenced by parse_type_spec().

Here is the call graph for this function:

void parse_length_selector	(	int	attr_idx,
		boolean	i_can_have_len_equal,
		boolean	parsing_length_selector
	)

Definition at line 741 of file p_dcl_util.c.

References Assumed_Size_Char, AT_DCL_ERR, AT_OBJ_NAME_PTR, AT_REFERENCED, AT_Tbl_Idx, ATD_FLD, ATD_TMP_IDX, Character, CHARACTER_DEFAULT_TYPE, CLEAR_TBL_NTRY, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, Comment, Const_Len_Char, CURR_BLK, Derived_Type_Blk, Error, field_type(), find_attr_in_ir(), Find_None, Find_Rparen, Func_Entry, Func_Exit, IR_Tbl_Idx, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NO_Tbl_Idx, Not_Referenced, NULL, OPND_COL_NUM, OPND_LINE_NUM, parse_err_flush(), parse_int_spec_expr(), PRINTMSG(), reset_lex(), RPAREN, STAR, Tok_Class_Int_Spec, Tok_Class_Keyword, Tok_Class_Punct, Tok_Kwd_Len, Tok_Punct_Eq, token, TOKEN_BUF_IDX, TOKEN_COLUMN, TOKEN_CONST_TBL_IDX, TOKEN_LINE, TOKEN_STMT_NUM, TRACE, TRUE, TYP_CHAR_CLASS, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, type_tbl, and Unknown_Char.

Referenced by parse_cpnt_dcl_stmt(), parse_type_dcl_stmt(), and parse_type_spec().

Here is the call graph for this function:

int parse_pe_array_spec ( int attr_idx )

Definition at line 3655 of file p_dcl_util.c.

References Assumed_Size, AT_REFERENCED, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_DCL_ERR, BD_LB_FLD, BD_LB_IDX, BD_LINE_NUM, BD_RANK, BD_UB_FLD, BD_UB_IDX, CN_INTEGER_ONE_IDX, CN_Tbl_Idx, COLON, COMMA, Constant_Size, CURR_BLK, Deferred_Shape, Derived_Type_Blk, Error, EXIT, Explicit_Shape, FALSE, Find_EOS, Find_None, Find_Rparen, Func_Entry, Func_Exit, Internal, is_attr_referenced_in_bound(), LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, LBRKT, NEXT_LA_CH, NO_Tbl_Idx, Not_Referenced, ntr_array_in_bd_tbl(), NULL, NULL_IDX, parse_err_flush(), parse_int_spec_expr(), PRINTMSG(), RBRKT, reserve_array_ntry(), STAR, TRACE, TRUE, and Unknown_Array.

Referenced by parse_attr_spec(), parse_attrs(), parse_common_stmt(), parse_cpnt_dcl_stmt(), parse_equivalence_stmt(), and parse_type_dcl_stmt().

Here is the call graph for this function:

boolean parse_type_spec ( boolean chk_kind )

Definition at line 927 of file p_dcl_util.c.

References AL_ATTR_IDX, AL_NEXT_IDX, Ansi, AT_ATTR_LINK, AT_CIF_SYMBOL_ID, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_LOCKED_IN, AT_NAME_IDX, AT_NOT_VISIBLE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_Tbl_Idx, AT_TYPED, AT_WORK_IDX, ATD_TYPE_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, ATT_TY_IDX, basic_type_str, CHARACTER_DEFAULT_TYPE, CIF_Derived_Type_Name_Reference, cif_flags, cif_usage_rec(), CLEAR_ATTR_NTRY, CLEAR_TBL_NTRY, CLEAR_VARIANT_ATTR_INFO, cmd_line_flags, CN_INT_TO_C, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, COMMA, Complex, Complex_16, Complex_4, Complex_8, COMPLEX_DEFAULT_TYPE, COPY_ATTR_NTRY, CREATE_ERR_ATTR, curr_scp_idx, curr_stmt_sh_idx, Derived_Type, DOUBLE_COMPLEX_TYPE_IDX, DOUBLE_PRECISION_TYPE_IDX, on_off_flags_entry::enable_double_precision, EQUAL, Err_Res, Error, FALSE, Find_None, Find_Rparen, fnd_semantic_err(), Func_Entry, Func_Exit, Function_Stmt, Implicit_Stmt, Integer, Integer_1, Integer_2, Integer_4, Integer_8, INTEGER_DEFAULT_TYPE, LA_CH_VALUE, LN_ATTR_IDX, LN_NAME_IDX, Logical, Logical_1, Logical_2, Logical_4, Logical_8, LOGICAL_DEFAULT_TYPE, LPAREN, matched_specific_token(), MATCHED_TOKEN_CLASS, NEXT_LA_CH, NTR_ATTR_LIST_TBL, ntr_host_in_sym_tbl(), ntr_sym_tbl(), ntr_type_tbl(), NULL, NULL_IDX, Obj_Use_Derived_Type, on_off_flags, parse_err_flush(), parse_kind_selector(), parse_length_selector(), PRINTMSG(), Real, Real_16, Real_4, Real_8, REAL_DEFAULT_TYPE, reset_lex(), RPAREN, cmd_line_flags_entry::s_cf77types, cmd_line_flags_entry::s_default32, SCP_CIF_ERR_LIST, SH_ERR_FLG, srch_host_sym_tbl(), srch_sym_tbl(), STAR, Star_Typed, stmt_type, Structure, Structure_Type, target_ieee, target_triton, Tok_Class_Id, Tok_Class_Int_Spec, Tok_Class_Keyword, Tok_Kwd_Byte, Tok_Kwd_Character, Tok_Kwd_Complex, Tok_Kwd_Double, Tok_Kwd_Integer, Tok_Kwd_Kind, Tok_Kwd_Logical, Tok_Kwd_Precision, Tok_Kwd_Real, Tok_Kwd_Type, token, TOKEN_BUF_IDX, TOKEN_COLUMN, TOKEN_CONST_TBL_IDX, TOKEN_LEN, TOKEN_LINE, TOKEN_STMT_NUM, TOKEN_STR, TRACE, TRUE, TYP_DCL_VALUE, TYP_DESC, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, type_tbl, TYPELESS_DEFAULT_TYPE, Warning, and XREF_RECS.

Referenced by parse_cpnt_dcl_stmt(), parse_implicit_stmt(), parse_type_dcl_stmt(), and parse_typed_function_stmt().

Here is the call graph for this function:

Variable Documentation

boolean kind0D0seen [static]

Definition at line 69 of file p_dcl_util.c.

Referenced by parse_int_spec_expr(), and parse_kind_selector().

boolean kind0E0seen [static]

Definition at line 68 of file p_dcl_util.c.

Referenced by parse_int_spec_expr(), and parse_kind_selector().

boolean kind0seen [static]

Definition at line 67 of file p_dcl_util.c.

Referenced by parse_int_spec_expr(), and parse_kind_selector().

boolean kindconstseen [static]

Definition at line 70 of file p_dcl_util.c.

Referenced by parse_int_spec_expr(), and parse_kind_selector().

char USMID[] = "\n@(#)5.0_pl/sources/p_dcl_util.c 5.7 10/28/99 10:03:56\n" [static]

Definition at line 37 of file p_dcl_util.c.

All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines

p_dcl_util.c
Generated on Thu Feb 21 2013 05:51:06 for Open64 (mfef90, whirl2f, and IR tools) by 1.7.6.1