Open64 (mfef90, whirl2f, and IR tools)  TAG: version-openad; SVN changeset: 916
Defines | Functions | Variables
wn2f_load_store.cxx File Reference
#include <climits>
#include "whirl2f_common.h"
#include "PUinfo.h"
#include "pf_cg.h"
#include "wn2f.h"
#include "st2f.h"
#include "ty2f.h"
#include "tcon2f.h"
#include "wn2f_load_store.h"
#include "ty_ftn.h"
Include dependency graph for wn2f_load_store.cxx:

Go to the source code of this file.

Defines

#define DEB_Whirl2f_IR_TY_WN2F_Arrsection_Slots   0
#define DEB_Whirl2f_IR_TY_WN2F_Arrsection_Slots_st1   0
#define WN2F_INTCONST_ZERO
#define WN2F_INTCONST_ONE

Functions

static void WN2F_Block (TOKEN_BUFFER tokens, ST *st, STAB_OFFSET off, WN2F_CONTEXT context)
void WN2F_Arrsection_Slots (TOKEN_BUFFER tokens, WN *wn, TY_IDX array_ty, WN2F_CONTEXT context, BOOL parens)
void WN2F_Array_Slots (TOKEN_BUFFER tokens, WN *wn, TY_IDX array_ty, WN2F_CONTEXT context, BOOL parens)
static ST * WN2F_Get_Named_Param (const WN *pu, const char *param_name)
static void WN2F_Translate_StringLEN (TOKEN_BUFFER tokens, ST *param_st)
static WN * WN2F_Initiate_ZeroInt (void)
static WN * WN2F_Initiate_OneInt (void)
static BOOL WN2F_Expr_Plus_Literal (TOKEN_BUFFER tokens, WN *wn, INT64 literal, WN2F_CONTEXT context)
static WN2F_STATUS WN2F_OLD_Den_Arr_Idx (TOKEN_BUFFER tokens, WN *idx_expr, WN2F_CONTEXT context)
static WN2F_STATUS WN2F_Denormalize_Array_Idx (TOKEN_BUFFER tokens, WN *idx_expr, WN2F_CONTEXT context)
static void WN2F_Normalize_Idx_To_Onedim (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
static void WN2F_Substring (TOKEN_BUFFER tokens, INT64 string_size, WN *lower_bnd, WN *substring_size, WN2F_CONTEXT context)
static void WN2F_Get_Substring_Info (WN **base, TY_IDX *string_ty, WN **lower_bnd, WN **length)
static WN * WN2F_Find_Base (WN *addr)
BOOL WN2F_Is_Address_Preg (WN *ad, TY_IDX ptr_ty)
static void WN2F_Append_Prefetch_Map (TOKEN_BUFFER tokens, WN *wn)
void WN2F_Load_Store_initialize (void)
void WN2F_Load_Store_finalize (void)
WN2F_STATUS WN2F_pstore (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_istore (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_istorex (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_mstore (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_stid (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_pstid (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_iload (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_iloadx (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_mload (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_ldid (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_lda (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_arrayexp (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_triplet (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_src_triplet (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_arrsection (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_where (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_array (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
void WN2F_arrsection_bounds (TOKEN_BUFFER tokens, WN *wn, TY_IDX array_ty, WN2F_CONTEXT context)
void WN2F_array_bounds (TOKEN_BUFFER tokens, WN *wn, TY_IDX array_ty, WN2F_CONTEXT context)
void WN2F_String_Argument (TOKEN_BUFFER tokens, WN *base_parm, WN *length, WN2F_CONTEXT context)
WN2F_STATUS WN2F_strctfld (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)
WN2F_STATUS WN2F_comma (TOKEN_BUFFER tokens, WN *wn, WN2F_CONTEXT context)

Variables

BOOL W2F_Only_Mark_Loads
static WN * WN2F_ZeroInt_Ptr = NULL
static WN * WN2F_OneInt_Ptr = NULL
TY_IDX fld_type_z = 0

Define Documentation

#define DEB_Whirl2f_IR_TY_WN2F_Arrsection_Slots   0

Definition at line 70 of file wn2f_load_store.cxx.

#define DEB_Whirl2f_IR_TY_WN2F_Arrsection_Slots_st1   0

Definition at line 71 of file wn2f_load_store.cxx.

#define WN2F_INTCONST_ONE
Value:
(WN2F_OneInt_Ptr == NULL? WN2F_OneInt_Ptr = WN2F_Initiate_OneInt() \
                            : WN2F_OneInt_Ptr)

Definition at line 83 of file wn2f_load_store.cxx.

Referenced by WN2F_array(), and WN2F_arrsection().

#define WN2F_INTCONST_ZERO
Value:
(WN2F_ZeroInt_Ptr == NULL? WN2F_ZeroInt_Ptr = WN2F_Initiate_ZeroInt() \
                            : WN2F_ZeroInt_Ptr)

Definition at line 80 of file wn2f_load_store.cxx.

Referenced by WN2F_Get_Substring_Info(), and WN2F_String_Argument().

Function Documentation

static void WN2F_Append_Prefetch_Map ( TOKEN_BUFFER  tokens,
WN *  wn 
) [static]

Definition at line 740 of file wn2f_load_store.cxx.

References Append_Token_String(), Concat2_Strings(), pf_pointer::lrnum_1L, pf_pointer::lrnum_2L, Ptr_as_String(), WHIRL2F_number_as_name, WN_MAP_Get, WN_MAP_PREFETCH, pf_pointer::wn_pref_1L, and pf_pointer::wn_pref_2L.

Referenced by WN2F_iload(), WN2F_istore(), and WN2F_pstore().

Here is the call graph for this function:

WN2F_STATUS WN2F_array ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1936 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, ASSERT_DBG_WARN, DIAG_UNIMPLEMENTED, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, f, FALSE, Fld_Path_Info::fld, FLD_type(), fld_type_z, KIND_ARRAY, Number_as_String(), OPR_ADD, OPR_ARRAY, OPR_ILOAD, OPR_INTCONST, OPR_LDID, OPR_STRCTFLD, reset_WN2F_CONTEXT_deref_addr, SCLASS_FORMAL, ST_is_value_parm(), ST_sclass(), TRUE, TY2F_Fld_Name(), TY2F_Fld_Separator(), TY2F_Get_Fld_Path(), TY_AR_etype(), TY_etype(), TY_Is_Array(), TY_Is_Character_String(), TY_Is_Pointer(), TY_kind(), TY_pointed(), TY_ptr_as_array(), TY_size(), Ty_Table, W2F_TY_pointed, WN2F_array_bounds(), WN2F_Array_Slots(), WN2F_CONTEXT_deref_addr, WN2F_F90_pu, WN2F_INTCONST_ONE, WN2F_Is_Address_Preg(), WN2F_String_Argument(), WN2F_translate(), WN_array_index, WN_const_val(), WN_element_size(), WN_kid0(), WN_kid1(), WN_num_dim, WN_opc_operator, WN_operator(), WN_st(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

void WN2F_array_bounds ( TOKEN_BUFFER  tokens,
WN *  wn,
TY_IDX  array_ty,
WN2F_CONTEXT  context 
)

Definition at line 2335 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_WARN, DIAG_UNIMPLEMENTED, FALSE, TRUE, TY_AR_etype(), TY_AR_ndims(), TY_Is_Array(), TY_is_f90_pointer(), TY_pointed(), TY_size(), WN2F_Array_Slots(), WN2F_Normalize_Idx_To_Onedim(), WN_element_size(), and WN_num_dim.

Referenced by TY2F_Translate_Fld_Path(), and WN2F_array().

Here is the call graph for this function:

void WN2F_Array_Slots ( TOKEN_BUFFER  tokens,
WN *  wn,
TY_IDX  array_ty,
WN2F_CONTEXT  context,
BOOL  parens 
)

Definition at line 2183 of file wn2f_load_store.cxx.

References Append_Token_Special(), ARB_co_dimension(), ARB_dimension(), OPR_LDA, set_WN2F_CONTEXT_no_parenthesis, TY_arb(), TY_is_f90_pointer(), TY_Is_Pointer(), TY_pointed(), WN2F_Denormalize_Array_Idx(), WN_array_index, WN_kid0(), WN_num_dim, and WN_operator().

Referenced by WN2F_array(), and WN2F_array_bounds().

Here is the call graph for this function:

WN2F_STATUS WN2F_arrayexp ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1599 of file wn2f_load_store.cxx.

References EMPTY_WN2F_STATUS, WN2F_translate(), and WN_kid0().

Here is the call graph for this function:

WN2F_STATUS WN2F_arrsection ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1804 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, ASSERT_DBG_WARN, DIAG_UNIMPLEMENTED, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, OPR_ARRAY, OPR_ILOAD, OPR_INTCONST, OPR_LDID, OPR_STRCTFLD, reset_WN2F_CONTEXT_deref_addr, SCLASS_FORMAL, ST_is_value_parm(), ST_sclass(), TRUE, TY_AR_etype(), TY_Is_Array(), TY_Is_Character_String(), TY_ptr_as_array(), TY_size(), Ty_Table, W2F_TY_pointed, WN2F_arrsection_bounds(), WN2F_Arrsection_Slots(), WN2F_CONTEXT_deref_addr, WN2F_CONTEXT_has_no_arr_elmt, WN2F_F90_pu, WN2F_INTCONST_ONE, WN2F_Is_Address_Preg(), WN2F_String_Argument(), WN2F_translate(), WN_array_index, WN_const_val(), WN_element_size(), WN_kid0(), WN_num_dim, WN_opc_operator, WN_operator(), WN_st(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

void WN2F_arrsection_bounds ( TOKEN_BUFFER  tokens,
WN *  wn,
TY_IDX  array_ty,
WN2F_CONTEXT  context 
)

Definition at line 2280 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_WARN, DIAG_UNIMPLEMENTED, TRUE, TY_AR_etype(), TY_AR_ndims(), TY_Is_Array(), TY_is_f90_pointer(), TY_pointed(), TY_size(), WN2F_Arrsection_Slots(), WN2F_Normalize_Idx_To_Onedim(), WN_element_size(), and WN_num_dim.

Referenced by WN2F_arrsection().

Here is the call graph for this function:

void WN2F_Arrsection_Slots ( TOKEN_BUFFER  tokens,
WN *  wn,
TY_IDX  array_ty,
WN2F_CONTEXT  context,
BOOL  parens 
)

Definition at line 2075 of file wn2f_load_store.cxx.

References Append_Token_Special(), ARB_co_dimension(), ARB_dimension(), OPR_SRCTRIPLET, set_WN2F_CONTEXT_no_parenthesis, TY_arb(), TY_is_f90_pointer(), TY_Is_Pointer(), TY_pointed(), WN2F_Denormalize_Array_Idx(), WN2F_translate(), WN_array_index, WN_num_dim, and WN_opc_operator.

Referenced by WN2F_arrsection(), and WN2F_arrsection_bounds().

Here is the call graph for this function:

static void WN2F_Block ( TOKEN_BUFFER  tokens,
ST *  st,
STAB_OFFSET  off,
WN2F_CONTEXT  context 
) [static]

Definition at line 2573 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), Number_as_String(), and ST2F_use_translate().

Referenced by WN2F_lda().

Here is the call graph for this function:

WN2F_STATUS WN2F_comma ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 2625 of file wn2f_load_store.cxx.

References EMPTY_WN2F_STATUS, WN2F_translate(), and WN_kid1().

Here is the call graph for this function:

static WN2F_STATUS WN2F_Denormalize_Array_Idx ( TOKEN_BUFFER  tokens,
WN *  idx_expr,
WN2F_CONTEXT  context 
) [static]

Definition at line 402 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_Token_Special(), EMPTY_WN2F_STATUS, New_Token_Buffer(), NULL, OPR_ADD, OPR_SUB, Reclaim_Token_Buffer(), reset_WN2F_CONTEXT_no_parenthesis, WN2F_CONTEXT_no_parenthesis, WN2F_Expr_Plus_Literal(), WN2F_translate(), WN_is_constant_expr, WN_kid0(), WN_kid1(), and WN_opc_operator.

Referenced by WN2F_Array_Slots(), WN2F_Arrsection_Slots(), WN2F_Normalize_Idx_To_Onedim(), and WN2F_triplet().

Here is the call graph for this function:

static BOOL WN2F_Expr_Plus_Literal ( TOKEN_BUFFER  tokens,
WN *  wn,
INT64  literal,
WN2F_CONTEXT  context 
) [static]

Definition at line 191 of file wn2f_load_store.cxx.

References Append_Token_Special(), FALSE, Host_To_Targ(), MTYPE_I1, MTYPE_I2, MTYPE_I4, MTYPE_I8, OPR_CONST, OPR_IMPLICIT_BND, OPR_INTCONST, reset_WN2F_CONTEXT_no_parenthesis, STC_val(), Targ_To_Host(), TCON2F_translate(), TCON_ty, TRUE, WN2F_CONTEXT_no_parenthesis, WN2F_translate(), WN_const_val(), WN_opc_operator, WN_opc_rtype, and WN_st().

Referenced by WN2F_Denormalize_Array_Idx(), and WN2F_OLD_Den_Arr_Idx().

Here is the call graph for this function:

static WN* WN2F_Find_Base ( WN *  addr) [static]

Definition at line 655 of file wn2f_load_store.cxx.

References OPR_ADD, OPR_ARRAY, OPR_ILOAD, OPR_INTCONST, WN_kid0(), WN_kid1(), and WN_operator().

Referenced by WN2F_Is_Address_Preg().

Here is the call graph for this function:

static ST* WN2F_Get_Named_Param ( const WN *  pu,
const char *  param_name 
) [static]

Definition at line 95 of file wn2f_load_store.cxx.

References NULL, OPC_ALTENTRY, ST_name(), WN_formal, WN_kid_count(), WN_num_formals, WN_opcode(), and WN_st().

Referenced by WN2F_ldid().

Here is the call graph for this function:

static void WN2F_Get_Substring_Info ( WN **  base,
TY_IDX *  string_ty,
WN **  lower_bnd,
WN **  length 
) [static]

Definition at line 607 of file wn2f_load_store.cxx.

References OPR_ARRAY, TY_AR_ndims(), TY_Is_Array(), TY_Is_Character_String(), TY_pointed(), TY_ptr_as_array(), TY_size(), Ty_Table, WN2F_INTCONST_ZERO, WN_array_index, WN_kid0(), WN_kid1(), WN_opc_operator, and WN_Tree_Type().

Referenced by WN2F_String_Argument().

Here is the call graph for this function:

WN2F_STATUS WN2F_iload ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1246 of file wn2f_load_store.cxx.

References Append_F77_Indented_Continuation(), Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, buf, Current_Indentation(), DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, KIND_POINTER, OPR_ILOAD, OPR_LDA, OPR_LDID, OPR_STRCTFLD, reset_WN2F_CONTEXT_has_no_arr_elmt, Set_Current_Indentation(), set_WN2F_CONTEXT_has_no_arr_elmt, TY_is_f90_deferred_shape(), TY_Is_Pointer(), TY_kind(), TY_pointed(), W2F_Emit_Prefetch, W2F_Only_Mark_Loads, WN2F_Append_Prefetch_Map(), WN2F_Offset_Memref(), WN2F_translate(), WN_kid0(), WN_load_addr_ty(), WN_load_offset(), WN_MAP_Get, WN_MAP_PREFETCH, WN_opc_operator, WN_operator(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_iloadx ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1323 of file wn2f_load_store.cxx.

References Append_Token_String(), ASSERT_DBG_WARN, DIAG_UNIMPLEMENTED, EMPTY_WN2F_STATUS, FALSE, and WN_opc_name.

Here is the call graph for this function:

static WN* WN2F_Initiate_OneInt ( void  ) [static]

Definition at line 175 of file wn2f_load_store.cxx.

References MTYPE_I4, MTYPE_V, OPR_INTCONST, wn, WN_const_val(), WN_map_id(), WN_MAP_UNDEFINED, WN_set_kid_count(), and WN_set_opcode().

Here is the call graph for this function:

static WN* WN2F_Initiate_ZeroInt ( void  ) [static]

Definition at line 160 of file wn2f_load_store.cxx.

References MTYPE_I4, MTYPE_V, OPR_INTCONST, wn, WN_const_val(), WN_map_id(), WN_MAP_UNDEFINED, WN_set_kid_count(), and WN_set_opcode().

Here is the call graph for this function:

BOOL WN2F_Is_Address_Preg ( WN *  ad,
TY_IDX  ptr_ty 
)

Definition at line 683 of file wn2f_load_store.cxx.

References CLASS_PREG, CLASS_VAR, FALSE, KIND_POINTER, KIND_SCALAR, MTYPE_I4, MTYPE_I8, MTYPE_is_pointer, OPR_LDID, ST_class(), ST_type(), TRUE, TY_kind(), TY_mtype(), wn, WN2F_Find_Base(), WN_operator(), WN_st(), and WN_ty().

Referenced by WN2F_array(), WN2F_arrsection(), and WN2F_Offset_Memref().

Here is the call graph for this function:

WN2F_STATUS WN2F_istore ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 869 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_F77_Comment_Newline(), Append_Token_Special(), ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, fld_type_z, Identical_Token_Lists(), KIND_POINTER, New_Token_Buffer(), NULL, OPR_ISTORE, OPR_LDA, OPR_LDID, Prepend_Token_Special(), Prepend_Token_String(), Reclaim_Token_Buffer(), reset_WN2F_CONTEXT_has_logical_arg, reset_WN2F_CONTEXT_has_no_arr_elmt, set_WN2F_CONTEXT_has_logical_arg, set_WN2F_CONTEXT_has_no_arr_elmt, TRUE, TY_Is_Character_String(), TY_is_f90_deferred_shape(), TY_Is_Integral(), TY_is_logical(), TY_Is_Pointer(), TY_kind(), TY_pointed(), Ty_Table, W2F_Emit_Prefetch, W2F_TY_pointed, WN2F_Append_Prefetch_Map(), WN2F_Offset_Memref(), WN2F_Stmt_Newline(), WN2F_translate(), WN_kid0(), WN_kid1(), WN_linenum(), WN_MAP_Get, WN_MAP_PREFETCH, WN_opc_operator, WN_operator(), WN_store_offset(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_istorex ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 970 of file wn2f_load_store.cxx.

References Append_Token_String(), ASSERT_DBG_WARN, DIAG_UNIMPLEMENTED, EMPTY_WN2F_STATUS, FALSE, NULL, WN2F_Stmt_Newline(), WN_linenum(), and WN_opc_name.

Here is the call graph for this function:

WN2F_STATUS WN2F_lda ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1533 of file wn2f_load_store.cxx.

References ASSERT_DBG_FATAL, CLASS_BLOCK, CLASS_PREG, DIAG_W2F_CANNOT_LDA_PREG, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, OPR_LDA, reset_WN2F_CONTEXT_deref_addr, reset_WN2F_CONTEXT_has_no_arr_elmt, set_WN2F_CONTEXT_has_no_arr_elmt, set_WN2F_CONTEXT_no_parenthesis, ST_class(), ST_sym_class(), ST_type(), Stab_Pointer_To(), TY_is_f90_pointer(), TY_Is_Pointer(), TY_pointed(), WN2F_Block(), WN2F_CONTEXT_deref_addr, WN2F_Offset_Symref(), WN_lda_offset(), WN_opc_operator, WN_st(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_ldid ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1369 of file wn2f_load_store.cxx.

References Append_Token_String(), ASSERT_DBG_FATAL, buf, CLASS_PREG, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, Fail_FmtAssertion(), First_Float_Preg_Return_Offset, First_Int_Preg_Return_Offset, KIND_POINTER, MTYPE_C4, MTYPE_C8, MTYPE_CQ, MTYPE_F4, MTYPE_F8, MTYPE_FQ, MTYPE_I1, MTYPE_I2, MTYPE_I4, MTYPE_I8, MTYPE_M, MTYPE_U1, MTYPE_U2, MTYPE_U4, MTYPE_U8, NULL, OPR_LDID, PUinfo_current_func, PUinfo_Preg_Type(), reset_WN2F_CONTEXT_has_no_arr_elmt, SCLASS_FORMAL, set_WN2F_CONTEXT_has_no_arr_elmt, ST2F_Use_Preg(), ST_class(), ST_is_value_parm(), ST_name(), ST_sclass(), ST_type(), Stab_Array_Of(), STAB_IS_POINTER_REF_PARAM(), Stab_Pointer_To(), TY_is_f90_pointer(), TY_Is_Integral(), TY_Is_Pointer(), TY_kind(), TY_mtype(), TY_pointed(), TY_ptr_as_array(), Ty_Table, W2F_Only_Mark_Loads, WN2F_CONTEXT_deref_addr, WN2F_Get_Named_Param(), WN2F_Offset_Symref(), WN2F_Translate_StringLEN(), WN_load_offset(), WN_opc_operator, WN_st(), and WN_ty().

Here is the call graph for this function:

void WN2F_Load_Store_finalize ( void  )

Definition at line 780 of file wn2f_load_store.cxx.

Referenced by WN2F_finalize().

void WN2F_Load_Store_initialize ( void  )

Definition at line 774 of file wn2f_load_store.cxx.

Referenced by WN2F_initialize().

WN2F_STATUS WN2F_mload ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1333 of file wn2f_load_store.cxx.

References Append_Token_String(), ASSERT_DBG_FATAL, buf, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, OPR_MLOAD, TY_Is_Pointer(), TY_pointed(), W2F_Only_Mark_Loads, WN2F_Offset_Memref(), WN_kid0(), WN_load_offset(), WN_opc_operator, WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_mstore ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 980 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_Token_Special(), ASSERT_DBG_FATAL, ASSERT_DBG_WARN, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, Identical_Token_Lists(), New_Token_Buffer(), NULL, OPR_MLOAD, OPR_MSTORE, Reclaim_Token_Buffer(), TY_Is_Pointer(), TY_pointed(), WN2F_Offset_Memref(), WN2F_Stmt_Newline(), WN2F_translate(), WN_kid0(), WN_kid1(), WN_linenum(), WN_opc_operator, WN_store_offset(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

static void WN2F_Normalize_Idx_To_Onedim ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
) [static]

Definition at line 537 of file wn2f_load_store.cxx.

References Append_Token_Special(), reset_WN2F_CONTEXT_no_parenthesis, set_WN2F_CONTEXT_no_parenthesis, WN2F_Denormalize_Array_Idx(), WN2F_translate(), WN_array_dim, WN_array_index, and WN_num_dim.

Referenced by WN2F_array_bounds(), and WN2F_arrsection_bounds().

Here is the call graph for this function:

static WN2F_STATUS WN2F_OLD_Den_Arr_Idx ( TOKEN_BUFFER  tokens,
WN *  idx_expr,
WN2F_CONTEXT  context 
) [static]

Definition at line 269 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_Token_Special(), EMPTY_WN2F_STATUS, New_Token_Buffer(), OPR_ADD, OPR_SUB, Reclaim_Token_Buffer(), reset_WN2F_CONTEXT_no_parenthesis, WN2F_CONTEXT_no_parenthesis, WN2F_Expr_Plus_Literal(), WN2F_translate(), WN_is_constant_expr, WN_kid0(), WN_kid1(), and WN_opc_operator.

Referenced by WN2F_Substring().

Here is the call graph for this function:

WN2F_STATUS WN2F_pstid ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1169 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, CLASS_PREG, CLASS_VAR, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, Identical_Token_Lists(), New_Token_Buffer(), NULL, OPR_PSTID, Prepend_Token_Special(), Prepend_Token_String(), Reclaim_Token_Buffer(), reset_WN2F_CONTEXT_has_logical_arg, set_WN2F_CONTEXT_has_logical_arg, ST2F_Declare_Tempvar(), ST2F_Use_Preg(), ST_class(), ST_is_not_used(), ST_sym_class(), ST_type(), Stab_Lock_Tmpvar(), Stab_Pointer_To(), Stab_Unlock_Tmpvar(), TY_Is_Character_String(), TY_Is_Integral(), TY_is_logical(), Ty_Table, W2CF_Symtab_Nameof_Tempvar(), WN2F_CONTEXT_emit_stid, WN2F_Offset_Symref(), WN2F_Stmt_Newline(), WN2F_translate(), WN_kid0(), WN_linenum(), WN_opc_operator, WN_st(), WN_store_offset(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_pstore ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 787 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_F77_Comment_Newline(), Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, Identical_Token_Lists(), New_Token_Buffer(), NULL, OPR_PSTORE, Prepend_Token_Special(), Prepend_Token_String(), Reclaim_Token_Buffer(), reset_WN2F_CONTEXT_has_logical_arg, reset_WN2F_CONTEXT_has_no_arr_elmt, set_WN2F_CONTEXT_has_logical_arg, set_WN2F_CONTEXT_has_no_arr_elmt, TRUE, TY_Is_Character_String(), TY_Is_Integral(), TY_is_logical(), TY_Is_Pointer(), TY_pointed(), Ty_Table, W2F_Emit_Prefetch, W2F_TY_pointed, WN2F_Append_Prefetch_Map(), WN2F_Offset_Memref(), WN2F_Stmt_Newline(), WN2F_translate(), WN_kid0(), WN_kid1(), WN_linenum(), WN_MAP_Get, WN_MAP_PREFETCH, WN_opc_operator, WN_store_offset(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_src_triplet ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1779 of file wn2f_load_store.cxx.

References Append_Token_Special(), EMPTY_WN2F_STATUS, OPR_INTCONST, WN2F_translate(), WN_const_val(), WN_kid0(), WN_kid1(), WN_kid2(), and WN_operator().

Here is the call graph for this function:

WN2F_STATUS WN2F_stid ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1048 of file wn2f_load_store.cxx.

References Append_And_Reclaim_Token_List(), Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, CLASS_PREG, CLASS_VAR, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, Identical_Token_Lists(), KIND_POINTER, New_Token_Buffer(), NULL, OPR_STID, Prepend_Token_Special(), Prepend_Token_String(), Reclaim_Token_Buffer(), reset_WN2F_CONTEXT_has_logical_arg, set_WN2F_CONTEXT_has_logical_arg, set_WN2F_CONTEXT_no_parenthesis, ST2F_Declare_Tempvar(), ST2F_Use_Preg(), ST_class(), ST_is_not_used(), ST_is_temp_var(), ST_keep_in_openad(), ST_name(), ST_sym_class(), ST_type(), Stab_Lock_Tmpvar(), Stab_Pointer_To(), Stab_Unlock_Tmpvar(), TY_Is_Character_String(), TY_is_f90_pointer(), TY_Is_Integral(), TY_is_logical(), TY_kind(), TY_pointed(), Ty_Table, W2CF_Symtab_Nameof_Tempvar(), W2F_OpenAD, WN2F_CONTEXT_emit_stid, WN2F_CONTEXT_no_parenthesis, WN2F_Offset_Symref(), WN2F_Stmt_Newline(), WN2F_translate(), WN_kid0(), WN_linenum(), WN_opc_operator, WN_st(), WN_store_offset(), WN_Tree_Type(), and WN_ty().

Here is the call graph for this function:

WN2F_STATUS WN2F_strctfld ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 2589 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_OPC, EMPTY_WN2F_STATUS, FLD_last_field(), FLD_name(), FLD_next(), Is_True, KIND_STRUCT, OPR_STRCTFLD, TY_fld(), TY_kind(), WN2F_translate(), WN_field_id(), WN_kid0(), WN_load_addr_ty(), and WN_opc_operator.

Here is the call graph for this function:

void WN2F_String_Argument ( TOKEN_BUFFER  tokens,
WN *  base_parm,
WN *  length,
WN2F_CONTEXT  context 
)

Definition at line 2400 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_WARN, DIAG_W2F_EXPECTED_PTR_TO_CHARACTER, FLD_type(), INTR_is_adrtmp, INTR_is_valtmp, KIND_SCALAR, KIND_STRUCT, MTYPE_U1, New_TY(), OPC_VCALL, OPC_VINTRINSIC_CALL, OPR_ARRAY, OPR_ARRAYEXP, OPR_CVTL, OPR_INTCONST, OPR_INTRINSIC_OP, reset_WN2F_CONTEXT_deref_addr, reset_WN2F_CONTEXT_has_no_arr_elmt, return(), Save_Str(), Set_TY_is_character(), set_WN2F_CONTEXT_deref_addr, TY2F_Free_Fld_Path(), TY2F_Get_Fld_Path(), TY2F_Last_Fld(), TY_Init(), TY_Is_Array_Of_UChars(), TY_Is_Character_String(), TY_kind(), TY_size(), WN2F_CONTEXT_has_no_arr_elmt, WN2F_Get_Substring_Info(), WN2F_INTCONST_ZERO, WN2F_Offset_Memref(), WN2F_Substring(), WN2F_Sum_Offsets(), WN2F_translate(), WN_const_val(), WN_intrinsic(), WN_kid0(), WN_kid1(), WN_opc_operator, WN_opcode(), WN_operator(), WN_Skip_Parm, and WN_Tree_Type().

Referenced by WN2F_array(), WN2F_arrsection(), WN2F_Binary_Substr_Op(), WN2F_call(), WN2F_Intr_Funcall(), WN2F_intrinsic_call(), WN2F_io_control(), WN2F_io_format(), and WN2F_io_list().

Here is the call graph for this function:

static void WN2F_Substring ( TOKEN_BUFFER  tokens,
INT64  string_size,
WN *  lower_bnd,
WN *  substring_size,
WN2F_CONTEXT  context 
) [static]

Definition at line 569 of file wn2f_load_store.cxx.

References Append_Token_Special(), OPR_INTCONST, reset_WN2F_CONTEXT_no_parenthesis, set_WN2F_CONTEXT_no_parenthesis, WN2F_OLD_Den_Arr_Idx(), WN2F_translate(), WN_const_val(), and WN_opc_operator.

Referenced by WN2F_String_Argument().

Here is the call graph for this function:

static void WN2F_Translate_StringLEN ( TOKEN_BUFFER  tokens,
ST *  param_st 
) [static]

Definition at line 120 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), ARB_dimension(), ASSERT_WARN, DIAG_W2F_EXPECTED_PTR_TO_CHARACTER, ST_type(), TY_arb(), TY_Is_Array(), TY_Is_Character_String(), TY_Is_Pointer(), TY_pointed(), and W2CF_Symtab_Nameof_St().

Referenced by WN2F_ldid().

Here is the call graph for this function:

WN2F_STATUS WN2F_triplet ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1619 of file wn2f_load_store.cxx.

References Append_Token_Special(), EMPTY_WN2F_STATUS, FALSE, Host_To_Targ(), MTYPE_I4, MTYPE_I8, OPR_INTCONST, TCON2F_translate(), WN2F_Denormalize_Array_Idx(), WN2F_translate(), WN_const_val(), WN_kid0(), WN_kid1(), WN_kid2(), and WN_opc_operator.

Here is the call graph for this function:

WN2F_STATUS WN2F_where ( TOKEN_BUFFER  tokens,
WN *  wn,
WN2F_CONTEXT  context 
)

Definition at line 1916 of file wn2f_load_store.cxx.

References Append_Token_Special(), Append_Token_String(), EMPTY_WN2F_STATUS, NULL, WN2F_Stmt_Newline(), WN2F_translate(), WN_Get_Linenum(), WN_kid0(), WN_kid1(), WN_kid2(), and WN_linenum().

Here is the call graph for this function:

Variable Documentation

TY_IDX fld_type_z = 0

Definition at line 78 of file wn2f_load_store.cxx.

Referenced by WN2F_array(), WN2F_call(), WN2F_Function_Call_Lhs(), WN2F_intrinsic_call(), WN2F_istore(), and WN2F_Offset_Memref().

BOOL W2F_Only_Mark_Loads

Definition at line 168 of file w2f_driver.cxx.

Referenced by W2F_Fini(), W2F_Mark_Loads(), W2F_Nomark_Loads(), WN2F_iload(), WN2F_ldid(), and WN2F_mload().

WN* WN2F_OneInt_Ptr = NULL [static]

Definition at line 77 of file wn2f_load_store.cxx.

WN* WN2F_ZeroInt_Ptr = NULL [static]

Definition at line 76 of file wn2f_load_store.cxx.

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines