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 "s_globals.m"
#include "debug.m"
#include "globals.h"
#include "tokens.h"
#include "sytb.h"
#include "s_globals.h"
Go to the source code of this file.
Functions | |
void | end_stmt_semantics (void) |
void | end_subroutine_semantics (void) |
void | end_function_semantics (void) |
void | end_forall_semantics (void) |
void | end_select_semantics (void) |
void | end_where_semantics (void) |
Variables | |
static char | USMID [] = "\n@(#)5.0_pl/sources/s_end.c 5.2 06/16/99 10:02:23\n" |
void end_forall_semantics | ( | void | ) |
Definition at line 321 of file s_end.c.
References active_forall_sh_idx, AT_ATTR_LINK, AT_IGNORE_ATTR_LINK, curr_stmt_sh_idx, EXIT, FALSE, Forall_Opr, Func_Entry, Func_Exit, IL_FLD, IL_IDX, IL_NEXT_LIST_IDX, IL_Tbl_Idx, Internal, IR_IDX_R, IR_OPR, NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_ERR_FLG, SH_GLB_LINE, SH_IR_IDX, SH_PARENT_BLK_IDX, TRACE, and within_forall_construct.
void end_function_semantics | ( | void | ) |
Definition at line 192 of file s_end.c.
References AL_ATTR_IDX, AL_NEXT_IDX, AT_Tbl_Idx, ATD_ARRAY_IDX, ATD_IM_A_DOPE, ATD_TYPE_IDX, ATP_RSLT_IDX, cdir_switch_entry::bounds, Br_Uncond_Opr, cdir_switches, Character, size_offset_entry::constant, copy_entry_exit_sh_list(), curr_scp_idx, curr_stmt_sh_idx, dump_flags, FALSE, Func_Entry, Func_Exit, gen_directive_ir(), Gt_Opr, idx, Inline_Cdir_Opr, opt_flags_entry::inline_lvl, Inline_Lvl_0, insert_sh_chain_before(), IR_COL_NUM, IR_COL_NUM_R, IR_FLD_R, IR_IDX_R, IR_LINE_NUM, IR_LINE_NUM_R, IR_OPR, opt_flags_entry::modinline, Nobounds_Cdir_Opr, NULL, NULL_IDX, opt_flags, dump_flags_entry::preinline, result, SCP_ALT_ENTRY_CNT, SCP_ATTR_IDX, SCP_ENTRY_IDX, SCP_EXIT_IR_SH_IDX, SCP_RETURN_LABEL, SH_IR_IDX, SH_NEXT_IDX, size, size_offset_logical_calc(), stor_bit_size_of(), Structure, THIS_IS_TRUE, TRACE, TRUE, TYP_TYPE, and size_offset_entry::type_idx.
void end_select_semantics | ( | void | ) |
Definition at line 562 of file s_end.c.
References curr_stmt_sh_idx, FREE_IR_LIST_NODE, FREE_IR_NODE, Func_Entry, Func_Exit, IL_NEXT_LIST_IDX, IR_IDX_L, IR_IDX_R, IR_LIST_CNT_R, NULL, SH_ERR_FLG, SH_IR_IDX, SH_PARENT_BLK_IDX, and TRACE.
void end_stmt_semantics | ( | void | ) |
Definition at line 81 of file s_end.c.
References cdir_switch_entry::bounds, cdir_switches, copy_entry_exit_sh_list(), curr_scp_idx, dump_flags, Func_Entry, Func_Exit, gen_directive_ir(), Inline_Cdir_Opr, opt_flags_entry::inline_lvl, Inline_Lvl_0, insert_sh_chain_before(), opt_flags_entry::modinline, Nobounds_Cdir_Opr, NULL, NULL_IDX, opt_flags, dump_flags_entry::preinline, SCP_EXIT_IR_SH_IDX, SH_NEXT_IDX, and TRACE.
void end_subroutine_semantics | ( | void | ) |
Definition at line 136 of file s_end.c.
References cdir_switch_entry::bounds, cdir_switches, copy_entry_exit_sh_list(), curr_scp_idx, dump_flags, Func_Entry, Func_Exit, gen_directive_ir(), Inline_Cdir_Opr, opt_flags_entry::inline_lvl, Inline_Lvl_0, insert_sh_chain_before(), opt_flags_entry::modinline, Nobounds_Cdir_Opr, NULL, NULL_IDX, opt_flags, dump_flags_entry::preinline, SCP_EXIT_IR_SH_IDX, SH_NEXT_IDX, and TRACE.
void end_where_semantics | ( | void | ) |
Definition at line 612 of file s_end.c.
References active_forall_sh_idx, alloc_block_end_idx, alloc_block_start_idx, curr_stmt_sh_idx, Else_Where_Mask_Stmt, Else_Where_Stmt, Forall_Cstrct_Stmt, Func_Entry, Func_Exit, IL_IDX, IL_Tbl_Idx, Internal, IR_FLD_L, IR_IDX_L, NULL, NULL_IDX, PRINTMSG(), SH_COL_NUM, SH_GLB_LINE, SH_IR_IDX, SH_NEXT_IDX, SH_PARENT_BLK_IDX, SH_PREV_IDX, SH_STMT_TYPE, TRACE, Where_Cstrct_Stmt, where_dealloc_stmt_idx, and where_ir_idx.