#include "defines.h"
#include "host.m"
#include "host.h"
#include "target.m"
#include "target.h"
#include "arith.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 sytb.c:

Classes
union	ieee_real_4
union	ieee_real_8
union	ieee_real_16
Defines
#define	IEEE_32_EXPO_BITS 8
#define	IEEE_32_MANT_BITS 23
#define	IEEE_32_EXPONENT 0XFF
#define	IEEE_32_EXPO_ALLONES(X) ((X) == IEEE_32_EXPONENT)
#define	IEEE_64_EXPO_BITS 11
#define	IEEE_64_MANTU_BITS 20
#define	IEEE_64_MANTL_BITS 32
#define	IEEE_64_EXPONENT 0X7FF
#define	IEEE_64_EXPO_ALLONES(X) ((X) == IEEE_64_EXPONENT)
#define	IEEE_128_EXPO_BITS 15
#define	IEEE_128_MANTTU_BITS 16
#define	IEEE_128_MANTTL_BITS 32
#define	IEEE_128_EXPO 0X7FFF
#define	IEEE_128_EXPO_ALLONES(X) ((X) == IEEE_128_EXPO)
#define	FP_SGI_NAN 0
#define	FP_SGI_INFINITE 1
#define	FP_SGI_NORMAL 2
#define	FP_SGI_SUBNORMAL 3
#define	FP_SGI_ZERO 4
Typedefs
typedef union ieee_real_4	ieee_real_4_type
typedef union ieee_real_8	ieee_real_8_type
typedef union ieee_real_16	ieee_real_16_type
Functions
static void	calculate_pad (size_offset_type , size_offset_type , int)
static int	ntr_global_bounds_tbl (int)
static boolean	pvp_isnormal (int, long_type *)
static int	ntr_abnormal_ieee_const (int, long_type *)
static boolean	is_normal (int, long_type *)
static int	is_normal_32 (long_type *)
static int	is_normal_64 (int, long_type *)
static int	is_normal_128 (int, long_type *)
static int	sign_bit (int, long_type *)
static int	sign_bit_32 (long_type *)
static int	sign_bit_64 (long_type *)
static int	sign_bit_128 (long_type *)
static int	fp_classify (int, long_type *)
static int	fp_classify_32 (long_type *)
static int	fp_classify_64 (int, long_type *)
static int	fp_classify_128 (int, long_type *)
static int	insert_constant (int, long_type *, int)
static int	insert_unordered_constant (int, long_type *, int, int)
static void	dump_cn_tree (int, int, int)
boolean	compare_value_to_cn (long_type *value, int cn_idx, int opr)
int	srch_sym_tbl (char name_str, int name_len, int name_idx)
int	ntr_sym_tbl (token_type *token, int name_idx)
int	srch_host_sym_tbl (char name_str, int name_len, int name_idx, boolean search_intrin_scp)
int	ntr_host_in_sym_tbl (token_type *token, int name_idx, int host_attr_idx, int host_ln_idx, boolean make_new_attr_and_link)
void	remove_ln_ntry (int name_idx)
int	srch_kwd_name (char name, int length, int attr_idx, int sn_idx)
int	srch_stor_blk_tbl (char *name_str, int name_len, int scp_idx)
int	ntr_stor_blk_tbl (char *name_str, int name_len, int def_line, int def_column, int blk_type)
int	ntr_array_in_bd_tbl (int bd_idx)
int	reserve_array_ntry (int rank)
void	init_sytb ()
int	ntr_const_tbl (int type_idx, boolean extra_zero_word, long_type *constant)
int	ntr_boz_const_tbl (int type_idx, long_type *constant)
int	ntr_boolean_const_tbl (int type_idx, long_type *constant)
int	ntr_unshared_const_tbl (int type_idx, boolean extra_zero_word, long_type *constant)
int	srch_host_stor_blk_tbl (token_type *token)
boolean	compare_derived_types (int dt_idx1, int dt_idx2)
boolean	compare_array_entries (int bd_idx1, int bd_idx2)
void	init_name_and_stor_tbls (int scp_idx, boolean create_full_scp)
attr_tbl_type *	sytb_var_error (char *err_str, int attr_idx)
attr_aux_tbl_type *	attr_aux_var_error (char *err_str, int attr_idx)
bounds_tbl_type *	bd_var_error (char *err_str, int bd_idx)
ir_list_tbl_type *	ir_list_var_error (char *err_str, int il_idx)
global_attr_tbl_type *	ga_var_error (char *err_str, int ga_idx)
int	gen_internal_lbl (int label_line)
size_offset_type	stor_bit_size_of (int attr_idx, boolean all_elements, boolean check_array_size)
int	gen_compiler_tmp (int tmp_line, int tmp_column, task_scope_type scope, boolean add_to_attr_list)
int	gen_compiler_star (int tmp_line, int tmp_column, task_scope_type scope, boolean add_to_attr_list)
int	gen_compiler_upbd (int tmp_line, int tmp_column, task_scope_type scope, boolean add_to_attr_list)
void	chg_data_obj_to_pgm_unit (int attr_idx, pgm_unit_type pgm_unit, atp_proc_type proc_type)
char *	get_basic_type_str (int type_idx)
boolean	kind_to_linear_type (opnd_type *opnd, int attr_idx, boolean kind0seen, boolean kind0E0seen, boolean kind0D0seen, boolean kindconstseen)
int	gen_debug_lbl_stmt (int stmt_idx, atl_debug_class_type label_type, int attr_idx)
int	make_in_parent_string (int name_str_idx, int name_str_len, int scp_idx, int *name_len)
int	compare_names (long id1, int id1_len, long id2, int id2_len)
int	ntr_local_attr_list (char *name_str, int name_len, int def_line, int def_column)
int	create_lib_entry_attr (char *name_str, int name_len, int def_line, int def_column)
void	set_stride_for_first_dim (int type_idx, size_offset_type *stride)
int	ntr_type_tbl (void)
int	ntr_derived_type_tbl (void)
int	srch_linked_sn (char name, int length, int sn_idx)
void	free_tables ()
boolean	validate_kind (basic_type_type type, int line, int column, long kind, linear_type_type linear_type)
void	assign_offset (int attr_idx)
boolean	srch_global_name_tbl (char name_str, int name_len, int name_idx)
void	ntr_global_name_tbl (int attr_idx, int sb_idx, int name_idx)
void	fill_in_global_attr_ntry (int ga_idx, int attr_idx, int ga_pgm_idx)
int	ntr_global_attr_tbl (int attr_idx, int name_idx)
int	ntr_common_in_global_attr_tbl (int sb_idx, int name_idx)
int	ntr_global_type_tbl (int type_idx)
int	ntr_ir_tbl (void)
int	ntr_ir_list_tbl (void)
int	ntr_gl_ir_tbl (void)
int	ntr_gl_ir_list_tbl (void)
int	ntr_gl_sh_tbl (void)
void	add_attr_to_local_list (int attr_idx)
int	ntr_sh_tbl (void)
void	find_opnd_line_and_column (opnd_type opnd, int line, int *column)
int	srch_hidden_name_tbl (char name_str, int name_len, int attr_idx, int np_idx, int *name_idx)
void	ntr_hidden_name_tbl (int attr_idx, int np_idx, int name_idx)
void	remove_hidden_name_ntry (int name_idx)
void	assign_storage_blk (int attr_idx)
void	align_bit_length (size_offset_type *bit_len, int align_to)
int	check_type_for_size_address (opnd_type *opnd)
void	bits_and_bytes_to_words (size_offset_type *bit_len, int the_plus_val, int the_shift_val)
int	ntr_attr_list_tbl (void)
void	free_attr_list (int al_idx)
void	make_external_name (int attr_idx, int name_idx, int name_len)
void	create_hidden_name_tbl (int scp_idx)
void	remove_hidden_name_tbl (int scp_idx)
Variables
static char	USMID [] = "\n@(#)5.0_pl/sources/sytb.c 5.25 10/27/99 16:59:36\n"

Define Documentation

#define FP_SGI_INFINITE 1

Definition at line 155 of file sytb.c.

Referenced by fp_classify_128(), fp_classify_32(), fp_classify_64(), and ntr_abnormal_ieee_const().

#define FP_SGI_NAN 0

Definition at line 154 of file sytb.c.

Referenced by fp_classify_128(), fp_classify_32(), fp_classify_64(), and ntr_abnormal_ieee_const().

#define FP_SGI_NORMAL 2

Definition at line 156 of file sytb.c.

Referenced by fp_classify_128(), fp_classify_32(), and fp_classify_64().

#define FP_SGI_SUBNORMAL 3

Definition at line 157 of file sytb.c.

Referenced by fp_classify_128(), fp_classify_32(), fp_classify_64(), and ntr_abnormal_ieee_const().

#define FP_SGI_ZERO 4

Definition at line 158 of file sytb.c.

Referenced by fp_classify_128(), fp_classify_32(), fp_classify_64(), and ntr_abnormal_ieee_const().

#define IEEE_128_EXPO 0X7FFF

Definition at line 148 of file sytb.c.

Referenced by fp_classify_128(), and is_normal_128().

#define IEEE_128_EXPO_ALLONES ( X ) ((X) == IEEE_128_EXPO)

Definition at line 149 of file sytb.c.

Referenced by is_normal_128().

#define IEEE_128_EXPO_BITS 15

Definition at line 145 of file sytb.c.

#define IEEE_128_MANTTL_BITS 32

Definition at line 147 of file sytb.c.

#define IEEE_128_MANTTU_BITS 16

Definition at line 146 of file sytb.c.

#define IEEE_32_EXPO_ALLONES ( X ) ((X) == IEEE_32_EXPONENT)

Definition at line 133 of file sytb.c.

Referenced by is_normal_32().

#define IEEE_32_EXPO_BITS 8

Definition at line 130 of file sytb.c.

#define IEEE_32_EXPONENT 0XFF

Definition at line 132 of file sytb.c.

Referenced by fp_classify_32(), and is_normal_32().

#define IEEE_32_MANT_BITS 23

Definition at line 131 of file sytb.c.

#define IEEE_64_EXPO_ALLONES ( X ) ((X) == IEEE_64_EXPONENT)

Definition at line 141 of file sytb.c.

Referenced by is_normal_64().

#define IEEE_64_EXPO_BITS 11

Definition at line 137 of file sytb.c.

#define IEEE_64_EXPONENT 0X7FF

Definition at line 140 of file sytb.c.

Referenced by fp_classify_64(), and is_normal_64().

#define IEEE_64_MANTL_BITS 32

Definition at line 139 of file sytb.c.

#define IEEE_64_MANTU_BITS 20

Definition at line 138 of file sytb.c.

Typedef Documentation

typedef union ieee_real_16 ieee_real_16_type

Definition at line 200 of file sytb.c.

typedef union ieee_real_4 ieee_real_4_type

Definition at line 172 of file sytb.c.

typedef union ieee_real_8 ieee_real_8_type

Definition at line 183 of file sytb.c.

Function Documentation

void add_attr_to_local_list ( int attr_idx )

Definition at line 7563 of file sytb.c.

References AL_ATTR_IDX, AL_NEXT_IDX, curr_scp_idx, Func_Entry, Func_Exit, NTR_ATTR_LIST_TBL, NULL, NULL_IDX, SCP_ATTR_LIST, SCP_ATTR_LIST_END, and TRACE.

