Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
#include "defines.h"
#include "host.m"
#include "host.h"
#include "target.m"
#include "target.h"
#include "globals.m"
#include "tokens.m"
#include "sytb.m"
#include "p_globals.m"
#include "debug.m"
#include "globals.h"
#include "tokens.h"
#include "sytb.h"
#include "p_globals.h"
#include "p_end.h"
Go to the source code of this file.
static char * blk_desc_str | ( | int | blk_idx | ) | [static] |
Definition at line 3820 of file p_end.c.
References ATP_PGM_UNIT, BLK_NAME, BLK_TYPE, Blockdata_Blk, Case_Blk, Contains_Blk, Derived_Type_Blk, Do_Blk, Do_Parallel_Blk, Doall_Blk, Forall_Blk, Func_Entry, Func_Exit, Function, Function_Blk, Guard_Blk, idx, If_Blk, If_Else_Blk, If_Else_If_Blk, If_Then_Blk, Interface_Blk, Interface_Body_Blk, Internal, Internal_Blk, Module_Blk, Module_Proc_Blk, NULL, NULL_IDX, Open_Mp_Critical_Blk, Open_Mp_Do_Blk, Open_Mp_Master_Blk, Open_Mp_Ordered_Blk, Open_Mp_Parallel_Blk, Open_Mp_Parallel_Do_Blk, Open_Mp_Parallel_Sections_Blk, Open_Mp_Parallel_Workshare_Blk, Open_Mp_Section_Blk, Open_Mp_Sections_Blk, Open_Mp_Single_Blk, Open_Mp_Workshare_Blk, Parallel_Blk, Parallel_Case_Blk, PRINTMSG(), Program_Blk, Select_Blk, SGI_Critical_Section_Blk, SGI_Doacross_Blk, SGI_Parallel_Blk, SGI_Parallel_Do_Blk, SGI_Pdo_Blk, SGI_Psection_Blk, SGI_Region_Blk, SGI_Section_Blk, SGI_Single_Process_Blk, stmt_start_col, stmt_start_line, Subroutine_Blk, TRACE, Unknown_Blk, Wait_Blk, Where_Else_Blk, Where_Else_Mask_Blk, and Where_Then_Blk.
Referenced by blk_match_err(), parse_end_stmt(), and pop_and_err_blk_stk().
int blk_match_err | ( | blk_cntxt_type | blk_type, |
boolean | has_name, | ||
boolean | all_match | ||
) |
Definition at line 4039 of file p_end.c.
References AT_NAME_LEN, AT_OBJ_NAME_LONG, AT_OBJ_NAME_PTR, ATP_PGM_UNIT, blk_desc_str(), BLK_NAME, blk_stk_idx, BLK_TYPE, Case_Stmt, cif_pgm_unit_error_recovery, compare_names(), CURR_BLK, CURR_BLK_NAME, curr_stmt_sh_idx, Else_If_Stmt, Else_Stmt, Else_Where_Mask_Stmt, Else_Where_Stmt, End_Blockdata_Stmt, End_Do_Stmt, End_Forall_Stmt, End_Function_Stmt, End_If_Stmt, End_Interface_Stmt, End_Module_Stmt, End_Program_Stmt, End_Select_Stmt, End_Subroutine_Stmt, End_Type_Stmt, End_Where_Stmt, Error, FALSE, Func_Entry, Func_Exit, Function, If_Else_Blk, Interface_Body_Blk, Internal, move_blk_to_end(), NULL, NULL_IDX, pop_and_err_blk_stk(), POP_BLK_STK, PRINTMSG(), PUSH_BLK_STK, Select_Blk, SH_ERR_FLG, STMT_LEGAL_IN_BLK, stmt_start_col, stmt_start_line, stmt_type, stmt_type_str, Subroutine, Then_Stmt, token, TOKEN_COLUMN, TOKEN_ID, TOKEN_LEN, TOKEN_LINE, TRACE, TRUE, and Where_Else_Blk.
Referenced by end_critical_section_blk(), end_do_parallel_blk(), end_guard_blk(), end_open_mp_critical_blk(), end_open_mp_do_blk(), end_open_mp_master_blk(), end_open_mp_ordered_blk(), end_open_mp_parallel_blk(), end_open_mp_parallel_do_blk(), end_open_mp_parallel_sections_blk(), end_open_mp_parallel_workshare_blk(), end_open_mp_section_blk(), end_open_mp_sections_blk(), end_open_mp_single_blk(), end_open_mp_workshare_blk(), end_parallel_blk(), end_parallel_case_blk(), end_pdo_blk(), end_psection_blk(), end_region_blk(), end_SGI_parallel_blk(), end_single_process_blk(), parse_case_stmt(), parse_else_stmt(), and parse_end_stmt().
static void check_loop_bottom_nesting | ( | void | ) | [static] |
Definition at line 6000 of file p_end.c.
References BLK_DIR_NEST_CHECK_NUM_LCVS, BLK_DIR_NEST_CHECK_SH_IDX, BLK_HAS_NESTED_LOOP, BLK_INTERCHANGE_DIR_SH_IDX, BLK_INTERCHANGE_NUM_LCVS, blk_stk_idx, BLK_TYPE, curr_stmt_sh_idx, Do_Blk, Doacross_Dollar_Opr, End_Do_Stmt, Error, FALSE, Func_Entry, Func_Exit, IR_OPR, Label_Def, NULL, NULL_IDX, Parallel_Do_Par_Opr, Pdo_Par_Opr, PRINTMSG(), SH_COL_NUM, SH_COMPILER_GEN, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_LABELED, SH_LOOP_END, SH_PREV_IDX, SH_STMT_TYPE, stmt_label_idx, strcpy, TRACE, and TRUE.
Referenced by loop_end_processing().
static void end_blockdata | ( | boolean | err_call | ) | [static] |
Definition at line 1368 of file p_end.c.
References AT_DEFINED, AT_OBJ_NAME_PTR, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_SCP_ALIVE, BASIC_RECS, Before, CIF_End_Block_Data_Stmt, cif_end_scope_rec(), cif_end_unit_rec(), cif_flags, cif_send_attr(), cif_stmt_type_rec(), clearing_blk_stk, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, End_Blockdata_Stmt, EOPU_encountered, FALSE, Func_Entry, Func_Exit, gen_sh(), GL_SOURCE_LINES, global_line_tbl_idx, GLOBAL_LINE_TO_FILE_LINE, Init_Stmt_Cat, Lbl_User, Ldbg_User_Lbl, MISC_RECS, NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, resolve_fwd_lbl_refs(), SCP_ATTR_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, set_related_gl_source_lines(), SH_PREV_IDX, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, TRACE, and TRUE.
static void end_contains | ( | boolean | err_call | ) | [static] |
Definition at line 3211 of file p_end.c.
References curr_scp_idx, end_of_contains, Error, Func_Entry, Func_Exit, NULL, NULL_IDX, POP_BLK_STK, PRINTMSG(), SCP_FIRST_CHILD_IDX, SCP_IN_ERR, stmt_start_col, stmt_start_line, TRACE, and TRUE.
Referenced by parse_end_stmt().
void end_critical_section_blk | ( | boolean | err_call | ) |
Definition at line 5065 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, Do_Parallel_Blk, Do_Parallel_Region, FALSE, Func_Entry, Func_Exit, NULL, Pdo_Region, POP_BLK_STK, SGI_Critical_Section_Blk, SGI_End_Critical_Section_Stmt, SGI_Pdo_Blk, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_par_directives().
static void end_do_blk | ( | boolean | err_call | ) | [static] |
Definition at line 2661 of file p_end.c.
References Ansi, BLK_LABEL, BLK_LOOP_NUM, blk_stk_idx, BLK_TYPE, cdir_switches, CIF_End_Do_Stmt, cif_flags, cif_stmt_type_rec(), CLEAR_DIRECTIVE_STATE, cmd_line_flags, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Do_Blk, Do_Parallel_Blk, Do_Parallel_Region, Doacross_Region, Doall_Blk, Doall_Region, cdir_switch_entry::doall_region, end_task_do_blk(), Error, EXIT, FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), Ldbg_Stmt_Lbl, loop_end_processing(), MISC_RECS, Module_Proc_Blk, move_blk_to_end(), NULL, NULL_IDX, Open_Mp_Do_Blk, Open_Mp_Do_Region, Open_Mp_Parallel_Do_Blk, Open_Mp_Parallel_Do_Region, Parallel_Do_Region, Pdo_Region, pop_and_err_blk_stk(), POP_BLK_STK, PRINTMSG(), SGI_Doacross_Blk, SGI_Parallel_Do_Blk, SGI_Pdo_Blk, SH_ERR_FLG, SH_P2_SKIP_ME, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, TRACE, and TRUE.
void end_do_parallel_blk | ( | boolean | err_call | ) |
Definition at line 4703 of file p_end.c.
References BLK_ENDDO_PARALLEL_SH_IDX, blk_match_err(), blk_stk_idx, cdir_switches, CURR_BLK, Do_Parallel_Blk, cdir_switch_entry::dopar_sh_idx, End_Do_Parallel_Stmt, Error, FALSE, FREE_IR_NODE, FREE_SH_NODE, Func_Entry, Func_Exit, NULL, NULL_IDX, POP_BLK_STK, PRINTMSG(), SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_mic_directives().
void end_doacross_blk | ( | boolean | err_call | ) |
Definition at line 5035 of file p_end.c.
References Func_Entry, Func_Exit, NULL, POP_BLK_STK, and TRACE.
void end_doall_blk | ( | boolean | err_call | ) |
Definition at line 4640 of file p_end.c.
References Func_Entry, Func_Exit, NULL, POP_BLK_STK, and TRACE.
static void end_forall_blk | ( | boolean | err_call | ) | [static] |
Definition at line 1918 of file p_end.c.
References CIF_End_Forall_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_1, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM_L, Ldbg_Stmt_Lbl, MISC_RECS, NULL, NULL_IDX, POP_BLK_STK, SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_PARENT_BLK_IDX, SH_Tbl_Idx, statement_number, TRACE, and TRUE.
static void end_function | ( | boolean | err_call | ) | [static] |
Definition at line 1007 of file p_end.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AT_DEFINED, AT_OBJ_NAME_PTR, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_SCP_ALIVE, BASIC_RECS, Before, CIF_End_Function_Stmt, cif_end_scope_rec(), cif_end_unit_rec(), cif_flags, cif_send_attr(), cif_stmt_type_rec(), clearing_blk_stk, cmd_line_flags, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Debug_Lvl_1, do_cmic_blk_checks(), End_Function_Stmt, EOPU_encountered, FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), gen_sh(), GL_SOURCE_LINES, global_line_tbl_idx, GLOBAL_LINE_TO_FILE_LINE, idx, Init_Stmt_Cat, IR_COL_NUM, IR_LINE_NUM, IR_OPR, IR_TYPE_IDX, Lbl_User, Ldbg_Start_Epilogue, Ldbg_Stmt_Lbl, Ldbg_User_Lbl, MISC_RECS, NTR_IR_TBL, NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, resolve_fwd_lbl_refs(), Return_Opr, SCP_ATTR_IDX, SCP_ENTRY_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, set_related_gl_source_lines(), SH_IR_IDX, SH_PREV_IDX, SH_STMT_TYPE, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void end_guard_blk | ( | boolean | err_call | ) |
Definition at line 4839 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, Do_Parallel_Blk, Do_Parallel_Region, End_Guard_Stmt, FALSE, Func_Entry, Func_Exit, Guard_Blk, NULL, Pdo_Region, POP_BLK_STK, SGI_Pdo_Blk, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_mic_directives().
static void end_if_blk | ( | boolean | err_call | ) | [static] |
Definition at line 2927 of file p_end.c.
References AT_DEF_LINE, AT_DEFINED, AT_REFERENCED, AT_Tbl_Idx, ATL_DEF_STMT_IDX, Before, BLK_NAME, blk_stk_idx, BLK_TYPE, Br_True_Opr, CIF_End_If_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, Continue_Stmt, CURR_BLK, CURR_BLK_ERR, CURR_BLK_FIRST_SH_IDX, CURR_BLK_LABEL, curr_sh, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_1, End_If_Stmt, Endif_Opr, error(), FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), gen_sh(), If_Blk, If_Else_Blk, If_Else_If_Blk, Internal, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPR, IR_TYPE_IDX, Label_Opr, Ldbg_Stmt_Lbl, MISC_RECS, move_blk_to_end(), NTR_IR_TBL, NULL, NULL_IDX, POP_BLK_STK, PRINTMSG(), Referenced, SH_ERR_FLG, SH_IR_IDX, SH_P2_SKIP_ME, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_Tbl_Idx, statement_number, stmt_start_col, stmt_start_line, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
static void end_interface_blk | ( | boolean | err_call | ) | [static] |
Definition at line 3119 of file p_end.c.
References AT_DCL_ERR, AT_DEF_COLUMN, AT_DEF_LINE, AT_OBJ_NAME_PTR, ATI_FIRST_SPECIFIC_IDX, ATI_HAS_NON_MOD_PROC, ATI_PROC_IDX, BASIC_RECS, BLK_AT_IDX, BLK_NAME, blk_stk_idx, BLK_UNNAMED_INTERFACE, CIF_End_Interface_Stmt, cif_end_scope_rec(), cif_flags, cif_stmt_type_rec(), collapse_interface_blk(), CURR_BLK_NAME, curr_scp_idx, Error, FALSE, Func_Entry, Func_Exit, MISC_RECS, NULL, NULL_IDX, POP_BLK_STK, PRINTMSG(), SCP_IN_ERR, SN_ATTR_IDX, SN_SIBLING_LINK, statement_number, TRACE, and TRUE.
static void end_interface_body | ( | boolean | err_call | ) | [static] |
Definition at line 1736 of file p_end.c.
References AT_DCL_ERR, ATI_HAS_NON_MOD_PROC, ATI_NUM_SPECIFICS, ATP_PGM_UNIT, BASIC_RECS, BLK_AT_IDX, BLK_BD_IDX, BLK_CN_IDX, BLK_CP_IDX, BLK_NAME, BLK_NP_IDX, BLK_SB_IDX, BLK_SN_IDX, blk_stk_idx, BLK_TYP_IDX, BLK_TYPE, BLK_UNNAMED_INTERFACE, CIF_End_Function_Stmt, cif_end_scope_rec(), CIF_End_Subroutine_Stmt, cif_flags, cif_scope_info_rec(), cif_stmt_type_rec(), collapse_interface_blk(), CURR_BLK_NAME, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, FALSE, free_attr_list(), Func_Entry, Func_Exit, Function, Interface_Blk, interface_semantics_pass_driver(), loc_name_tbl_idx, MISC_RECS, need_new_sh, NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, remove_hidden_name_tbl(), SCP_ATTR_LIST, SCP_ENTRY_IDX, SCP_FIRST_CHILD_IDX, SCP_FIRST_SH_IDX, SCP_IN_ERR, SCP_LAST_CHILD_IDX, SCP_LAST_SH_IDX, SCP_LN_FW_IDX, SCP_NUM_CHILDREN, SCP_PARENT_IDX, SCP_SIBLING_IDX, scp_tbl_idx, SCP_TMP_FW_IDX, SCP_TMP_FW_IDX2, SCP_TMP_LIST, SH_COL_NUM, SH_GLB_LINE, SH_PREV_IDX, statement_number, stmt_start_col, stmt_start_line, Sub_Func_Stmt_Cat, TRACE, and TRUE.
static void end_internal_err | ( | boolean | err_call | ) | [static] |
Definition at line 3790 of file p_end.c.
References Func_Entry, Func_Exit, Internal, NULL, PRINTMSG(), stmt_start_col, stmt_start_line, and TRACE.
static void end_internal_proc | ( | boolean | err_call | ) | [static] |
Definition at line 1455 of file p_end.c.
References AT_DEFINED, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_HAS_ALT_RETURN, ATP_PGM_UNIT, ATP_SCP_ALIVE, BASIC_RECS, Before, CIF_End_Function_Stmt, cif_end_scope_rec(), CIF_End_Subroutine_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Debug_Lvl_1, do_cmic_blk_checks(), End_Stmt, Error, FALSE, Func_Entry, Func_Exit, Function, gen_debug_lbl_stmt(), 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, Lbl_User, Ldbg_Start_Epilogue, Ldbg_Stmt_Lbl, Ldbg_User_Lbl, MISC_RECS, need_new_sh, NTR_IR_TBL, ntr_sh_tbl(), NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, PRINTMSG(), resolve_fwd_lbl_refs(), Return_Opr, SCP_ATTR_IDX, SCP_FIRST_SH_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, SCP_PARENT_IDX, SH_IR_IDX, SH_PREV_IDX, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, stmt_type, Sub_Func_Stmt_Cat, Subroutine, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void end_labeled_do | ( | void | ) |
Definition at line 2210 of file p_end.c.
References Arith_If_Stmt, ATL_EXECUTABLE, BLK_LABEL, BLK_LOOP_NUM, BLK_NAME, blk_stk_idx, BLK_TYPE, Br_Asg_Opr, Br_Uncond_Opr, Case_Stmt, cdir_switches, CLEAR_DIRECTIVE_STATE, cmd_line_flags, Comment, Continue_Stmt, CURR_BLK, CURR_BLK_FIRST_SH_IDX, CURR_BLK_LABEL, curr_stmt_sh_idx, Cycle_Stmt, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Do_Infinite_Stmt, Do_Iterative_Stmt, Do_Parallel_Blk, Do_Parallel_Region, Do_While_Stmt, Doacross_Region, Doall_Blk, Doall_Region, cdir_switch_entry::doall_region, Else_If_Stmt, Else_Stmt, Else_Where_Stmt, End_Do_Stmt, End_Function_Stmt, End_If_Stmt, End_Program_Stmt, End_Select_Stmt, End_Stmt, End_Subroutine_Stmt, end_task_do_blk(), End_Where_Stmt, Error, EXIT, Exit_Stmt, FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), Goto_Stmt, If_Cstrct_Stmt, IR_OPR, Ldbg_Stmt_Lbl, loop_end_processing(), Module_Proc_Blk, move_blk_to_end(), NULL, NULL_IDX, Open_Mp_Do_Blk, Open_Mp_Do_Region, Open_Mp_Parallel_Do_Blk, Open_Mp_Parallel_Do_Region, Outmoded_If_Stmt, Parallel_Do_Region, Pdo_Region, pop_and_err_blk_stk(), POP_BLK_STK, PRINTMSG(), Return_Stmt, Select_Stmt, SGI_Doacross_Blk, SGI_Parallel_Do_Blk, SGI_Pdo_Blk, SH_ERR_FLG, SH_IR_IDX, stmt_label_idx, stmt_start_col, stmt_start_line, stmt_type, stmt_type_str, Stop_Stmt, TRACE, TRUE, and Where_Cstrct_Stmt.
Referenced by end_subroutine(), parse_end_stmt(), and stmt_level_semantics().
static void end_module | ( | boolean | err_call | ) | [static] |
Definition at line 1281 of file p_end.c.
References AT_DEFINED, AT_OBJ_NAME_PTR, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_SCP_ALIVE, BASIC_RECS, Before, CIF_End_Module_Stmt, cif_end_scope_rec(), cif_end_unit_rec(), cif_flags, cif_send_attr(), cif_stmt_type_rec(), clearing_blk_stk, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, End_Module_Stmt, EOPU_encountered, FALSE, Func_Entry, Func_Exit, gen_sh(), GL_SOURCE_LINES, global_line_tbl_idx, GLOBAL_LINE_TO_FILE_LINE, Init_Stmt_Cat, Lbl_User, Ldbg_User_Lbl, MISC_RECS, NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, resolve_fwd_lbl_refs(), SCP_ATTR_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, set_related_gl_source_lines(), SH_PREV_IDX, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, TRACE, and TRUE.
static void end_module_proc | ( | boolean | err_call | ) | [static] |
Definition at line 1588 of file p_end.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AT_DEFINED, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_HAS_ALT_RETURN, ATP_PGM_UNIT, ATP_SCP_ALIVE, BASIC_RECS, Before, CIF_End_Function_Stmt, cif_end_scope_rec(), CIF_End_Subroutine_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CURR_BLK_NAME, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Debug_Lvl_1, do_cmic_blk_checks(), End_Stmt, Error, FALSE, Func_Entry, Func_Exit, Function, gen_debug_lbl_stmt(), gen_sh(), idx, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_IDX_L, IR_LINE_NUM, IR_LINE_NUM_L, IR_OPR, IR_TYPE_IDX, Lbl_User, Ldbg_Start_Epilogue, Ldbg_Stmt_Lbl, Ldbg_User_Lbl, MISC_RECS, need_new_sh, NTR_IR_TBL, ntr_sh_tbl(), NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, PRINTMSG(), resolve_fwd_lbl_refs(), Return_Opr, SCP_ATTR_IDX, SCP_ENTRY_IDX, SCP_FIRST_SH_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, SCP_PARENT_IDX, SH_IR_IDX, SH_PREV_IDX, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, stmt_type, Sub_Func_Stmt_Cat, Subroutine, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void end_open_mp_critical_blk | ( | boolean | err_call | ) |
Definition at line 5730 of file p_end.c.
References blk_match_err(), CURR_BLK, FALSE, Func_Entry, Func_Exit, NULL, Open_Mp_Critical_Blk, Open_MP_End_Critical_Stmt, POP_BLK_STK, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_do_blk | ( | boolean | err_call | ) |
Definition at line 5347 of file p_end.c.
References BLK_ENDPDO_SH_IDX, blk_match_err(), blk_stk_idx, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, FREE_IR_NODE, FREE_SH_NODE, Func_Entry, Func_Exit, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM_R, NULL, NULL_IDX, Open_Mp_Do_Blk, Open_MP_End_Do_Stmt, POP_BLK_STK, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, stmt_start_col, stmt_start_line, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_master_blk | ( | boolean | err_call | ) |
Definition at line 5689 of file p_end.c.
References blk_match_err(), CURR_BLK, FALSE, Func_Entry, Func_Exit, NULL, Open_MP_End_Master_Stmt, Open_Mp_Master_Blk, POP_BLK_STK, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_ordered_blk | ( | boolean | err_call | ) |
Definition at line 5771 of file p_end.c.
References blk_match_err(), CURR_BLK, FALSE, Func_Entry, Func_Exit, NULL, Open_MP_End_Ordered_Stmt, Open_Mp_Ordered_Blk, POP_BLK_STK, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_parallel_blk | ( | boolean | err_call | ) |
Definition at line 5289 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Open_Mp_Do_Blk, Open_Mp_Do_Region, Open_MP_End_Parallel_Stmt, Open_Mp_Parallel_Blk, Open_Mp_Parallel_Do_Blk, Open_Mp_Parallel_Do_Region, POP_BLK_STK, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_parallel_do_blk | ( | boolean | err_call | ) |
Definition at line 5629 of file p_end.c.
References BLK_ENDPDO_SH_IDX, blk_match_err(), blk_stk_idx, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, FREE_IR_NODE, FREE_SH_NODE, Func_Entry, Func_Exit, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM_R, NULL, NULL_IDX, Open_MP_End_Parallel_Do_Stmt, Open_Mp_Parallel_Do_Blk, POP_BLK_STK, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, stmt_start_col, stmt_start_line, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_parallel_sections_blk | ( | boolean | err_call | ) |
Definition at line 5408 of file p_end.c.
References blk_match_err(), CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Open_MP_End_Parallel_Sections_Stmt, Open_Mp_Parallel_Sections_Blk, POP_BLK_STK, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_parallel_workshare_blk | ( | boolean | err_call | ) |
Definition at line 5453 of file p_end.c.
References blk_match_err(), CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Open_MP_End_Parallel_Workshare_Stmt, Open_Mp_Parallel_Workshare_Blk, POP_BLK_STK, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_section_blk | ( | boolean | err_call | ) |
Definition at line 5543 of file p_end.c.
References blk_match_err(), CURR_BLK, FALSE, Func_Entry, Func_Exit, NULL, Open_MP_End_Section_Stmt, Open_Mp_Section_Blk, POP_BLK_STK, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_sections_blk | ( | boolean | err_call | ) |
Definition at line 5498 of file p_end.c.
References blk_match_err(), CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Open_MP_End_Sections_Stmt, Open_Mp_Sections_Blk, POP_BLK_STK, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_single_blk | ( | boolean | err_call | ) |
Definition at line 5584 of file p_end.c.
References blk_match_err(), CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Open_MP_End_Single_Stmt, Open_Mp_Single_Blk, POP_BLK_STK, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_open_mp_workshare_blk | ( | boolean | err_call | ) |
Definition at line 5812 of file p_end.c.
References blk_match_err(), CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Open_MP_End_Workshare_Stmt, Open_Mp_Workshare_Blk, POP_BLK_STK, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_open_mp_directives().
void end_parallel_blk | ( | boolean | err_call | ) |
Definition at line 4579 of file p_end.c.
References blk_match_err(), cdir_switches, CLEAR_DIRECTIVE_STATE, CURR_BLK, Do_Parallel_Blk, Do_Parallel_Region, cdir_switch_entry::dopar_sh_idx, End_Parallel_Stmt, Error, FALSE, Func_Entry, Func_Exit, NULL, NULL_IDX, Parallel_Blk, Pdo_Region, POP_BLK_STK, PRINTMSG(), SGI_Pdo_Blk, SH_COL_NUM, SH_GLB_LINE, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_mic_directives().
void end_parallel_case_blk | ( | boolean | err_call | ) |
Definition at line 4892 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, Do_Parallel_Blk, Do_Parallel_Region, FALSE, Func_Entry, Func_Exit, NULL, Parallel_Case_Blk, Pdo_Region, POP_BLK_STK, SGI_Pdo_Blk, STMT_CANT_BE_IN_BLK, stmt_type, and TRACE.
Referenced by parse_mic_directives().
void end_pdo_blk | ( | boolean | err_call | ) |
Definition at line 4769 of file p_end.c.
References BLK_ENDPDO_SH_IDX, blk_match_err(), blk_stk_idx, cdir_switches, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, Error, FALSE, FREE_IR_NODE, FREE_SH_NODE, Func_Entry, Func_Exit, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM_R, NULL, NULL_IDX, cdir_switch_entry::pdo_sh_idx, POP_BLK_STK, PRINTMSG(), SGI_End_Pdo_Stmt, SGI_Pdo_Blk, SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PREV_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, stmt_start_col, stmt_start_line, and TRACE.
Referenced by parse_par_directives().
static void end_program_unit | ( | boolean | err_call | ) | [static] |
Definition at line 865 of file p_end.c.
References ADD_ATTR_TO_LOCAL_LIST, After, AT_DEFINED, AT_OBJ_NAME_PTR, AT_Tbl_Idx, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_NOSIDE_EFFECTS, ATP_SCP_ALIVE, BASIC_RECS, Before, Call_Opr, CIF_End_Program_Stmt, cif_end_scope_rec(), cif_end_unit_rec(), cif_flags, cif_send_attr(), cif_stmt_type_rec(), clearing_blk_stk, cmd_line_flags, create_lib_entry_attr(), curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Debug_Lvl_1, do_cmic_blk_checks(), End_Attr_Idx, END_LIB_ENTRY, END_NAME_LEN, End_Program_Stmt, EOPU_encountered, FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), gen_sh(), GL_SOURCE_LINES, glb_tbl_idx, global_line_tbl_idx, GLOBAL_LINE_TO_FILE_LINE, Init_Stmt_Cat, 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, Lbl_User, Ldbg_Start_Epilogue, Ldbg_Stmt_Lbl, Ldbg_User_Lbl, MISC_RECS, NTR_IR_TBL, NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, resolve_fwd_lbl_refs(), Return_Opr, Return_Stmt, SCP_ATTR_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, set_related_gl_source_lines(), SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void end_psection_blk | ( | boolean | err_call | ) |
Definition at line 5118 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, Do_Parallel_Blk, Do_Parallel_Region, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Pdo_Region, POP_BLK_STK, SGI_End_Psection_Stmt, SGI_Pdo_Blk, SGI_Psection_Blk, SGI_Section_Blk, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_par_directives().
void end_region_blk | ( | boolean | err_call | ) |
Definition at line 5236 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, Do_Parallel_Blk, Do_Parallel_Region, FALSE, Func_Entry, Func_Exit, NULL, Pdo_Region, POP_BLK_STK, SGI_Pdo_Blk, SGI_Region_Blk, SGI_Region_End_Stmt, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_star_directives().
static void end_select_blk | ( | boolean | err_call | ) | [static] |
Definition at line 2036 of file p_end.c.
References AT_DEF_LINE, AT_DEFINED, AT_Tbl_Idx, ATL_DEBUG_CLASS, ATL_DEF_STMT_IDX, Before, BLK_CASE_DEFAULT_LBL_FLD, BLK_CASE_DEFAULT_LBL_OPND, BLK_NAME, BLK_NUM_CASES, blk_stk_idx, BLK_TYPE, C_INT_TO_CN, Case_Blk, CG_INTEGER_DEFAULT_TYPE, CIF_End_Select_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, CN_Tbl_Idx, Continue_Stmt, COPY_OPND, CURR_BLK, CURR_BLK_ERR, CURR_BLK_FIRST_SH_IDX, CURR_BLK_LABEL, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Debug_Lvl_1, End_Select_Stmt, EXIT, FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), gen_sh(), IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_OPND, IL_PREV_LIST_IDX, IL_Tbl_Idx, IR_COL_NUM, IR_COL_NUM_L, IR_FLD_L, IR_FLD_R, IR_IDX_L, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_L, IR_LIST_CNT_R, IR_OPR, IR_TYPE_IDX, Label_Opr, Ldbg_Stmt_Lbl, MISC_RECS, move_blk_to_end(), NO_Tbl_Idx, NTR_IR_LIST_TBL, NTR_IR_TBL, NULL, NULL_IDX, POP_BLK_STK, Select_Blk, SH_IR_IDX, SH_LABELED, SH_NEXT_IDX, SH_PARENT_BLK_IDX, SH_PREV_IDX, statement_number, stmt_start_col, stmt_start_line, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
void end_SGI_parallel_blk | ( | boolean | err_call | ) |
Definition at line 4945 of file p_end.c.
References blk_match_err(), blk_stk_idx, cdir_switches, CLEAR_DIRECTIVE_STATE, Critical_Section_Region, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, Do_Parallel_Blk, Do_Parallel_Region, Error, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, NULL_IDX, Parallel_Section_Region, Pdo_Region, cdir_switch_entry::pdo_sh_idx, POP_BLK_STK, PRINTMSG(), SGI_Critical_Section_Blk, SGI_End_Parallel_Stmt, SGI_Parallel_Blk, SGI_Pdo_Blk, SGI_Psection_Blk, SGI_Section_Blk, SGI_Single_Process_Blk, SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_Tbl_Idx, Single_Process_Region, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_par_directives().
void end_single_process_blk | ( | boolean | err_call | ) |
Definition at line 5179 of file p_end.c.
References blk_match_err(), CLEAR_DIRECTIVE_STATE, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, Do_Parallel_Blk, Do_Parallel_Region, FALSE, Func_Entry, Func_Exit, IR_FLD_R, IR_IDX_R, NULL, Pdo_Region, POP_BLK_STK, SGI_End_Single_Process_Stmt, SGI_Pdo_Blk, SGI_Single_Process_Blk, SH_IR_IDX, SH_Tbl_Idx, STMT_CANT_BE_IN_BLK, and TRACE.
Referenced by parse_par_directives().
static void end_subroutine | ( | boolean | err_call | ) | [static] |
Definition at line 1141 of file p_end.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AT_DEFINED, AT_OBJ_NAME_PTR, ATL_CLASS, ATL_DEBUG_CLASS, ATL_EXECUTABLE, ATL_FWD_REF_IDX, ATP_HAS_ALT_RETURN, ATP_SCP_ALIVE, BASIC_RECS, Before, cif_end_scope_rec(), CIF_End_Subroutine_Stmt, cif_end_unit_rec(), cif_flags, cif_send_attr(), cif_stmt_type_rec(), clearing_blk_stk, cmd_line_flags, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_0, Debug_Lvl_1, do_cmic_blk_checks(), end_labeled_do(), End_Subroutine_Stmt, EOPU_encountered, FALSE, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), gen_sh(), GL_SOURCE_LINES, global_line_tbl_idx, GLOBAL_LINE_TO_FILE_LINE, idx, Init_Stmt_Cat, 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, Lbl_User, Ldbg_Start_Epilogue, Ldbg_Stmt_Lbl, Ldbg_User_Lbl, MISC_RECS, NTR_IR_TBL, NULL, NULL_IDX, POP_BLK_STK, PRINT_EQV_TBL, PRINT_SCP_TBL, resolve_fwd_lbl_refs(), Return_Opr, SCP_ATTR_IDX, SCP_ENTRY_IDX, SCP_IN_ERR, SCP_LAST_SH_IDX, set_related_gl_source_lines(), SH_IR_IDX, SH_PREV_IDX, statement_number, stmt_label_idx, stmt_start_col, stmt_start_line, token, TOKEN_COLUMN, TOKEN_LINE, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
static boolean end_task_do_blk | ( | void | ) | [static] |
Definition at line 2554 of file p_end.c.
References After, BLK_ENDDO_PARALLEL_SH_IDX, BLK_ENDPDO_SH_IDX, blk_stk_idx, CLEAR_DIRECTIVE_STATE, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, Do_Parallel_Blk, End_Do_Parallel_Stmt, End_Pdo_Par_Opr, Enddo_Cmic_Opr, Enddo_Open_Mp_Opr, Endparalleldo_Open_Mp_Opr, FALSE, Func_Entry, Func_Exit, gen_sh(), IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_OPR, IR_TYPE_IDX, need_new_sh, NTR_IR_TBL, NULL, NULL_IDX, Open_Mp_Do_Blk, Open_Mp_Do_Region, Open_MP_End_Do_Stmt, Open_Mp_Parallel_Do_Blk, Open_Mp_Parallel_Do_Region, Pdo_Region, POP_BLK_STK, SGI_End_Pdo_Stmt, SGI_Pdo_Blk, SH_IR_IDX, SH_Tbl_Idx, stmt_start_col, stmt_start_line, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by end_do_blk(), and end_labeled_do().
static void end_type_blk | ( | boolean | err_call | ) | [static] |
Definition at line 3257 of file p_end.c.
References Align_128, Align_16, Align_32, Align_64, Align_8, Align_Bit, align_bit_length(), Align_Double, assign_offset(), AT_OBJ_NAME_PTR, ATD_ALIGNMENT, ATD_CPNT_OFFSET_IDX, ATD_OFFSET_FLD, ATT_ALIGNMENT, ATT_CHAR_CPNT, ATT_CHAR_SEQ, ATT_DALIGN_ME, ATT_DCL_NUMERIC_SEQ, ATT_FIRST_CPNT_IDX, ATT_NUM_CPNTS, ATT_NUMERIC_CPNT, ATT_POINTER_CPNT, ATT_SEQUENCE_SET, ATT_STRUCT_BIT_LEN_FLD, ATT_STRUCT_BIT_LEN_IDX, CIF_End_Type_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, size_offset_entry::constant, CURR_BLK_DEF_COLUMN, CURR_BLK_DEF_LINE, CURR_BLK_NAME, cmd_line_flags_entry::dalign, Error, FALSE, size_offset_entry::fld, Func_Entry, Func_Exit, size_offset_entry::idx, Internal, MISC_RECS, NO_Tbl_Idx, ntr_const_tbl(), NULL, POP_BLK_STK, PRINTMSG(), SN_ATTR_IDX, SN_SIBLING_LINK, statement_number, stmt_start_col, stmt_start_line, TRACE, TRUE, and size_offset_entry::type_idx.
void end_wait_blk | ( | boolean | err_call | ) |
Definition at line 4670 of file p_end.c.
References Func_Entry, Func_Exit, NULL, POP_BLK_STK, and TRACE.
static void end_where_blk | ( | boolean | err_call | ) | [static] |
Definition at line 1974 of file p_end.c.
References CIF_End_Where_Stmt, cif_flags, cif_stmt_type_rec(), cmd_line_flags, CURR_BLK, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, cmd_line_flags_entry::debug_lvl, Debug_Lvl_1, Func_Entry, Func_Exit, gen_debug_lbl_stmt(), IR_FLD_R, IR_IDX_R, Ldbg_Stmt_Lbl, MISC_RECS, NULL, NULL_IDX, POP_BLK_STK, SH_IR_IDX, SH_PARENT_BLK_IDX, SH_STMT_TYPE, SH_Tbl_Idx, statement_number, TRACE, TRUE, Where_Cstrct_Stmt, Where_Else_Blk, Where_Else_Mask_Blk, and Where_Then_Blk.
static void finish_cdir_id | ( | void | ) | [static] |
Definition at line 104 of file p_end.c.
References align_bit_length(), Assignment_Stmt, AT_DCL_ERR, AT_Tbl_Idx, ATD_OFFSET_ASSIGNED, ATD_OFFSET_FLD, ATD_OFFSET_IDX, ATD_STOR_BLK_IDX, ATD_TMP_SEMANTICS_DONE, ATD_TYPE_IDX, Before, Character, CHARACTER_DEFAULT_TYPE, CLEAR_TBL_NTRY, CN_INTEGER_CHAR_BIT_IDX, CN_INTEGER_ONE_IDX, CN_INTEGER_ZERO_IDX, CN_Tbl_Idx, CN_TYPE_IDX, Const_Len_Char, size_offset_entry::constant, COPY_OPND, CREATE_ID, curr_glb_line, curr_scp_idx, curr_stmt_sh_idx, Default_Typed, Div_Opr, FALSE, size_offset_entry::fld, Func_Entry, Func_Exit, gen_compiler_tmp(), gen_sh(), gen_whole_substring(), size_offset_entry::idx, IL_COL_NUM, IL_FLD, IL_IDX, IL_LINE_NUM, IL_NEXT_LIST_IDX, IL_PREV_LIST_IDX, IL_Tbl_Idx, Init_Opr, Internal, IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_LIST_CNT_R, IR_OPND_L, IR_OPR, IR_TYPE_IDX, Minus_Opr, name, NO_Tbl_Idx, ntr_const_tbl(), NTR_IR_LIST_TBL, NTR_IR_TBL, ntr_type_tbl(), NULL, NULL_IDX, Null_Opr, OPND_COL_NUM, OPND_FLD, OPND_IDX, OPND_LINE_NUM, Plus_Opr, PRINTMSG(), sb_len, SB_LEN_FLD, SB_LEN_IDX, sb_name, SB_NAME_PTR, SH_IR_IDX, SH_P2_SKIP_ME, SH_PREV_IDX, Shared, size_offset_binary_calc(), srch_stor_blk_tbl(), id_str_entry::string, TRACE, TRUE, TYP_CHAR_CLASS, TYP_DESC, TYP_FLD, TYP_IDX, TYP_LINEAR, TYP_TYPE, TYP_WORK_IDX, size_offset_entry::type_idx, type_tbl, and What_Blk.
Referenced by parse_end_stmt().
static void loop_end_processing | ( | void | ) | [static] |
Definition at line 3482 of file p_end.c.
References After, AT_DEF_LINE, AT_DEFINED, AT_REFERENCED, AT_Tbl_Idx, ATL_CYCLE_LBL, ATL_DEF_STMT_IDX, Before, BLK_BLOCKABLE_DIR_SH_IDX, BLK_BLOCKABLE_NEST_OK, BLK_BLOCKABLE_NUM_LCVS, BLK_CYCLE_STMT, BLK_DIR_NEST_CHECK_NUM_LCVS, BLK_DO_TYPE, BLK_EXIT_STMT, BLK_INTERCHANGE_NUM_LCVS, BLK_SKIP_LBL_IDX, blk_stk_idx, check_loop_bottom_nesting(), cif_flags, Continue_Stmt, CURR_BLK_FIRST_SH_IDX, curr_stmt_sh_idx, Cycle_Lbl, End_Do_Stmt, Error, Exit_Lbl, FALSE, Func_Entry, Func_Exit, gen_loop_lbl_name(), gen_sh(), Infinite_Loop, 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, LA_CH_COLUMN, LA_CH_LINE, Label_Opr, Loop_End_Opr, MISC_RECS, NTR_IR_TBL, NULL, NULL_IDX, PRINTMSG(), Referenced, SH_COMPILER_GEN, SH_ERR_FLG, SH_IR_IDX, SH_LABELED, SH_LOOP_END, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_Tbl_Idx, Statement_Num_Stmt, statement_number, stmt_end_col, stmt_end_line, stmt_start_col, stmt_start_line, stmt_type, TRACE, TRUE, and TYPELESS_DEFAULT_TYPE.
Referenced by end_do_blk(), and end_labeled_do().
int move_blk_to_end | ( | int | blk_idx | ) |
Definition at line 4525 of file p_end.c.
References blk_stk, blk_stk_idx, BLK_TYPE, cdir_switches, Do_Blk, Doall_Blk, cdir_switch_entry::doall_region, FALSE, Func_Entry, Func_Exit, NULL, POP_BLK_STK, PUSH_BLK_STK, and TRACE.
Referenced by blk_match_err(), check_do_open_mp_nesting(), end_do_blk(), end_if_blk(), end_labeled_do(), end_select_blk(), parse_end_stmt(), pop_and_err_blk_stk(), remove_do_parallel_blk(), and remove_pdo_blk().
void parse_end_stmt | ( | void | ) |
Definition at line 294 of file p_end.c.
References Ansi, AT_NAME_LEN, AT_OBJ_NAME_LONG, AT_Tbl_Idx, ATP_PGM_UNIT, blk_desc_str(), BLK_LABEL, blk_match_err(), blk_stk_idx, BLK_TYPE, Blockdata_Blk, Ch_Class_EOF, check_for_vestigial_task_blks(), CIF_Construct_Name_Reference, cif_end_unit_column, cif_end_unit_line, cif_flags, cif_pgm_unit_start_line, cif_usage_rec(), compare_names(), Contains_Blk, CURR_BLK, CURR_BLK_ERR, CURR_BLK_NAME, curr_scp_idx, curr_stmt_category, curr_stmt_sh_idx, Declaration_Stmt_Cat, Derived_Type_Blk, Do_Blk, End_Blockdata_Stmt, end_blocks, end_contains(), End_Do_Stmt, End_Forall_Stmt, End_Function_Stmt, End_If_Stmt, End_Interface_Stmt, end_labeled_do(), End_Module_Stmt, end_of_contains, End_Program_Stmt, End_Select_Stmt, End_Subroutine_Stmt, End_Type_Stmt, End_Where_Stmt, Endfile_Stmt, EOPU_encountered, EOS, EOS_STR, Error, EXIT, FALSE, Find_EOS, finish_cdir_id(), Forall_Blk, Func_Entry, Func_Exit, Function, Function_Blk, gen_attr_and_IR_for_lbl(), If_Blk, if_stmt_lbl_idx, Interface_Blk, Interface_Body_Blk, Internal, issue_deferred_msgs(), LA_CH_CLASS, LA_CH_COLUMN, LA_CH_LINE, LA_CH_VALUE, matched_specific_token(), MATCHED_TOKEN_CLASS, Module_Blk, Module_Proc_Blk, move_blk_to_end(), NEXT_LA_CH, NULL, NULL_IDX, parse_endfile_stmt(), parse_err_flush(), pop_and_err_blk_stk(), POP_BLK_STK, PRINTMSG(), Program_Blk, reset_lex(), SCP_IN_ERR, Select_Blk, SH_ERR_FLG, SH_P2_SKIP_ME, SH_STMT_TYPE, STMT_CANT_BE_IN_BLK, stmt_label_idx, stmt_line_idx, stmt_start_col, stmt_start_line, stmt_type, stmt_type_str, Subroutine, Subroutine_Blk, Tok_Class_Id, Tok_Class_Keyword, Tok_Id, Tok_Kwd_Block, Tok_Kwd_CoFunction, Tok_Kwd_CoSubroutine, Tok_Kwd_Data, Tok_Kwd_Do, Tok_Kwd_File, Tok_Kwd_Forall, Tok_Kwd_Function, Tok_Kwd_If, Tok_Kwd_Interface, Tok_Kwd_Module, Tok_Kwd_Program, Tok_Kwd_Select, Tok_Kwd_Subroutine, Tok_Kwd_Type, Tok_Kwd_Where, token, TOKEN_BUF_IDX, TOKEN_COLUMN, TOKEN_ID, TOKEN_LEN, TOKEN_LINE, TOKEN_STMT_NUM, TOKEN_STR, TRACE, TRUE, Where_Then_Blk, and XREF_RECS.
boolean pop_and_err_blk_stk | ( | int | match_idx, |
boolean | pop_the_blks | ||
) |
Definition at line 4306 of file p_end.c.
References AT_DCL_ERR, AT_OBJ_NAME_PTR, BLK_DEF_COLUMN, BLK_DEF_LINE, blk_desc_str(), BLK_ERR, BLK_FIRST_SH_IDX, BLK_LABEL, blk_stk_idx, BLK_TYPE, Case_Blk, CLEAR_DIRECTIVE_STATE, Contains_Blk, CURR_BLK_NAME, curr_scp_idx, curr_stmt_sh_idx, Do_Blk, Do_Parallel_Blk, Do_Parallel_Region, Else_If_Stmt, Else_Stmt, Else_Where_Mask_Stmt, Else_Where_Stmt, end_blocks, End_Stmt, Error, FALSE, Func_Entry, Func_Exit, glb_tbl_idx, Guard_Blk, If_Blk, If_Else_Blk, If_Else_If_Blk, If_Then_Blk, Main_Attr_Idx, move_blk_to_end(), need_new_sh, ntr_sh_tbl(), NULL, NULL_IDX, Open_Mp_Do_Blk, Open_Mp_Do_Region, Open_Mp_Parallel_Do_Blk, Open_Mp_Parallel_Do_Region, Parallel_Blk, Parallel_Case_Blk, Pdo_Region, POP_BLK_STK, PRINTMSG(), Program_Blk, SCP_ATTR_IDX, SCP_IN_ERR, Select_Blk, SGI_Pdo_Blk, SH_COL_NUM, SH_ERR_FLG, SH_GLB_LINE, SH_NEXT_IDX, SH_PREV_IDX, SH_STMT_TYPE, stmt_label_idx, stmt_start_col, stmt_start_line, stmt_type, TRACE, TRUE, Wait_Blk, and Where_Else_Blk.
Referenced by blk_match_err(), end_do_blk(), end_labeled_do(), iss_blk_stk_err(), parse_end_stmt(), and parse_prog_unit().
boolean remove_do_parallel_blk | ( | boolean | cannot_nest, |
char * | str, | ||
int | line, | ||
int | col | ||
) |
Definition at line 5859 of file p_end.c.
References BLK_DEF_LINE, blk_stk_idx, BLK_TYPE, CLEAR_DIRECTIVE_STATE, Do_Blk, Do_Parallel_Blk, Do_Parallel_Region, Error, FALSE, Func_Entry, Func_Exit, Module_Proc_Blk, move_blk_to_end(), NULL, POP_BLK_STK, PRINTMSG(), TRACE, and TRUE.
Referenced by parse_mic_directives().
boolean remove_pdo_blk | ( | boolean | cannot_nest, |
char * | str, | ||
int | line, | ||
int | col | ||
) |
Definition at line 5926 of file p_end.c.
References BLK_DEF_LINE, blk_stk_idx, BLK_TYPE, CLEAR_DIRECTIVE_STATE, Do_Blk, Error, FALSE, Func_Entry, Func_Exit, Module_Proc_Blk, move_blk_to_end(), NULL, Pdo_Region, POP_BLK_STK, PRINTMSG(), SGI_Pdo_Blk, TRACE, and TRUE.
Referenced by parse_par_directives().