#include "whirl2f_common.h"#include "PUinfo.h"#include "tcon2f.h"#include "wn2f.h"#include "ty2f.h"#include "st2f.h"#include "init2f.h"#include "cxx_memory.h"#include "be_symtab.h"

Go to the source code of this file.
| typedef void(* ST2F_HANDLER_FUNC)(TOKEN_BUFFER, ST *) |
| static void ST2F_decl_const | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 380 of file st2f.cxx.
References ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_SYMCLASS, FALSE, and ST_sym_class().
| static void ST2F_decl_error | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 188 of file st2f.cxx.
References ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_SYMCLASS, FALSE, and ST_sym_class().
| static void ST2F_decl_func | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 346 of file st2f.cxx.
References Append_Token_String(), ASSERT_DBG_FATAL, CLASS_FUNC, DIAG_W2F_UNEXPECTED_SYMCLASS, EXPORT_LOCAL_INTERNAL, func_name, Func_Return_Type(), return, SCLASS_EXTERN, ST2F_Declare_Return_Type(), ST_export, ST_pu_type, ST_sclass, ST_sym_class(), and W2CF_Symtab_Nameof_St().
| void ST2F_decl_translate | ( | TOKEN_BUFFER | tokens, | |
| const ST * | st | |||
| ) |
Definition at line 575 of file st2f.cxx.
References ST2F_Decl_Handler, and ST_sym_class().
Referenced by WN2F_emit_commons::operator()(), write_st::operator()(), ST2F_func_header(), W2F_def_ST(), WN2F_Append_Symtab_Consts(), and WN2F_translate_purple_main().
| static void ST2F_decl_var | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 196 of file st2f.cxx.
References Append_And_Reclaim_Token_List(), Append_F77_Indented_Newline(), Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, CLASS_VAR, Concat3_Strings(), Current_scope, Data_Stmt_Tokens, DIAG_W2F_DECLARE_RETURN_PARAM, DIAG_W2F_UNEXPECTED_SYMCLASS, DIAG_W2F_UNEXPECTED_TYPE_KIND, FALSE, Find_INITO_For_Symbol(), GLOBAL_SYMTAB, INITO2F_translate(), KIND_FUNCTION, New_Token_Buffer(), NULL, Prepend_Token_String(), PUINFO_RETURN_PARAM, PUINFO_RETURN_TO_PARAM, SCLASS_EXTERN, SCLASS_FORMAL, SCLASS_FSTATIC, SCLASS_PSTATIC, ST2F_Declare_Return_Type(), ST2F_Is_Dummy_Procedure(), ST_is_initialized, ST_is_return_var, ST_is_value_parm, ST_name, ST_sclass, ST_sym_class(), ST_type, Stab_Array_Of(), Stab_Is_Common_Block(), Stab_Is_Equivalence_Block(), Stab_No_Linkage(), strcmp(), TRUE, TY2F_Prepend_Structures(), TY2F_translate(), TY2F_Translate_Common(), TY2F_Translate_Equivalence(), TY2F_Translate_Purple_Array(), TY_IDX_ZERO, TY_Is_Array(), TY_Is_Pointer(), TY_Is_Structured(), TY_kind, TY_pointed, TY_ptr_as_array, Ty_Table, TY_tylist(), Tylist_Table, TYLIST_type(), Use_Purple_Array_Bnds_Placeholder, W2CF_Symtab_Nameof_St(), and W2CF_Symtab_Nameof_St_Pointee().
| static void ST2F_Declare_Return_Type | ( | TOKEN_BUFFER | tokens, | |
| TY_IDX | return_ty, | |||
| const char * | name | |||
| ) | [static] |
Definition at line 778 of file st2f.cxx.
References Append_And_Reclaim_Token_List(), Append_F77_Indented_Newline(), Append_Token_String(), KIND_VOID, New_Token_Buffer(), NULL, Stab_Mtype_To_Ty(), TY2F_Prepend_Structures(), TY2F_translate(), TY_Is_Pointer(), TY_kind, and TY_mtype.
Referenced by ST2F_decl_func(), and ST2F_decl_var().
Definition at line 735 of file st2f.cxx.
References Append_And_Reclaim_Token_List(), Append_F77_Indented_Newline(), Append_Token_String(), Current_Indentation(), New_Token_Buffer(), NULL, Pointer_Mtype, PUinfo_local_decls, PUinfo_local_decls_indent, Set_Current_Indentation(), Stab_Mtype_To_Ty(), TY2F_translate(), TY_Is_Pointer(), UINT, and W2CF_Symtab_Nameof_Tempvar().
Referenced by INIT2F_Implied_DoLoop(), TY2F_Equivalence_List(), WN2F_do_while(), WN2F_Function_Call_Lhs(), and WN2F_stid().
Definition at line 164 of file st2f.cxx.
References Append_And_Reclaim_Token_List(), Append_F77_Indented_Newline(), Append_Token_String(), Current_Indentation(), New_Token_Buffer(), NULL, PUinfo_local_decls, PUinfo_local_decls_indent, Set_Current_Indentation(), TY2F_translate(), and UINT.
Referenced by ST2F_Use_Preg().
| void ST2F_deref_translate | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) |
Definition at line 559 of file st2f.cxx.
References Append_Token_String(), ASSERT_DBG_FATAL, CLASS_VAR, DIAG_W2F_UNEXPECTED_SYMCLASS, Set_BE_ST_w2fc_referenced(), ST_sym_class(), ST_type, Stab_Is_Based_At_Common_Or_Equivalence(), TY_Is_Pointer(), and W2CF_Symtab_Nameof_St_Pointee().
Referenced by WN2F_Offset_Symref().
| void ST2F_finalize | ( | ) |
| void ST2F_func_header | ( | TOKEN_BUFFER | tokens, | |
| ST * | st, | |||
| ST ** | params, | |||
| INT32 | num_params, | |||
| BOOL | is_altentry | |||
| ) |
Definition at line 581 of file st2f.cxx.
References Append_And_Reclaim_Token_List(), Append_F77_Indented_Newline(), Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_SYMBOL, Func_Return_Type(), Get_Current_PU, INT, KIND_FUNCTION, KIND_VOID, New_Token_Buffer(), NULL, Prepend_Token_String(), PU_is_mainpu(), ST2F_decl_translate(), ST2F_FIRST_PARAM_IDX, ST_is_value_parm, ST_pu_type, Stab_Mtype_To_Ty(), TY2F_translate(), TY_Is_Pointer(), TY_kind, TY_mtype, and W2CF_Symtab_Nameof_St().
Referenced by WN2F_Entry_Point().
| static void ST2F_ignore | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
| void ST2F_initialize | ( | ) |
Definition at line 759 of file st2f.cxx.
References BOOL, FALSE, KIND_FUNCTION, KIND_POINTER, SCLASS_FORMAL, ST_is_value_parm, ST_sclass, ST_type, TRUE, TY_kind, and TY_pointed.
Referenced by ST2F_decl_var().
| static void ST2F_use_block | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 522 of file st2f.cxx.
References Append_Token_String(), ASSERT_DBG_FATAL, CLASS_BLOCK, DIAG_W2F_UNEXPECTED_SYMCLASS, ST_name, and ST_sym_class().
| static void ST2F_use_const | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 497 of file st2f.cxx.
References ASSERT_DBG_FATAL, CLASS_CONST, DIAG_W2F_UNEXPECTED_SYMCLASS, MTYPE_STR, ST_sym_class(), ST_type, STC_val, TCON2F_hollerith(), TCON2F_translate(), TY_align, TY_is_logical, TY_mtype, and Ty_Table.
| static void ST2F_use_error | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 395 of file st2f.cxx.
References ASSERT_DBG_FATAL, DIAG_W2F_UNEXPECTED_SYMCLASS, FALSE, and ST_sym_class().
| static void ST2F_use_func | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 486 of file st2f.cxx.
References Append_Token_String(), ASSERT_DBG_FATAL, CLASS_FUNC, DIAG_W2F_UNEXPECTED_SYMCLASS, Set_BE_ST_w2fc_referenced(), ST_sym_class(), and W2CF_Symtab_Nameof_St().
| void ST2F_Use_Preg | ( | TOKEN_BUFFER | tokens, | |
| TY_IDX | preg_ty, | |||
| PREG_IDX | preg_idx | |||
| ) |
Definition at line 712 of file st2f.cxx.
References Append_Token_String(), PUinfo_Is_Preg_Declared(), PUinfo_Preg_Type(), PUinfo_Set_Preg_Declared(), ST2F_Define_Preg(), and W2CF_Symtab_Nameof_Preg().
Referenced by Append_A_Clause_Symbol(), Append_Implicit_Locals(), Append_Nest_Clauses(), W2F_Translate_Stid_Lhs(), WN2F_Function_Call_Lhs(), WN2F_ldid(), WN2F_Load_Return_Reg(), WN2F_return(), and WN2F_stid().
| void ST2F_use_translate | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) |
Definition at line 553 of file st2f.cxx.
References ST2F_Use_Handler, and ST_sym_class().
Referenced by WN2F_Block(), WN2F_call(), WN2F_Callsite_Directives(), WN2F_Function_Call_Lhs(), WN2F_Offset_Symref(), WN2F_process_pragma(), WN2F_return(), and WN2F_return_val().
| static void ST2F_use_var | ( | TOKEN_BUFFER | tokens, | |
| ST * | st | |||
| ) | [static] |
Definition at line 403 of file st2f.cxx.
References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_FATAL, CLASS_VAR, Concat3_Strings(), DIAG_W2F_UNEXPECTED_SYMCLASS, INIT_WN2F_CONTEXT, KIND_SCALAR, PUinfo_current_func, PUINFO_FUNC_NAME, PUINFO_RETURN_PARAM, PUinfo_return_preg, PUINFO_RETURN_TO_PARAM, PUINFO_RETURN_TY, SCLASS_EXTERN, Set_BE_ST_w2fc_referenced(), ST_base, ST_is_return_var, ST_is_temp_var, ST_keep_name_w2f, ST_name, ST_ofst, ST_sclass, ST_sym_class(), ST_type, Stab_Is_Based_At_Common_Or_Equivalence(), Stab_Pointer_To(), strcmp(), TY_kind, W2CF_Symtab_Nameof_St(), WHIRL2F_make_valid_name(), WN2F_F90_pu, and WN2F_Offset_Symref().
const ST2F_HANDLER_FUNC ST2F_Decl_Handler[CLASS_COUNT] [static] |
Initial value:
{
&ST2F_ignore,
&ST2F_decl_var,
&ST2F_decl_func,
&ST2F_decl_const,
&ST2F_decl_error,
&ST2F_decl_error,
&ST2F_decl_error,
}
Definition at line 138 of file st2f.cxx.
Referenced by ST2F_decl_translate().
const ST2F_HANDLER_FUNC ST2F_Use_Handler[CLASS_COUNT] [static] |
Initial value:
{
&ST2F_ignore,
&ST2F_use_var,
&ST2F_use_func,
&ST2F_use_const,
&ST2F_use_error,
&ST2F_use_block,
&ST2F_use_error
}
Definition at line 149 of file st2f.cxx.
Referenced by ST2F_use_translate().
Definition at line 67 of file ty2f.cxx.
Referenced by ST2F_decl_var(), and WN2F_translate_purple_main().
1.5.6