void align_bit_length	(	size_offset_type *	bit_len,
		int	align_to
	)

Definition at line 8106 of file sytb.c.

References AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_FLD, ATD_SYMBOLIC_CONSTANT, ATD_TMP_IDX, ATD_TYPE_IDX, C_INT_TO_CN, C_TO_F_INT, CG_INTEGER_DEFAULT_TYPE, check_type_for_size_address(), CN_CONST, CN_Tbl_Idx, CN_TYPE_IDX, COPY_TBL_NTRY, Data_Obj, Div_Opr, FALSE, folder_driver(), Func_Entry, Func_Exit, gen_compiler_tmp(), 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_OPR, ir_tbl, IR_Tbl_Idx, IR_TYPE_IDX, Mult_Opr, NO_Tbl_Idx, NTR_IR_TBL, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Plus_Opr, PRINTMSG(), SA_INTEGER_DEFAULT_TYPE, Shared, Shiftl_Opr, Shiftr_Opr, stmt_start_col, stmt_start_line, Symbolic_Plus_Opr, Symbolic_Shiftl_Opr, Symbolic_Shiftr_Opr, TRACE, and TRUE.

Referenced by assign_offset(), check_and_allocate_common_storage(), end_type_blk(), final_decl_semantics(), final_equivalence_semantics(), finish_cdir_id(), stor_bit_size_of(), and storage_blk_resolution().

Here is the call graph for this function:

void assign_offset ( int attr_idx )

Definition at line 5786 of file sytb.c.

References cmd_line_flags_entry::align16, cmd_line_flags_entry::align32, cmd_line_flags_entry::align8, Align_128, Align_16, Align_32, Align_64, Align_8, Align_Bit, align_bit_length(), Align_Double, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_NAME_PTR, ATD_ALIGNMENT, ATD_CLASS, ATD_CPNT_OFFSET_IDX, ATD_IM_A_DOPE, ATD_OFFSET_ASSIGNED, ATD_OFFSET_FLD, ATD_OFFSET_IDX, ATD_POINTER, ATD_STOR_BLK_IDX, ATD_SYMBOLIC_CONSTANT, ATD_TYPE_IDX, ATT_ALIGNMENT, ATT_CHAR_SEQ, ATT_DALIGN_ME, ATT_DCL_NUMERIC_SEQ, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, C_TO_F_INT, calculate_pad(), Caution, CG_INTEGER_DEFAULT_TYPE, Character, cmd_line_flags, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Complex_16, size_offset_entry::constant, CRI_Ptr_8, CURR_BLK_NAME, cmd_line_flags_entry::dalign, DALIGN_TEST_CONDITION, FALSE, size_offset_entry::fld, fold_relationals(), Func_Entry, Func_Exit, size_offset_entry::idx, on_off_flags_entry::integer_1_and_2, Mod_Opr, Ne_Opr, NO_Tbl_Idx, ntr_const_tbl(), NULL, NULL_IDX, on_off_flags, PACK_16_BIT_TEST_CONDITION, PACK_8_BIT_TEST_CONDITION, PACK_HALF_WORD_TEST_CONDITION, Plus_Opr, PRINTMSG(), Real_16, result, cmd_line_flags_entry::s_pointer8, SB_BLANK_COMMON, SB_IS_COMMON, SB_LEN_FLD, SB_LEN_IDX, SB_NAME_PTR, SB_PAD_BLK, size_offset_binary_calc(), stor_bit_size_of(), storage_bit_size_tbl, Struct_Component, Structure, TRACE, TRUE, TYP_IDX, TYP_LINEAR, TYP_TYPE, size_offset_entry::type_idx, and Warning.

Referenced by check_and_allocate_common_storage(), end_type_blk(), final_attr_semantics(), final_decl_semantics(), gen_forall_derived_type(), and parse_cpnt_dcl_stmt().

Here is the call graph for this function:

void assign_storage_blk ( int attr_idx )

Definition at line 7933 of file sytb.c.

References AT_DEF_COLUMN, AT_DEF_LINE, ATD_ARRAY_IDX, ATD_AUTOMATIC, ATD_DATA_INIT, ATD_IM_A_DOPE, ATD_PE_ARRAY_IDX, ATD_SAVED, ATD_STACK, ATD_STOR_BLK_IDX, ATD_SYMBOLIC_CONSTANT, ATD_SYMMETRIC, ATD_TYPE_IDX, ATP_PGM_UNIT, ATP_STACK_DIR, ATT_POINTER_CPNT, C_TO_F_INT, CG_INTEGER_DEFAULT_TYPE, Character, cmd_line_flags, cmd_line_flags_entry::co_array_fortran, size_offset_entry::constant, CREATE_ID, curr_scp_idx, FALSE, size_offset_entry::fld, Func_Entry, Func_Exit, Gt_Opr, NO_Tbl_Idx, ntr_stor_blk_tbl(), NULL, NULL_IDX, pgm_attr_idx, Program, sb_len, sb_name, SB_SYMMETRIC, SCP_ATTR_IDX, SCP_DEFAULT_STORAGE, SCP_SB_BASED_IDX, SCP_SB_STACK_IDX, SCP_SB_STATIC_IDX, SCP_SB_STATIC_INIT_IDX, SCP_SB_STATIC_UNINIT_IDX, SCP_SB_SYMMETRIC_IDX, size, size_offset_logical_calc(), Stack, stor_bit_size_of(), id_str_entry::string, Structure, Sym_Blk, THIS_IS_TRUE, TRACE, TRUE, TYP_IDX, TYP_TYPE, and size_offset_entry::type_idx.

Referenced by attr_semantics(), create_runtime_array_constructor(), and final_attr_semantics().

Here is the call graph for this function:

attr_aux_tbl_type* attr_aux_var_error	(	char *	err_str,
		int	attr_idx
	)

Definition at line 3640 of file sytb.c.

References attr_aux_tbl, Internal, print_at_all(), PRINTMSG(), stmt_start_col, and stmt_start_line.

Here is the call graph for this function:

bounds_tbl_type* bd_var_error	(	char *	err_str,
		int	bd_idx
	)

Definition at line 3674 of file sytb.c.

References bounds_tbl, Internal, print_bd(), PRINTMSG(), stmt_start_col, and stmt_start_line.

Here is the call graph for this function:

void bits_and_bytes_to_words	(	size_offset_type *	bit_len,
		int	the_plus_val,
		int	the_shift_val
	)

Definition at line 8442 of file sytb.c.

References AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_CLASS, AT_Tbl_Idx, ATD_FLD, ATD_SYMBOLIC_CONSTANT, ATD_TMP_IDX, ATD_TYPE_IDX, C_INT_TO_CN, C_TO_F_INT, CG_INTEGER_DEFAULT_TYPE, check_type_for_size_address(), CN_CONST, CN_Tbl_Idx, CN_TYPE_IDX, COPY_TBL_NTRY, Data_Obj, Div_Opr, FALSE, folder_driver(), Func_Entry, Func_Exit, gen_compiler_tmp(), 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_OPR, ir_tbl, IR_Tbl_Idx, IR_TYPE_IDX, NO_Tbl_Idx, NTR_IR_TBL, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Plus_Opr, SA_INTEGER_DEFAULT_TYPE, Shared, Shiftr_Opr, stmt_start_col, stmt_start_line, Symbolic_Plus_Opr, Symbolic_Shiftr_Opr, TRACE, and TRUE.

Here is the call graph for this function:

static void calculate_pad	(	size_offset_type *	pad,
		size_offset_type *	storage_size,
		int	attr_idx
	)		`[static]`

Definition at line 6283 of file sytb.c.

References ATD_STOR_BLK_IDX, BITS_TO_WORDS, C_TO_F_INT, CG_INTEGER_DEFAULT_TYPE, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, size_offset_entry::constant, Div_Opr, ERROR, size_offset_entry::fld, Func_Entry, Func_Exit, Min_Opr, Minus_Opr, Mod_Opr, Mult_Opr, NO_Tbl_Idx, NULL, Plus_Opr, SB_PAD_AMOUNT, SB_PAD_AMOUNT_SET, size_offset_binary_calc(), size_offset_min_max_calc(), TRACE, and size_offset_entry::type_idx.

Referenced by assign_offset().

Here is the call graph for this function:

int check_type_for_size_address ( opnd_type * opnd )

Definition at line 8350 of file sytb.c.

References Asg_Opr, AT_Tbl_Idx, ATD_TYPE_IDX, CN_Tbl_Idx, CN_TYPE_IDX, COPY_OPND, Cvrt_Opr, Func_Entry, Func_Exit, IR_COL_NUM, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_OPND_L, IR_OPND_R, IR_OPR, IR_Tbl_Idx, IR_TYPE_IDX, NTR_IR_TBL, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, SA_INTEGER_DEFAULT_TYPE, TRACE, TRUE, and TYP_LINEAR.

Referenced by align_bit_length(), bits_and_bytes_to_words(), bound_semantics(), char_len_resolution(), gen_auto_length(), size_offset_binary_calc(), and size_offset_min_max_calc().

void chg_data_obj_to_pgm_unit	(	int	attr_idx,
		pgm_unit_type	pgm_unit,
		atp_proc_type	proc_type
	)

Definition at line 4427 of file sytb.c.

References AT_CIF_SYMBOL_ID, AT_NAME_IDX, AT_NAME_LEN, AT_TYPED, ATD_ARRAY_IDX, ATD_CLASS, ATD_FUNC_IDX, ATD_POINTER, ATD_TARGET, ATP_PGM_UNIT, ATP_PROC, ATP_RSLT_IDX, ATP_SCP_IDX, CLEAR_VARIANT_ATTR_INFO, COPY_ATTR_NTRY, curr_scp_idx, Dummy_Argument, Dummy_Proc, Func_Entry, Func_Exit, Function, Function_Result, MAKE_EXTERNAL_NAME, NTR_ATTR_TBL, NULL, NULL_IDX, Pgm_Unit, Pgm_Unknown, and TRACE.

Referenced by attr_link_resolution(), merge_external(), parse_call_stmt(), parse_deref(), parse_entry_stmt(), parse_inline_always_never(), parse_name_dir(), parse_nosideeffects_dir(), parse_sgi_dir_inline(), parse_star_directives(), parse_vfunction_dir(), and start_new_subpgm().

boolean compare_array_entries	(	int	bd_idx1,
		int	bd_idx2
	)

Definition at line 3366 of file sytb.c.

References BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_COLUMN_NUM, BD_LB_FLD, BD_LB_IDX, BD_LINE_NUM, BD_RANK, BD_UB_FLD, BD_UB_IDX, CN_CONST, CN_Tbl_Idx, CN_TYPE_IDX, FALSE, folder_driver(), Func_Entry, Func_Exit, Ne_Opr, NULL, NULL_IDX, THIS_IS_TRUE, TRACE, and TRUE.

Referenced by compare_derived_types(), and compare_entry_to_func_rslt().

Here is the call graph for this function:

boolean compare_derived_types	(	int	dt_idx1,
		int	dt_idx2
	)

Definition at line 3081 of file sytb.c.

References AT_ATTR_LINK, AT_MODULE_IDX, AT_NAME_LEN, AT_OBJ_NAME_LONG, AT_ORIG_NAME_LEN, AT_ORIG_NAME_LONG, AT_PRIVATE, AT_USE_ASSOCIATED, ATD_ARRAY_IDX, ATD_POINTER, ATD_TYPE_IDX, ATT_FIRST_CPNT_IDX, ATT_NUM_CPNTS, ATT_PRIVATE_CPNT, ATT_SEQUENCE_SET, ATT_UNIQUE_ID, Character, comp_phase, compare_array_entries(), compare_derived_types(), compare_names(), Decl_Semantics, dt_cmp_tbl, Eq_Opr, FALSE, fold_relationals(), Func_Entry, Func_Exit, idx, MEM_ALLOC, NULL, NULL_IDX, num_of_derived_types, SN_ATTR_IDX, SN_SIBLING_LINK, Structure, TRACE, TRUE, TYP_IDX, TYP_LINEAR, and TYP_TYPE.

Referenced by array_construct_semantics(), assignment_stmt_semantics(), check_asg_semantics(), compare_darg_or_rslt_types(), compare_darg_to_actual_arg(), compare_derived_types(), compare_duplicate_interface_bodies(), compare_entry_to_func_rslt(), compare_func_result(), equivalence_semantics(), resolve_ext_opr(), stmt_func_call_opr_handler(), stmt_func_semantics(), and struct_construct_opr_handler().

Here is the call graph for this function:

int compare_names	(	long *	id1,
		int	id1_len,
		long *	id2,
		int	id2_len
	)

boolean compare_value_to_cn	(	long_type *	value,
		int	cn_idx,
		int	opr
	)

Definition at line 224 of file sytb.c.

References CN_CONST, CN_POOL_IDX, CN_TYPE_IDX, const_pool, Eq_Opr, FALSE, folder_driver(), Func_Entry, Func_Exit, Ne_Opr, NULL, result, stmt_start_col, stmt_start_line, storage_bit_size_tbl, THIS_IS_TRUE, TRACE, TRUE, and TYP_LINEAR.

Referenced by insert_constant().

Here is the call graph for this function:

void create_hidden_name_tbl ( int scp_idx )

Definition at line 8785 of file sytb.c.

References CLEAR_TBL_NTRY, Func_Entry, Func_Exit, hidden_name_tbl, hidden_name_tbl_idx, HN_NAME_IDX, HN_NAME_LEN, NAME_POOL_ONES_IDX, NAME_POOL_ZERO_IDX, NULL, SCP_HN_FW_IDX, SCP_HN_LW_IDX, TBL_REALLOC_CK, and TRACE.

Referenced by init_name_and_stor_tbls().

int create_lib_entry_attr	(	char *	name_str,
		int	name_len,
		int	def_line,
		int	def_column
	)

Definition at line 5069 of file sytb.c.

References AT_COMPILER_GEND, AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, AT_OBJ_CLASS, AT_REFERENCED, ATP_EXT_NAME_IDX, ATP_EXT_NAME_LEN, ATP_PGM_UNIT, ATP_PROC, ATP_SCP_IDX, CREATE_ID, curr_scp_idx, Extern_Proc, Func_Entry, Func_Exit, name, NTR_ATTR_TBL, NTR_NAME_POOL, NULL, Pgm_Unit, Referenced, Subroutine, TRACE, TRUE, and id_str_entry::words.

Referenced by allocate_stmt_semantics(), create_runtime_array_constructor(), deallocate_local_allocatables(), deallocate_stmt_semantics(), end_program_unit(), flatten_function_call(), gen_bounds_check_call(), gen_conform_check_call(), gen_internal_call_stmt(), gen_ptr_chk_call(), gen_rbounds_check_call(), gen_sbounds_check_call(), insert_argchck_calls(), parse_backspace_stmt(), parse_buffer_stmt(), parse_close_stmt(), parse_dir_directives(), parse_endfile_stmt(), parse_inquire_stmt(), parse_mic_directives(), parse_open_stmt(), parse_rewind_stmt(), print_stmt_semantics(), read_stmt_semantics(), stop_pause_stmt_semantics(), test_size_stmts(), and write_stmt_semantics().

static void dump_cn_tree	(	int	root,
		int	type_idx,
		int	indent
	)		`[static]`

Definition at line 2470 of file sytb.c.

References CN_CONST, CN_LEFT_CHILD, CN_RIGHT_CHILD, CN_TYPE_IDX, convert_to_string(), Default_Typed, Func_Entry, Func_Exit, indent, NULL, NULL_IDX, TRACE, and TYP_DESC.

Referenced by ntr_const_tbl().

Here is the call graph for this function:

void fill_in_global_attr_ntry	(	int	ga_idx,
		int	attr_idx,
		int	ga_pgm_idx
	)

Definition at line 6679 of file sytb.c.

References Assumed_Shape, AT_MODULE_IDX, AT_NAME_LEN, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, AT_REFERENCED, ATD_ARRAY_IDX, ATD_CLASS, ATD_IN_COMMON, ATD_INTENT, ATD_POINTER, ATD_TARGET, ATD_TYPE_IDX, ATP_ALT_ENTRY, ATP_ELEMENTAL, ATP_EXPL_ITRFC, ATP_EXTRA_DARG, ATP_FIRST_IDX, ATP_GLOBAL_ATTR_IDX, ATP_NOSIDE_EFFECTS, ATP_NUM_DARGS, ATP_PGM_UNIT, ATP_PURE, ATP_RECURSIVE, ATP_RSLT_IDX, ATP_SCP_ALIVE, ATP_VFUNCTION, ATT_GLOBAL_TYPE_IDX, ATT_NUM_CPNTS, ATT_PRIVATE_CPNT, ATT_SEQUENCE_SET, ATT_STRUCT_BIT_LEN_IDX, BD_ARRAY_CLASS, BD_RANK, Character, CN_POOL_IDX, CN_TYPE_IDX, CP_CONSTANT, CRI__Pointee, curr_scp_idx, Data_Obj, Derived_Type, Dummy_Argument, fill_in_global_attr_ntry(), Func_Entry, Func_Exit, Function, Function_Result, GA_DEF_COLUMN, GA_DEF_LINE, GA_DEFINED, GA_MODULE_IDX, GA_OBJ_CLASS, GA_OPTIONAL, GA_REFERENCED, GAC_PGM_UNIT_IDX, GAD_ARRAY_IDX, GAD_ASSUMED_SHAPE_ARRAY, GAD_CLASS, GAD_INTENT, GAD_POINTER, GAD_RANK, GAD_TARGET, GAD_TYPE_IDX, GAP_ELEMENTAL, GAP_FIRST_IDX, GAP_IN_INTERFACE_BLK, GAP_NEEDS_EXPL_ITRFC, GAP_NOSIDE_EFFECTS, GAP_NUM_DARGS, GAP_PGM_UNIT, GAP_PGM_UNIT_DEFINED, GAP_PURE, GAP_RECURSIVE, GAP_RSLT_IDX, GAP_VFUNCTION, GAT_NUM_CPNTS, GAT_PRIVATE_CPNT, GAT_SEQUENCE_SET, GAT_STRUCT_BIT_LEN, GAT_STRUCT_LIN_TYPE, global_attr_tbl_idx, GN_ATTR_IDX, GT_CHAR_CLASS, GT_TYPE, Not_Referenced, ntr_global_attr_tbl(), ntr_global_bounds_tbl(), ntr_global_name_tbl(), ntr_global_type_tbl(), NULL, NULL_IDX, num_host_wds, Pgm_Unit, SCP_ATTR_IDX, SCP_IS_INTERFACE, SN_ATTR_IDX, SN_COLUMN_NUM, SN_LINE_NUM, srch_global_name_tbl(), Struct_Component, Subroutine, TRACE, TRUE, TYP_IDX, TYP_LINEAR, TYP_TYPE, Var_Len_Char, and Variable.

Referenced by check_global_pgm_unit(), fill_in_global_attr_ntry(), ntr_common_in_global_attr_tbl(), ntr_global_name_tbl(), ntr_global_type_tbl(), and ntr_ref_in_global_tbl().

Here is the call graph for this function:

void find_opnd_line_and_column	(	opnd_type *	opnd,
		int *	line,
		int *	column
	)

Definition at line 7642 of file sytb.c.

References AT_Tbl_Idx, CN_Tbl_Idx, COPY_OPND, find_opnd_line_and_column(), Func_Entry, Func_Exit, IL_OPND, IL_Tbl_Idx, IR_COL_NUM, IR_LINE_NUM, IR_Tbl_Idx, NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, SB_Tbl_Idx, SH_COL_NUM, SH_GLB_LINE, SH_Tbl_Idx, and TRACE.

Here is the call graph for this function:

static int fp_classify	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 9218 of file sytb.c.

References fp_classify_128(), fp_classify_32(), fp_classify_64(), Func_Entry, Func_Exit, NULL, storage_bit_size_tbl, TRACE, and TYP_LINEAR.

Referenced by ntr_abnormal_ieee_const().

Here is the call graph for this function:

static int fp_classify_128	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 9380 of file sytb.c.

References ieee_real_16::exponent, f, FP_SGI_INFINITE, FP_SGI_NAN, FP_SGI_NORMAL, FP_SGI_SUBNORMAL, FP_SGI_ZERO, IEEE_128_EXPO, ieee_real_16::integer_array, ieee_real_16::mantissa_l1, ieee_real_16::mantissa_l2, ieee_real_16::mantissa_u1, ieee_real_16::mantissa_u2, ieee_real_16::parts, storage_bit_size_tbl, and TYP_LINEAR.

Referenced by fp_classify().

static int fp_classify_32 ( long_type * constant ) [static]

Definition at line 9268 of file sytb.c.

References ieee_real_4::exponent, f, FP_SGI_INFINITE, FP_SGI_NAN, FP_SGI_NORMAL, FP_SGI_SUBNORMAL, FP_SGI_ZERO, IEEE_32_EXPONENT, ieee_real_4::integer_form, ieee_real_4::mantissa, and ieee_real_4::parts.

Referenced by fp_classify().

static int fp_classify_64	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 9321 of file sytb.c.

References ieee_real_8::exponent, f, FP_SGI_INFINITE, FP_SGI_NAN, FP_SGI_NORMAL, FP_SGI_SUBNORMAL, FP_SGI_ZERO, IEEE_64_EXPONENT, ieee_real_8::integer_array, ieee_real_8::mantissa_l, ieee_real_8::mantissa_u, ieee_real_8::parts, storage_bit_size_tbl, and TYP_LINEAR.

Referenced by fp_classify().

void free_attr_list ( int al_idx )

Definition at line 8668 of file sytb.c.

References AL_FREE, AL_NEXT_IDX, Func_Entry, Func_Exit, NULL, NULL_IDX, prev_idx, TRACE, and TRUE.

Referenced by array_dim_resolution(), attr_semantics(), bound_semantics(), copy_entry_exit_sh_list(), decl_semantics(), end_interface_body(), final_attr_semantics(), pe_array_dim_resolution(), read_in_module_tbl(), resolve_used_modules(), and use_stmt_semantics().

void free_tables ( void )

Definition at line 5485 of file sytb.c.

References AT_NAME_LEN, AT_OBJ_NAME_PTR, attr_aux_tbl, attr_list_tbl, attr_tbl, bounds_tbl, const_pool, const_tbl, curr_scp_idx, curr_stmt_sh_idx, expanded_intrinsic_list, Func_Entry, Func_Exit, hidden_name_tbl, ir_list_tbl, ir_tbl, loc_name_tbl, name_pool, NULL, NULL_IDX, pdg_link_tbl, program_unit_name, SCP_ATTR_IDX, scp_tbl, sec_name_tbl, sh_tbl, stor_blk_tbl, TBL_FREE, TRACE, and type_tbl.

Referenced by cvrt_proc_to_pdg(), cvrt_to_pdg(), main(), and PRINTMSG().

global_attr_tbl_type* ga_var_error	(	char *	err_str,
		int	ga_idx
	)

Definition at line 3744 of file sytb.c.

References global_attr_tbl, Internal, print_ga(), PRINTMSG(), stmt_start_col, and stmt_start_line.

Here is the call graph for this function:

int gen_compiler_star	(	int	tmp_line,
		int	tmp_column,
		task_scope_type	scope,
		boolean	add_to_attr_list
	)

Definition at line 4249 of file sytb.c.

References ADD_TMP_TO_PRIVATE_LIST, ADD_TMP_TO_SHARED_LIST, AT_COMPILER_GEND, AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, AT_REFERENCED, AT_TYPED, ATD_CLASS, Compiler_Tmp, CREATE_ID, Func_Entry, Func_Exit, name, NTR_ATTR_TBL, ntr_local_attr_list(), NTR_NAME_POOL, NULL, Priv, Referenced, id_str_entry::string, TRACE, TRUE, and id_str_entry::words.

Here is the call graph for this function:

int gen_compiler_tmp	(	int	tmp_line,
		int	tmp_column,
		task_scope_type	scope,
		boolean	add_to_attr_list
	)

Definition at line 4116 of file sytb.c.

References ADD_TMP_TO_PRIVATE_LIST, ADD_TMP_TO_SHARED_LIST, AT_COMPILER_GEND, AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, AT_REFERENCED, AT_TYPED, ATD_CLASS, Compiler_Tmp, CREATE_ID, curr_scp_idx, FALSE, Func_Entry, Func_Exit, idx, loc_name_tbl, name, name_pool, NTR_ATTR_TBL, ntr_local_attr_list(), NTR_NAME_POOL, NULL, Priv, Referenced, SCP_LN_FW_IDX, SCP_LN_LW_IDX, srch_name_tbl(), id_str_entry::string, TRACE, TRUE, and id_str_entry::words.

Referenced by adjust_char_value_len(), align_bit_length(), array_construct_semantics(), array_dim_resolution(), array_element_to_scalar(), assign_stmt_semantics(), attr_semantics(), backspace_stmt_semantics(), bits_and_bytes_to_words(), build_loop_tbl(), call_list_semantics(), change_section_to_do(), character_to_character(), check_stat_variable(), close_stmt_semantics(), copy_and_replace_tmps(), create_alloc_descriptor(), create_argchck_descriptor(), create_constructor_constant(), create_format_tmp(), create_imp_do_loops(), create_io_call_descriptor(), create_namelist_descriptor(), create_runtime_array_constructor(), create_runtime_struct_constructor(), create_scalar_type_tbl(), create_strct_tbl(), determine_lb_ub(), do_single_asg(), endfile_stmt_semantics(), final_arg_work(), final_decl_semantics(), finish_cdir_id(), flatten_function_call(), fold_aggragate_expression(), forall_semantics(), gen_allocatable_ptr_ptee(), gen_arg_type_descriptor(), gen_call_type_descriptor(), gen_dv_def_loops(), gen_forall_tmp(), gen_initialized_tmp(), gen_loop_end_ir(), gen_sf_dv_whole_def(), gen_static_integer_array_tmp(), gen_tmp_equal_max_zero(), get_stmt_tmp(), init_whole_array(), inquire_stmt_semantics(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), io_ctl_list_semantics(), io_list_semantics(), lbound_intrinsic(), null_intrinsic(), open_stmt_semantics(), optimize_reshape(), parse_dummy_args(), parse_id_directive(), pe_array_dim_resolution(), put_string_in_tmp(), random_seed_intrinsic(), ranget_intrinsic(), read_stmt_semantics(), reshape_intrinsic(), rewind_stmt_semantics(), scalar_dope_to_scalar(), set_sb_first_attr_idx(), set_up_bd_tmps(), set_up_which_entry_tmp(), shape_intrinsic(), size_offset_binary_calc(), srch_for_calls(), storage_blk_resolution(), struct_construct_opr_handler(), subscript_opr_handler(), transfer_intrinsic(), transform_cri_ch_ptr(), translate_distant_dv_ref(), translate_distant_ref1(), translate_dv_component(), ubound_intrinsic(), vv_subscript_semantics(), and write_stmt_semantics().

Here is the call graph for this function:

int gen_compiler_upbd	(	int	tmp_line,
		int	tmp_column,
		task_scope_type	scope,
		boolean	add_to_attr_list
	)

Definition at line 4338 of file sytb.c.

References ADD_TMP_TO_PRIVATE_LIST, ADD_TMP_TO_SHARED_LIST, AT_COMPILER_GEND, AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, AT_REFERENCED, AT_TYPED, ATD_CLASS, Compiler_Tmp, CREATE_ID, Func_Entry, Func_Exit, name, NTR_ATTR_TBL, ntr_local_attr_list(), NTR_NAME_POOL, NULL, Priv, Referenced, id_str_entry::string, TRACE, TRUE, and id_str_entry::words.

Here is the call graph for this function:

int gen_debug_lbl_stmt	(	int	stmt_idx,
		atl_debug_class_type	label_type,
		int	attr_idx
	)

Definition at line 4731 of file sytb.c.

References AT_COMPILER_GEND, AT_DEFINED, AT_OBJ_CLASS, AT_Tbl_Idx, ATL_CLASS, ATL_DEBUG_CLASS, ATL_DEF_STMT_IDX, Before, Continue_Stmt, CREATE_ID, curr_debug_lbl, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, gen_sh(), IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPR, IR_TYPE_IDX, Label, Label_Opr, Lbl_Debug, Limit, MAX_GENERATED_LABELS, name, NTR_IR_TBL, ntr_local_attr_list(), NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_LABELED, SH_P2_SKIP_ME, SH_PREV_IDX, id_str_entry::string, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.

Referenced by end_do_blk(), end_forall_blk(), end_function(), end_if_blk(), end_internal_proc(), end_labeled_do(), end_module_proc(), end_program_unit(), end_select_blk(), end_subroutine(), end_where_blk(), parse_call_stmt(), parse_prog_unit(), parse_return_stmt(), and parse_stop_pause_stmt().

Here is the call graph for this function:

int gen_internal_lbl ( int label_line )

Definition at line 3778 of file sytb.c.

References AT_COMPILER_GEND, AT_OBJ_CLASS, AT_REFERENCED, ATL_CLASS, ATL_NOVECTOR, cdir_switches, CREATE_ID, curr_internal_lbl, Func_Entry, Func_Exit, Label, Lbl_Internal, Limit, MAX_GENERATED_LABELS, name, ntr_local_attr_list(), NULL, PRINTMSG(), Referenced, id_str_entry::string, TRACE, TRUE, and cdir_switch_entry::vector.

Referenced by assignment_stmt_semantics(), check_multiple_entry_func(), copy_sbtree(), copy_subtree(), create_loop_stmts(), determine_lb_ub(), do_stmt_semantics(), else_stmt_semantics(), gen_assumed_shape_copy(), gen_bd_entry(), gen_branch_around_ir(), gen_forall_branch_around(), gen_if_stmt(), gen_present_ir(), if_stmt_semantics(), insert_argchck_calls(), parse_case_stmt(), parse_dir_directives(), parse_else_stmt(), parse_entry_stmt(), parse_if_stmt(), parse_select_stmt(), read_stmt_semantics(), short_circuit_branch(), srch_for_calls(), test_size_stmts(), and write_stmt_semantics().

Here is the call graph for this function:

char* get_basic_type_str ( int type_idx )

Definition at line 4504 of file sytb.c.

References AT_OBJ_NAME_PTR, Character, Complex, COMPLEX_DEFAULT_TYPE, CRI_Ch_Ptr, CRI_Parcel_Ptr, CRI_Ptr, Func_Entry, Func_Exit, Integer, Logical, NULL, Real, REAL_DEFAULT_TYPE, Short_Typeless_Const, Structure, TRACE, TYP_IDX, TYP_LINEAR, TYP_TYPE, Typeless, Typeless_4, and Typeless_8.

Referenced by assignment_stmt_semantics(), attr_init_semantics(), bound_semantics(), compare_darg_to_actual_arg(), compare_func_result(), const_init_semantics(), fnd_semantic_err(), io_ctl_list_semantics(), merge_parameter(), merge_type(), parse_deref(), parse_int_spec_expr(), parse_lhs(), resolve_ext_opr(), retype_attr(), stmt_func_call_opr_handler(), and struct_construct_opr_handler().

void init_name_and_stor_tbls	(	int	scp_idx,
		boolean	create_full_scp
	)

Definition at line 3461 of file sytb.c.

References Based, Based_Blk, CLEAR_TBL_NTRY, cmd_line_flags, create_hidden_name_tbl(), CREATE_ID, Dargs_Blk, Data_Blk, Data_Init_Blk, Data_Uninit_Blk, Formal, Func_Entry, Func_Exit, LN_NAME_IDX, LN_NAME_LEN, loc_name_tbl, loc_name_tbl_idx, name, NAME_POOL_ONES_IDX, NAME_POOL_ZERO_IDX, ntr_stor_blk_tbl(), NULL, cmd_line_flags_entry::pad, cmd_line_flags_entry::pad_amount, sb_len, sb_name, SB_PAD_AMOUNT, SB_PAD_AMOUNT_SET, SB_PAD_BLK, SCP_LN_FW_IDX, SCP_LN_LW_IDX, SCP_SB_BASED_IDX, SCP_SB_DARG_IDX, SCP_SB_STACK_IDX, SCP_SB_STATIC_IDX, SCP_SB_STATIC_INIT_IDX, SCP_SB_STATIC_UNINIT_IDX, Stack, Stack_Blk, Static_Local, Static_Named, stmt_start_col, stmt_start_line, id_str_entry::string, TBL_REALLOC_CK, TRACE, and TRUE.

Referenced by init_parse_prog_unit(), and start_new_scp().

Here is the call graph for this function:

void init_sytb ( void )

Definition at line 1441 of file sytb.c.

References CREATE_ID, EOS, Func_Entry, Func_Exit, Internal, main_token, NULL, NUM_AL_WDS, NUM_AT_WDS, NUM_BD_WDS, NUM_FP_WDS, NUM_GL_WDS, NUM_GN_WDS, NUM_IL_WDS, NUM_IR_WDS, NUM_LN_WDS, NUM_ML_WDS, NUM_PDG_WDS, NUM_RO_WDS, NUM_SB_WDS, NUM_SCP_WDS, NUM_SH_WDS, NUM_SN_WDS, NUM_TYP_WDS, PRINTMSG(), stmt_start_col, stmt_start_line, Tok_Id, TOKEN_COLUMN, TOKEN_ID, TOKEN_KIND_LEN, TOKEN_KIND_STR, TOKEN_LEN, TOKEN_LINE, TRACE, UNNAMED_PROGRAM_NAME, and UNNAMED_PROGRAM_NAME_LEN.

Referenced by init_compiler().

Here is the call graph for this function:

static int insert_constant	(	int	type_idx,
		long_type *	constant,
		int	num_long_types
	)		`[static]`

Definition at line 1899 of file sytb.c.

References CLEAR_TBL_NTRY, CN_BALANCE_FACTOR, CN_CONST, CN_LEFT_CHILD, CN_RIGHT_CHILD, cn_root_idx, CN_TYPE_IDX, compare_value_to_cn(), const_tbl, const_tbl_idx, COPY_TBL_NTRY, EXIT, Func_Entry, Func_Exit, Gt_Opr, idx, Lt_Opr, NULL, NULL_IDX, TBL_REALLOC_CK, TRACE, and TYP_LINEAR.

Referenced by ntr_const_tbl().

Here is the call graph for this function:

static int insert_unordered_constant	(	int	type_idx,
		long_type *	constant,
		int	input_word_len,
		int	const_word_len
	)		`[static]`

Definition at line 2357 of file sytb.c.

References CLEAR_TBL_NTRY, CN_BOOLEAN_CONSTANT, CN_BOZ_CONSTANT, CN_HOLLERITH_TYPE, CN_LEFT_CHILD, CN_POOL_IDX, cn_root_idx, CN_TYPE_IDX, const_pool, const_tbl, const_tbl_idx, EXIT, Func_Entry, Func_Exit, idx, Not_Hollerith, NULL, NULL_IDX, prev_idx, TBL_REALLOC_CK, TRACE, TYP_LINEAR, TYP_TYPE, and Typeless.

Referenced by ntr_const_tbl().

ir_list_tbl_type* ir_list_var_error	(	char *	err_str,
		int	il_idx
	)

Definition at line 3708 of file sytb.c.

References Internal, ir_list_tbl, print_il(), PRINTMSG(), stmt_start_col, and stmt_start_line.

Here is the call graph for this function:

static boolean is_normal	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 8915 of file sytb.c.

References FALSE, Func_Entry, Func_Exit, is_normal_128(), is_normal_32(), is_normal_64(), NULL, result, storage_bit_size_tbl, TRACE, TRUE, and TYP_LINEAR.

Referenced by ntr_const_tbl().

Here is the call graph for this function:

static int is_normal_128	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 9038 of file sytb.c.

References ieee_real_16::exponent, f, IEEE_128_EXPO, IEEE_128_EXPO_ALLONES, ieee_real_16::integer_array, ieee_real_16::parts, storage_bit_size_tbl, and TYP_LINEAR.

Referenced by is_normal().

static int is_normal_32 ( long_type * constant ) [static]

Definition at line 8965 of file sytb.c.

References ieee_real_4::exponent, f, IEEE_32_EXPO_ALLONES, IEEE_32_EXPONENT, ieee_real_4::integer_form, and ieee_real_4::parts.

Referenced by is_normal().

static int is_normal_64	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 8998 of file sytb.c.

References ieee_real_8::exponent, f, IEEE_64_EXPO_ALLONES, IEEE_64_EXPONENT, ieee_real_8::integer_array, ieee_real_8::parts, storage_bit_size_tbl, and TYP_LINEAR.

Referenced by is_normal().

boolean kind_to_linear_type	(	opnd_type *	opnd,
		int	attr_idx,
		boolean	kind0seen,
		boolean	kind0E0seen,
		boolean	kind0D0seen,
		boolean	kindconstseen
	)

Definition at line 4597 of file sytb.c.

References ATD_TYPE_IDX, Character, CLEAR_TBL_NTRY, CN_INT_TO_C, CN_Tbl_Idx, CN_TYPE_IDX, Complex, COMPLEX_DEFAULT_TYPE, Default_Typed, Err_Res, error(), Error, FALSE, find_opnd_line_and_column(), Func_Entry, Func_Exit, Integer, INTEGER_DEFAULT_TYPE, IR_OPND_R, IR_OPR, IR_Tbl_Idx, kind, Kind_Typed, Kwd_Opr, Logical, LOGICAL_DEFAULT_TYPE, ntr_type_tbl(), NULL, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, PRINTMSG(), Real, REAL_DEFAULT_TYPE, TRACE, TRUE, TYP_DCL_VALUE, TYP_DESC, TYP_KIND_CONST, TYP_KIND_DOUBLE, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, type_tbl, and validate_kind().

Referenced by aint_intrinsic(), anint_intrinsic(), ceiling_intrinsic(), char_intrinsic(), cmplx_intrinsic(), floor_intrinsic(), int_intrinsic(), logical_intrinsic(), nint_intrinsic(), parse_kind_selector(), and real_intrinsic().

Here is the call graph for this function:

void make_external_name	(	int	attr_idx,
		int	name_idx,
		int	name_len
	)

Definition at line 8729 of file sytb.c.

References AT_IS_INTRIN, ATP_EXT_NAME_IDX, ATP_EXT_NAME_LEN, Func_Entry, Func_Exit, name_pool_entry::name_char, name_pool, NTR_NAME_POOL, NULL, on_off_flags, on_off_flags_entry::remove_trailing_uscore, TOKEN_ID, TOKEN_STR, TRACE, and on_off_flags_entry::upper_case_names.

int make_in_parent_string	(	int	name_str_idx,
		int	name_str_len,
		int	scp_idx,
		int *	name_len
	)

Definition at line 4838 of file sytb.c.

References AT_NAME_LEN, AT_OBJ_NAME_PTR, Func_Entry, Func_Exit, idx, MAX_EXTERNAL_ID_LEN, name_pool_entry::name_char, name_pool_entry::name_long, name_pool, name_pool_idx, NULL, NULL_IDX, SCP_ATTR_IDX, SCP_PARENT_IDX, TBL_REALLOC_CK, TRACE, UNIQUE_PROC_CONNECTOR, UNIQUE_PROC_LEN, and WORD_LEN.

Referenced by start_new_prog_unit(), and start_new_subpgm().

static int ntr_abnormal_ieee_const	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 2872 of file sytb.c.

References FALSE, fp_classify(), FP_SGI_INFINITE, FP_SGI_NAN, FP_SGI_SUBNORMAL, FP_SGI_ZERO, Func_Entry, Func_Exit, idx, ieee_const_tbl_idx, Internal, ntr_unshared_const_tbl(), NULL, NULL_IDX, PRINTMSG(), Real_16, Real_4, Real_8, sign_bit(), stmt_start_col, stmt_start_line, TRACE, and TYP_LINEAR.

Referenced by ntr_const_tbl().

Here is the call graph for this function:

int ntr_array_in_bd_tbl ( int bd_idx )

int ntr_attr_list_tbl ( void )

Definition at line 8629 of file sytb.c.

References AL_NEXT_IDX, attr_list_tbl, attr_list_tbl_idx, CLEAR_TBL_NTRY, Func_Entry, Func_Exit, NULL, NULL_IDX, TBL_REALLOC_CK, and TRACE.

int ntr_boolean_const_tbl	(	int	type_idx,
		long_type *	constant
	)

Definition at line 2609 of file sytb.c.

References CLEAR_TBL_NTRY, CN_BOOLEAN_CONSTANT, CN_POOL_IDX, CN_TYPE_IDX, const_pool, const_pool_idx, const_pool_inc, const_pool_size, const_tbl, const_tbl_idx, FOUND, Func_Entry, Func_Exit, MEM_REALLOC, NULL, STORAGE_WORD_SIZE, TBL_REALLOC_CK, TRACE, TRUE, and TYP_BIT_LEN.

Referenced by cast_typeless_constant(), convert_binary_literal(), convert_hex_literal(), and convert_octal_literal().

int ntr_boz_const_tbl	(	int	type_idx,
		long_type *	constant
	)

Definition at line 2529 of file sytb.c.

References CLEAR_TBL_NTRY, CN_BOZ_CONSTANT, CN_POOL_IDX, CN_TYPE_IDX, const_pool, const_pool_idx, const_pool_inc, const_pool_size, const_tbl, const_tbl_idx, FOUND, Func_Entry, Func_Exit, MEM_REALLOC, NULL, STORAGE_WORD_SIZE, TBL_REALLOC_CK, TRACE, TRUE, and TYP_BIT_LEN.

Referenced by cast_typeless_constant(), convert_binary_literal(), convert_hex_literal(), convert_octal_literal(), and uplus_opr_handler().

int ntr_common_in_global_attr_tbl	(	int	sb_idx,
		int	name_idx
	)

Definition at line 7025 of file sytb.c.

References AT_NAME_LEN, AT_OBJ_NAME_PTR, ATD_NEXT_MEMBER_IDX, CLEAR_TBL_NTRY, Common_Block, fill_in_global_attr_ntry(), Func_Entry, Func_Exit, GA_DEF_COLUMN, GA_DEF_LINE, GA_MODULE_IDX, GA_NAME_IDX, GA_NAME_LEN, GA_OBJ_CLASS, GA_USE_ASSOCIATED, GAC_ALIGN_SYMBOL, GAC_AUXILIARY, GAC_CACHE_ALIGN, GAC_EQUIVALENCED, GAC_FILL_SYMBOL, GAC_FIRST_MEMBER_IDX, GAC_PGM_UNIT_IDX, GAC_SECTION_GP, GAC_SECTION_NON_GP, GAC_TASK_COMMON, GAD_NEXT_IDX, global_attr_tbl, global_attr_tbl_idx, GN_ATTR_IDX, GN_NAME_IDX, GN_NAME_LEN, ntr_global_attr_tbl(), ntr_global_name_tbl(), NULL, NULL_IDX, prev_idx, SB_ALIGN_SYMBOL, SB_AUXILIARY, SB_BLK_TYPE, SB_CACHE_ALIGN, SB_DEF_COLUMN, SB_DEF_LINE, SB_EQUIVALENCED, SB_FILL_SYMBOL, SB_FIRST_ATTR_IDX, SB_MODULE_IDX, SB_SECTION_GP, SB_SECTION_NON_GP, SB_USE_ASSOCIATED, srch_global_name_tbl(), Task_Common, TBL_REALLOC_CK, and TRACE.

Referenced by ntr_global_name_tbl(), and storage_blk_resolution().

Here is the call graph for this function:

int ntr_const_tbl	(	int	type_idx,
		boolean	extra_zero_word,
		long_type *	constant
	)

Definition at line 1574 of file sytb.c.

References AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_NAME_PTR, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BITS_TO_WORDS, Character, CLEAR_TBL_NTRY, CN_CONST, CN_EXTRA_ZERO_WORD, CN_INT_TO_C, CN_POOL_IDX, cn_root_idx, CN_Tbl_Idx, CN_TYPE_IDX, Complex, Complex_4, const_pool, const_pool_idx, const_pool_inc, const_pool_size, const_tbl, const_tbl_idx, size_offset_entry::constant, dump_flags_entry::constant_bits, DALIGN_TEST_CONDITION, dump_cn_tree(), dump_flags, F_INT_TO_C, FALSE, size_offset_entry::fld, FOUND, Func_Entry, Func_Exit, size_offset_entry::idx, insert_constant(), insert_unordered_constant(), Integer, Internal, is_normal(), L, Logical, MEM_REALLOC, ntr_abnormal_ieee_const(), ntr_unshared_const_tbl(), NULL, NULL_IDX, num_host_wds, PRINTMSG(), pvp_isnormal(), Real, storage_bit_size_tbl, STORAGE_WORD_SIZE, Structure, target_ieee, TBL_REALLOC_CK, TRACE, TRUE, TYP_BIT_LEN, TYP_IDX, TYP_LINEAR, TYP_TYPE, size_offset_entry::type_idx, Typeless, and write.

Referenced by abs_intrinsic(), adjust_char_value_len(), and_opr_handler(), arith_if_stmt_semantics(), assign_new_idxs(), assign_offset(), assign_offsets_for_equiv_groups(), attr_semantics(), buffer_stmt_semantics(), calculate_iteration_count(), cast_to_cg_default(), cast_to_type_idx(), cast_typeless_constant(), char_intrinsic(), check_and_allocate_common_storage(), check_target_and_value(), concat_opr_handler(), const_init_semantics(), convert_to_do_var_type(), copy_from_gl_subtree(), create_bd_ntry_for_const(), create_constructor_constant(), create_dv_type_code(), create_kwd_text(), create_namelist_descriptor(), create_runtime_array_constructor(), create_scalar_type_tbl(), create_strct_tbl(), create_struct_argchck_tbl(), csmg_intrinsic(), cvrt_exp_to_pdg(), cvrt_opr_handler(), data_stmt_semantics(), determine_tmp_size(), dim_intrinsic(), end_type_blk(), eoshift_intrinsic(), eq_opr_handler(), final_arg_work(), final_attr_semantics(), final_decl_semantics(), final_equivalence_semantics(), finish_cdir_id(), fold_aggragate_expression(), folder_driver(), gen_alloc_header_const(), gen_arg_type_descriptor(), gen_array_element_init(), gen_call_type_descriptor(), gen_common_dv_init(), gen_dv_whole_def_init(), gen_init_stmt(), gen_internal_dope_vector(), gen_loop_end_ir(), gen_sf_dv_whole_def(), gen_static_dv_whole_def(), get_next_array_expr_element(), ichar_intrinsic(), imp_do_metamorphed(), index_intrinsic(), init_directive(), init_whole_array(), int_intrinsic(), interpret_data_imp_do(), interpret_implied_do(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), io_ctl_list_semantics(), kludge_input_conversion(), lbound_intrinsic(), len_trim_intrinsic(), lg_opr_handler(), lge_intrinsic(), linearize_list_for_equiv(), lt_opr_handler(), mask_intrinsic(), max_intrinsic(), merge_equivalence_groups2(), merge_parameter(), minus_opr_handler(), mod_intrinsic(), modulo_intrinsic(), mult_opr_handler(), namelist_static_dv_whole_def(), nint_intrinsic(), not_opr_handler(), ntr_int_const_tbl(), ntr_io_string_constant(), num_images_intrinsic(), outmoded_if_stmt_semantics(), parse_dir_directives(), parse_id_directive(), parse_open_mp_directives(), parse_openad_directives(), parse_operand(), plus_opr_handler(), power_opr_handler(), pre_parse_format(), push_data_value(), put_c_str_in_cn(), put_char_const_in_tbl(), put_format_in_tbl(), put_string_in_tmp(), reshape_intrinsic(), selected_int_kind_intrinsic(), selected_real_kind_intrinsic(), set_stride_for_first_dim(), set_up_logical_constant(), shape_intrinsic(), shift_intrinsic(), sign_intrinsic(), size_offset_binary_calc(), size_offset_logical_calc(), size_offset_min_max_calc(), stop_pause_stmt_semantics(), storage_blk_resolution(), substring_opr_handler(), transfer_intrinsic(), transform_char_sequence_ref(), translate_distant_ref2(), ubound_intrinsic(), update_fld_type(), uplus_opr_handler(), and wait_send_semantics().

Here is the call graph for this function:

int ntr_derived_type_tbl ( void )

Definition at line 5362 of file sytb.c.

References EXIT, FALSE, Func_Entry, Func_Exit, NULL, NUM_TYP_WDS, TBL_REALLOC_CK, TRACE, TRUE, TYP_WORK_IDX, type_tbl, and type_tbl_idx.

Referenced by send_attr_ntry().

int ntr_gl_ir_list_tbl ( void )

Definition at line 7497 of file sytb.c.

References CLEAR_TBL_NTRY, Func_Entry, Func_Exit, global_ir_list_tbl, global_ir_list_tbl_idx, NULL, TBL_REALLOC_CK, and TRACE.

int ntr_gl_ir_tbl ( void )

Definition at line 7464 of file sytb.c.

References CLEAR_TBL_NTRY, Func_Entry, Func_Exit, global_ir_tbl, global_ir_tbl_idx, NULL, TBL_REALLOC_CK, and TRACE.

int ntr_gl_sh_tbl ( void )

Definition at line 7530 of file sytb.c.

References CLEAR_TBL_NTRY, Func_Entry, Func_Exit, global_sh_tbl, global_sh_tbl_idx, NULL, TBL_REALLOC_CK, and TRACE.

Referenced by copy_to_gl_subtree(), and gen_gl_sh().

int ntr_global_attr_tbl	(	int	attr_idx,
		int	name_idx
	)

static int ntr_global_bounds_tbl ( int bd_idx ) [static]

Definition at line 7261 of file sytb.c.

References BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_GLOBAL_IDX, BD_LB_FLD, BD_LB_IDX, BD_RANK, BD_UB_FLD, BD_UB_IDX, CN_POOL_IDX, CN_Tbl_Idx, CN_TYPE_IDX, Constant_Size, CP_CONSTANT, EXIT, Explicit_Shape, FALSE, Func_Entry, Func_Exit, GB_ARRAY_CLASS, GB_ARRAY_SIZE, GB_LB_TYPE, GB_LOWER_BOUND, GB_RANK, GB_UB_TYPE, GB_UPPER_BOUND, global_bounds_tbl, global_bounds_tbl_idx, ntr_global_type_tbl(), NULL, NULL_IDX, NUM_GB_WDS, num_host_wds, size, TBL_REALLOC_CK, TRACE, TRUE, and TYP_LINEAR.

Referenced by fill_in_global_attr_ntry().

Here is the call graph for this function:

void ntr_global_name_tbl	(	int	attr_idx,
		int	sb_idx,
		int	name_idx
	)

Definition at line 6582 of file sytb.c.

References CLEAR_TBL_NTRY, fill_in_global_attr_ntry(), Func_Entry, Func_Exit, GA_NAME_IDX, GA_NAME_LEN, global_name_tbl, global_name_tbl_idx, GN_ATTR_IDX, GN_NAME_IDX, GN_NAME_LEN, name_pool_entry::name_long, ntr_common_in_global_attr_tbl(), ntr_global_attr_tbl(), NULL, NULL_IDX, SB_NAME_LEN, SB_NAME_LONG, str_pool, str_pool_idx, TBL_REALLOC_CK, TRACE, and WORD_LEN.

Referenced by check_global_pgm_unit(), copy_to_gl_subtree(), create_mod_info_file(), directive_stmt_semantics(), fill_in_global_attr_ntry(), ntr_common_in_global_attr_tbl(), ntr_ref_in_global_tbl(), and storage_blk_resolution().

Here is the call graph for this function:

int ntr_global_type_tbl ( int type_idx )

Definition at line 7120 of file sytb.c.

References ATT_FIRST_CPNT_IDX, ATT_GLOBAL_TYPE_IDX, ATT_NUM_CPNTS, Character, CN_POOL_IDX, CN_TYPE_IDX, Const_Len_Char, CP_CONSTANT, EXIT, FALSE, fill_in_global_attr_ntry(), Func_Entry, Func_Exit, GAT_FIRST_CPNT_IDX, global_attr_tbl_idx, global_type_tbl, global_type_tbl_idx, GT_CHAR_CLASS, GT_DCL_VALUE, GT_DESC, GT_LENGTH, GT_LENGTH_LIN_TYPE, GT_LINEAR_TYPE, GT_STRUCT_IDX, GT_TYPE, ntr_global_attr_tbl(), NULL, NULL_IDX, num_host_wds, NUM_TYP_WDS, SN_ATTR_IDX, SN_SIBLING_LINK, Structure, TBL_REALLOC_CK, TRACE, TRUE, TYP_CHAR_CLASS, TYP_DCL_VALUE, TYP_DESC, TYP_IDX, TYP_LINEAR, TYP_TYPE, and TYP_WORK_IDX.

Referenced by fill_in_global_attr_ntry(), ntr_global_bounds_tbl(), and ntr_ref_in_global_tbl().

Here is the call graph for this function:

void ntr_hidden_name_tbl	(	int	attr_idx,
		int	np_idx,
		int	name_idx
	)

Definition at line 7792 of file sytb.c.

References AT_NAME_IDX, AT_ORIG_NAME_IDX, AT_ORIG_NAME_LEN, CLEAR_TBL_NTRY, curr_scp_idx, Func_Entry, Func_Exit, hidden_name_tbl, hidden_name_tbl_idx, HN_ATTR_IDX, HN_NAME_IDX, HN_NAME_LEN, NULL, NULL_IDX, SCP_HN_FW_IDX, SCP_HN_LW_IDX, scp_tbl_idx, TBL_REALLOC_CK, and TRACE.

Referenced by resolve_attr().

int ntr_host_in_sym_tbl	(	token_type *	token,
		int	name_idx,
		int	host_attr_idx,
		int	host_ln_idx,
		boolean	make_new_attr_and_link
	)

Definition at line 551 of file sytb.c.

References AT_ATTR_LINK, AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, CLEAR_TBL_NTRY, curr_scp_idx, Func_Entry, Func_Exit, LN_ATTR_IDX, LN_NAME_IDX, LN_NAME_LEN, loc_name_tbl, loc_name_tbl_idx, NTR_ATTR_TBL, SCP_LN_FW_IDX, SCP_LN_LW_IDX, scp_tbl_idx, TBL_REALLOC_CK, TOKEN_COLUMN, TOKEN_LINE, TOKEN_STR, and TRACE.

Referenced by generic_spec_semantics(), parse_assignment_stmt(), parse_call_stmt(), parse_deref(), parse_entry_stmt(), parse_expr(), parse_goto_stmt(), parse_inline_always_never(), parse_level_1(), parse_module_stmt(), parse_namelist_stmt(), parse_sgi_dir_inline(), parse_type_spec(), and start_new_subpgm().

int ntr_ir_list_tbl ( void )

Definition at line 7425 of file sytb.c.

References CLEAR_TBL_NTRY, Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, ir_list_tbl, ir_list_tbl_idx, NULL, NULL_IDX, TBL_REALLOC_CK, and TRACE.

int ntr_ir_tbl ( void )

Definition at line 7386 of file sytb.c.

References CLEAR_TBL_NTRY, Func_Entry, Func_Exit, IR_NEXT_IDX, ir_tbl, ir_tbl_idx, NULL, NULL_IDX, TBL_REALLOC_CK, and TRACE.

int ntr_local_attr_list	(	char *	name_str,
		int	name_len,
		int	def_line,
		int	def_column
	)

Definition at line 5025 of file sytb.c.

References ADD_ATTR_TO_LOCAL_LIST, AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, Func_Entry, Func_Exit, NTR_ATTR_TBL, NTR_NAME_POOL, NULL, and TRACE.

Referenced by gen_compiler_star(), gen_compiler_tmp(), gen_compiler_upbd(), gen_debug_lbl_stmt(), gen_internal_lbl(), and parse_interface_stmt().

int ntr_stor_blk_tbl	(	char *	name_str,
		int	name_len,
		int	def_line,
		int	def_column,
		int	blk_type
	)

Definition at line 1202 of file sytb.c.

References Auxiliary, Based, CLEAR_TBL_NTRY, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, Coment, Common, curr_scp_idx, Distributed, Equivalenced, Exported, Extern, FALSE, Formal, Func_Entry, Func_Exit, Global_Breg, Global_Treg, Hosted_Stack, Internal, LM_Common, LM_Extern, LM_Static, Non_Local_Formal, Non_Local_Stack, NTR_NAME_POOL, NULL, PRINTMSG(), Restricted, SB_BLK_TYPE, SB_DEF_COLUMN, SB_DEF_LINE, SB_IS_COMMON, SB_LEN_FLD, SB_LEN_IDX, SB_NAME_IDX, SB_NAME_LEN, SB_ORIG_SCP_IDX, SB_RUNTIME_INIT, SB_SCP_IDX, Soft_External, Stack, Static, Static_Local, Static_Named, stor_blk_tbl, stor_blk_tbl_idx, Task_Common, TBL_REALLOC_CK, Threadprivate, TRACE, TRUE, and Unknown_Seg.

Referenced by assign_storage_blk(), attr_semantics(), copy_sbtree(), create_equiv_stor_blk(), gen_allocatable_ptr_ptee(), host_associated_attr_semantics(), init_name_and_stor_tbls(), parse_attrs(), parse_cache_align_name_list(), parse_common_dirs(), parse_common_stmt(), parse_id_directive(), parse_module_stmt(), parse_slash_common_dirs(), parse_var_common_list(), set_up_pe_offset_attr(), and srch_for_calls().

Here is the call graph for this function:

int ntr_sym_tbl	(	token_type *	token,
		int	name_idx
	)

Definition at line 370 of file sytb.c.

References AT_DEF_COLUMN, AT_DEF_LINE, AT_NAME_IDX, AT_NAME_LEN, CLEAR_TBL_NTRY, curr_scp_idx, Func_Entry, Func_Exit, Internal, LN_ATTR_IDX, LN_NAME_IDX, LN_NAME_LEN, loc_name_tbl, loc_name_tbl_idx, NTR_ATTR_TBL, NTR_NAME_POOL, NULL, PRINTMSG(), SCP_LN_FW_IDX, SCP_LN_LW_IDX, scp_tbl_idx, stmt_start_col, stmt_start_line, TBL_REALLOC_CK, TOKEN_COLUMN, TOKEN_LEN, TOKEN_LINE, TOKEN_STR, and TRACE.

Referenced by check_label_ref(), ck_lbl_construct_name(), enter_intrinsic_info(), gen_attr_and_IR_for_lbl(), gen_loop_lbl_name(), generic_spec_semantics(), implicit_use_semantics(), init_parse_prog_unit(), parse_assign_stmt(), parse_assignment_stmt(), parse_attrs(), parse_auxiliary_dir(), parse_cache_noalloc(), parse_call_stmt(), parse_common_stmt(), parse_copy_assumed_shape_dir(), parse_data_imp_do(), parse_data_stmt(), parse_decode_stmt(), parse_deref(), parse_derived_type_stmt(), parse_distribution_dir(), parse_do_stmt(), parse_dummy_args(), parse_encode_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_fill_align_symbol(), parse_goto_stmt(), parse_ignore_tkr(), parse_inline_always_never(), parse_io_control_list(), parse_module_stmt(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_parameter_stmt(), parse_permutation_mic(), parse_pointer_stmt(), parse_print_stmt(), parse_read_stmt(), parse_redistribute_dir(), parse_sgi_dir_inline(), parse_star_directives(), parse_stmt_func_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_type_spec(), parse_use_stmt(), parse_var_common_list(), parse_vfunction_dir(), parse_write_stmt(), set_function_rslt(), set_up_pe_offset_attr(), start_new_prog_unit(), start_new_scp(), and start_new_subpgm().

Here is the call graph for this function:

int ntr_type_tbl ( void )

Definition at line 5248 of file sytb.c.

References Character, CHARACTER_DEFAULT_TYPE, Complex, CRI_Ch_Ptr, CRI_Parcel_Ptr, CRI_Ptr, Default_Typed, Err_Res, EXIT, FALSE, Func_Entry, Func_Exit, Integer, Logical, Long_Typeless, NULL, NUM_TYP_WDS, Real, Structure, TBL_REALLOC_CK, TRACE, TRUE, TYP_BIT_LEN, TYP_DESC, TYP_LINEAR, TYP_PTR_INCREMENT, TYP_TYPE, TYP_WORK_IDX, type_tbl, type_tbl_idx, Typeless, Typeless_4, and Typeless_8.

Referenced by adjust_char_value_len(), attr_semantics(), char_len_resolution(), clock_intrinsic(), concat_opr_handler(), convert_binary_literal(), convert_const(), convert_hex_literal(), convert_octal_literal(), create_constructor_constant(), create_format_tmp(), create_kwd_text(), create_runtime_array_constructor(), create_struct_argchck_tbl(), cri_ptr_type(), final_arg_work(), final_attr_semantics(), finish_cdir_id(), fold_aggragate_expression(), folder_driver(), gen_arg_type_descriptor(), gen_call_type_descriptor(), gen_forall_derived_type(), gen_static_dv_whole_def(), get_operand_quote(), init_directive(), interpret_adjustl_intrinsic(), interpret_binary_intrinsic_opr(), interpret_binary_opr(), interpret_index_opr(), interpret_reshape_intrinsic(), interpret_transfer_intrinsic(), interpret_unary_intrinsic_opr(), kind_to_linear_type(), lbound_intrinsic(), loc_intrinsic(), make_new_bd_entries(), merge_parameter(), namelist_static_dv_whole_def(), ntr_io_string_constant(), parse_cpnt_dcl_stmt(), parse_dir_directives(), parse_open_mp_directives(), parse_openad_directives(), parse_operand(), parse_pointer_stmt(), parse_type_dcl_stmt(), parse_type_spec(), pre_parse_format(), push_data_value(), put_c_str_in_cn(), put_char_const_in_tbl(), put_format_in_tbl(), put_string_in_tmp(), reshape_intrinsic(), set_sb_first_attr_idx(), set_up_pe_offset_attr(), shape_intrinsic(), srch_for_calls(), stop_pause_stmt_semantics(), struct_construct_opr_handler(), substring_opr_handler(), transfer_intrinsic(), transform_char_sequence_ref(), ubound_intrinsic(), and validate_char_len().

int ntr_unshared_const_tbl	(	int	type_idx,
		boolean	extra_zero_word,
		long_type *	constant
	)

Definition at line 2696 of file sytb.c.

References AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_NAME_PTR, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BITS_TO_WORDS, Character, CLEAR_TBL_NTRY, CN_CONST, CN_EXTRA_ZERO_WORD, CN_INT_TO_C, CN_POOL_IDX, CN_Tbl_Idx, CN_TYPE_IDX, Complex, Complex_4, const_pool, const_pool_idx, const_pool_inc, const_pool_size, const_tbl, const_tbl_idx, DALIGN_TEST_CONDITION, size_offset_entry::fld, Func_Entry, Func_Exit, size_offset_entry::idx, Integer, Internal, L, Logical, MEM_REALLOC, NULL, NULL_IDX, PRINTMSG(), Real, storage_bit_size_tbl, STORAGE_WORD_SIZE, Structure, TBL_REALLOC_CK, TRACE, TYP_BIT_LEN, TYP_IDX, TYP_LINEAR, TYP_TYPE, and Typeless.

Referenced by cast_typeless_constant(), fold_aggragate_expression(), ntr_abnormal_ieee_const(), and ntr_const_tbl().

Here is the call graph for this function:

static boolean pvp_isnormal	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 8871 of file sytb.c.

References AR_STAT_OVERFLOW, AR_STAT_UNDERFLOW, AR_status(), FALSE, Func_Entry, Func_Exit, linear_to_arith, NULL, result, TRACE, TRUE, and TYP_LINEAR.

Referenced by ntr_const_tbl().

Here is the call graph for this function:

void remove_hidden_name_ntry ( int name_idx )

Definition at line 7880 of file sytb.c.

References curr_scp_idx, Func_Entry, Func_Exit, hidden_name_tbl, hidden_name_tbl_idx, NULL, SCP_HN_LW_IDX, and TRACE.

Referenced by compress_tbls(), and resolve_attr().

void remove_hidden_name_tbl ( int scp_idx )

Definition at line 8829 of file sytb.c.

References Func_Entry, Func_Exit, hidden_name_tbl_idx, NULL, NULL_IDX, SCP_HN_FW_IDX, SCP_HN_LW_IDX, and TRACE.

Referenced by end_interface_body().

void remove_ln_ntry ( int name_idx )

Definition at line 649 of file sytb.c.

References curr_scp_idx, Func_Entry, Func_Exit, loc_name_tbl, loc_name_tbl_idx, NULL, SCP_LN_LW_IDX, and TRACE.

Referenced by final_decl_semantics(), and parse_stmt_func_stmt().

int reserve_array_ntry ( int rank )

void set_stride_for_first_dim	(	int	type_idx,
		size_offset_type *	stride
	)

Definition at line 5119 of file sytb.c.

References AT_OBJ_CLASS, AT_Tbl_Idx, ATD_TYPE_IDX, ATT_CHAR_SEQ, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BITS_TO_WORDS, C_INT_TO_CN, CG_INTEGER_DEFAULT_TYPE, Character, CN_INTEGER_ONE_IDX, CN_INTEGER_THREE_IDX, CN_Tbl_Idx, Complex, CRI_Ch_Ptr, CRI_Ptr, Data_Obj, FALSE, size_offset_entry::fld, Func_Entry, Func_Exit, size_offset_entry::idx, Integer, Logical, NO_Tbl_Idx, ntr_const_tbl(), NULL, Real, result, Shiftr_Opr, size_offset_binary_calc(), storage_bit_size_tbl, STORAGE_WORD_SIZE, Structure, TRACE, TYP_BIT_LEN, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, and Typeless.

Referenced by allocate_stmt_semantics(), array_dim_resolution(), create_bd_ntry_for_const(), create_format_tmp(), create_runtime_array_constructor(), gen_bd_entry(), and gen_forall_tmp_bd_entry().

Here is the call graph for this function:

static int sign_bit	(	int	type_idx,
		long_type *	constant
	)		`[static]`

Definition at line 9076 of file sytb.c.

References Func_Entry, Func_Exit, NULL, result, sign_bit_128(), sign_bit_32(), sign_bit_64(), storage_bit_size_tbl, TRACE, and TYP_LINEAR.

Referenced by ntr_abnormal_ieee_const().

Here is the call graph for this function:

static int sign_bit_128 ( long_type * constant ) [static]

Definition at line 9188 of file sytb.c.

References f, ieee_real_16::integer_array, ieee_real_16::parts, and ieee_real_16::sign.

Referenced by sign_bit().

static int sign_bit_32 ( long_type * constant ) [static]

Definition at line 9126 of file sytb.c.

References f, ieee_real_4::integer_form, ieee_real_4::parts, and ieee_real_4::sign.

Referenced by sign_bit().

static int sign_bit_64 ( long_type * constant ) [static]

Definition at line 9157 of file sytb.c.

References f, ieee_real_8::integer_array, ieee_real_8::parts, and ieee_real_8::sign.

Referenced by sign_bit().

boolean srch_global_name_tbl	(	char *	name_str,
		int	name_len,
		int *	name_idx
	)

Definition at line 6527 of file sytb.c.

References FALSE, Func_Entry, Func_Exit, global_name_tbl, global_name_tbl_idx, GN_NAME_IDX, idx, NULL, srch_name_tbl(), str_pool, TRACE, and TRUE.

Referenced by assign_new_idxs_after_input(), check_call_for_global_def(), check_global_pgm_unit(), copy_sbtree(), copy_to_gl_subtree(), create_mod_info_file(), directive_stmt_semantics(), fill_in_global_attr_ntry(), find_prog_unit_tbl(), ntr_common_in_global_attr_tbl(), set_inline_state(), and storage_blk_resolution().

Here is the call graph for this function:

int srch_hidden_name_tbl	(	char *	name_str,
		int	name_len,
		int	attr_idx,
		int *	np_idx,
		int *	name_idx
	)

Definition at line 7707 of file sytb.c.

References curr_scp_idx, Func_Entry, Func_Exit, hidden_name_tbl, HN_ATTR_IDX, HN_NAME_IDX, idx, name_pool, NULL, NULL_IDX, SCP_HN_FW_IDX, SCP_HN_LW_IDX, srch_name_tbl(), and TRACE.

Referenced by resolve_attr().

Here is the call graph for this function:

int srch_host_stor_blk_tbl ( token_type * token )

Definition at line 3027 of file sytb.c.

References curr_scp_idx, Func_Entry, Func_Exit, idx, NULL, NULL_IDX, SCP_IS_INTERFACE, SCP_PARENT_IDX, srch_stor_blk_tbl(), token, TOKEN_LEN, TOKEN_STR, and TRACE.

Here is the call graph for this function:

int srch_host_sym_tbl	(	char *	name_str,
		int	name_len,
		int *	name_idx,
		boolean	search_intrin_scp
	)

Definition at line 476 of file sytb.c.

References curr_scp_idx, Func_Entry, Func_Exit, idx, NULL, NULL_IDX, SCP_IS_INTERFACE, SCP_PARENT_IDX, srch_sym_tbl(), and TRACE.

Referenced by attr_link_resolution(), attr_semantics(), check_and_allocate_common_storage(), convert_const(), generic_spec_semantics(), get_operand_dot(), get_operator_dot(), merge_intrinsic(), parse_assignment_stmt(), parse_call_stmt(), parse_deref(), parse_entry_stmt(), parse_expr(), parse_goto_stmt(), parse_inline_always_never(), parse_level_1(), parse_module_stmt(), parse_namelist_stmt(), parse_sgi_dir_inline(), parse_type_spec(), print_at_by_name(), resolve_ext_opr(), start_new_subpgm(), and use_stmt_semantics().

Here is the call graph for this function:

int srch_kwd_name	(	char *	name,
		int	length,
		int	attr_idx,
		int *	sn_idx
	)

Definition at line 708 of file sytb.c.

References AT_OBJ_CLASS, ATP_FIRST_IDX, ATP_NUM_DARGS, compare_names(), Func_Entry, Func_Exit, Internal, name_pool_entry::name_long, name_pool, NULL, NULL_IDX, Pgm_Unit, PRINTMSG(), sec_name_tbl, SN_ATTR_IDX, SN_LEN, SN_NP_IDX, Stmt_Func, stmt_start_col, stmt_start_line, TRACE, and WORD_LEN.

Referenced by call_list_semantics(), not_visible_semantics(), parse_dummy_args(), parse_stmt_func_stmt(), and verify_interface().

Here is the call graph for this function:

int srch_linked_sn	(	char *	name,
		int	length,
		int *	sn_idx
	)

Definition at line 5421 of file sytb.c.

References Func_Entry, Func_Exit, name_pool, NULL, NULL_IDX, SN_ATTR_IDX, SN_NAME_IDX, SN_NAME_LEN, SN_SIBLING_LINK, TRACE, and WORD_LEN.

Referenced by attr_semantics(), parse_cpnt_dcl_stmt(), parse_deref(), parse_module_stmt(), start_new_subpgm(), and update_components().

int srch_stor_blk_tbl	(	char *	name_str,
		int	name_len,
		int	scp_idx
	)

Definition at line 950 of file sytb.c.

References compare_names(), Func_Entry, Func_Exit, name_pool_entry::name_long, name_pool, NULL, NULL_IDX, SB_HIDDEN, SB_NAME_IDX, SB_NAME_LEN, SB_SCP_IDX, stor_blk_tbl_idx, TRACE, and WORD_LEN.

Referenced by copy_sbtree(), finish_cdir_id(), host_associated_attr_semantics(), parse_attrs(), parse_cache_align_name_list(), parse_common_dirs(), parse_common_stmt(), parse_id_directive(), parse_slash_common_dirs(), parse_var_common_list(), print_sb_by_name(), read_in_module_tbl(), send_stor_blk(), set_up_pe_offset_attr(), srch_host_stor_blk_tbl(), and storage_blk_resolution().

Here is the call graph for this function:

int srch_sym_tbl	(	char *	name_str,
		int	name_len,
		int *	name_idx
	)

Definition at line 311 of file sytb.c.

References curr_scp_idx, Func_Entry, Func_Exit, idx, LN_ATTR_IDX, LN_NAME_IDX, loc_name_tbl, name_pool, NULL, NULL_IDX, SCP_LN_FW_IDX, SCP_LN_LW_IDX, srch_name_tbl(), and TRACE.

Referenced by attr_link_resolution(), attr_semantics(), call_list_semantics(), check_and_allocate_common_storage(), check_label_ref(), ck_lbl_construct_name(), convert_const(), copy_from_gl_subtree(), final_decl_semantics(), find_attrs_used_in_bound(), gen_attr_and_IR_for_lbl(), gen_loop_lbl_name(), generic_spec_semantics(), get_operand_dot(), get_operator_dot(), host_associated_attr_semantics(), implicit_use_semantics(), init_parse_prog_unit(), issue_undefined_type_msg(), merge_intrinsic(), parse_assign_stmt(), parse_assignment_stmt(), parse_attrs(), parse_auxiliary_dir(), parse_cache_noalloc(), parse_call_stmt(), parse_common_stmt(), parse_copy_assumed_shape_dir(), parse_data_imp_do(), parse_data_stmt(), parse_decode_stmt(), parse_deref(), parse_derived_type_stmt(), parse_distribution_dir(), parse_do_stmt(), parse_dummy_args(), parse_encode_stmt(), parse_entry_stmt(), parse_equivalence_stmt(), parse_expr(), parse_fill_align_symbol(), parse_goto_stmt(), parse_ignore_tkr(), parse_inline_always_never(), parse_io_control_list(), parse_level_1(), parse_module_stmt(), parse_name_dir(), parse_namelist_stmt(), parse_nosideeffects_dir(), parse_parameter_stmt(), parse_permutation_mic(), parse_pointer_stmt(), parse_print_stmt(), parse_prog_unit(), parse_read_stmt(), parse_redistribute_dir(), parse_sgi_dir_inline(), parse_star_directives(), parse_stmt_func_stmt(), parse_symmetric_dir(), parse_type_dcl_stmt(), parse_type_spec(), parse_use_stmt(), parse_var_common_list(), parse_vfunction_dir(), parse_write_stmt(), print_at_by_name(), print_ln_by_name(), rename_only_semantics(), reshape_array_semantics(), resolve_attr(), resolve_ext_opr(), set_function_rslt(), set_up_pe_offset_attr(), srch_host_sym_tbl(), start_new_prog_unit(), start_new_scp(), start_new_subpgm(), and update_intrinsic().

Here is the call graph for this function:

size_offset_type stor_bit_size_of	(	int	attr_idx,
		boolean	all_elements,
		boolean	check_array_size
	)

Definition at line 3856 of file sytb.c.

References align_bit_length(), AT_COMPILER_GEND, AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_CLASS, AT_OBJ_NAME_PTR, ATD_ARRAY_IDX, ATD_AUXILIARY, ATD_IM_A_DOPE, ATD_TOO_BIG_FOR_DV, ATD_TYPE_IDX, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, BD_ARRAY_CLASS, BD_ARRAY_SIZE, BD_LEN_FLD, BD_LEN_IDX, BD_RANK, C_TO_F_INT, CG_INTEGER_DEFAULT_TYPE, Character, cmd_line_flags, CN_INTEGER_CHAR_BIT_IDX, CN_INTEGER_TWO_IDX, CN_Tbl_Idx, size_offset_entry::constant, Constant_Size, Data_Obj, DV_DIM_WORD_SIZE, DV_HD_WORD_SIZE, Err_Res, Error, Explicit_Shape, FALSE, size_offset_entry::fld, Func_Entry, Func_Exit, Gt_Opr, size_offset_entry::idx, Integer_8, Internal, ISSUE_EXPR_SIZE_EXCEEDED_MSG, ISSUE_STORAGE_SIZE_EXCEEDED_MSG, MAX_STORAGE_SIZE_IN_WORDS, Mult_Opr, NO_Tbl_Idx, NULL, NULL_IDX, PRINTMSG(), result, cmd_line_flags_entry::s_pointer8, size_offset_binary_calc(), size_offset_logical_calc(), storage_bit_size_tbl, Structure, Symbolic_Constant_Size, target_t3e, THIS_IS_TRUE, TRACE, TRUE, TYP_BIT_LEN, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, size_offset_entry::type_idx, Typeless, and Warning.

Referenced by array_dim_resolution(), assign_offset(), assign_storage_blk(), attr_semantics(), check_and_allocate_common_storage(), data_stmt_semantics(), end_function_semantics(), final_attr_semantics(), final_equivalence_semantics(), get_type_desc(), return_stmt_semantics(), send_attr_ntry(), and send_dummy_procedure().

Here is the call graph for this function:

attr_tbl_type* sytb_var_error	(	char *	err_str,
		int	attr_idx
	)

Definition at line 3605 of file sytb.c.

References attr_tbl, Internal, print_at_all(), PRINTMSG(), stmt_start_col, and stmt_start_line.

Here is the call graph for this function:

boolean validate_kind	(	basic_type_type	type,
		int	line,
		int	column,
		long *	kind,
		linear_type_type *	linear_type
	)

Definition at line 5547 of file sytb.c.

References basic_type_str, Character, Character_1, CHARACTER_DEFAULT_TYPE, Complex, Complex_16, Complex_4, Complex_8, COMPLEX_DEFAULT_TYPE, Err_Res, Error, FALSE, Func_Entry, Func_Exit, Integer, Integer_1, Integer_2, Integer_4, Integer_8, INTEGER_DEFAULT_TYPE, Logical, Logical_1, Logical_2, Logical_4, Logical_8, LOGICAL_DEFAULT_TYPE, NULL, PRINTMSG(), Real, Real_16, Real_4, Real_8, TRACE, TRUE, and Warning.

Referenced by convert_const(), and kind_to_linear_type().

Here is the call graph for this function:

Variable Documentation

char USMID[] = "\n@(#)5.0_pl/sources/sytb.c 5.25 10/27/99 16:59:36\n" [static]

Definition at line 37 of file sytb.c.

Classes

Defines

Typedefs

Functions

Variables

Define Documentation

Typedef Documentation

Function Documentation

Variable Documentation