Open64 (mfef90, whirl2f, and IR tools)
TAG: version-openad; SVN changeset: 916
|
Go to the source code of this file.
Functions | |
static char * | Remove_Trailing_Zero_Fraction (char *strbase) |
static char * | TCON2F_append_string_char (char *str, char ch) |
void | TCON2F_Append_String_Const (TOKEN_BUFFER tokens, const char *orig_str, INT32 strlen) |
void | TCON2F_hollerith (TOKEN_BUFFER tokens, TCON tvalue) |
void | TCON2F_translate (TOKEN_BUFFER tokens, TCON tvalue, BOOL is_logical, TY_IDX object_ty) |
void | TCON2F_translate (TOKEN_BUFFER tokens, TCON tvalue, BOOL is_logical) |
static char* Remove_Trailing_Zero_Fraction | ( | char * | strbase | ) | [static] |
Definition at line 61 of file tcon2f.cxx.
Referenced by TCON2F_translate().
static char* TCON2F_append_string_char | ( | char * | str, |
char | ch | ||
) | [static] |
Definition at line 116 of file tcon2f.cxx.
Referenced by TCON2F_Append_String_Const().
void TCON2F_Append_String_Const | ( | TOKEN_BUFFER | tokens, |
const char * | orig_str, | ||
INT32 | strlen | ||
) |
Definition at line 169 of file tcon2f.cxx.
References Append_Token_String(), and TCON2F_append_string_char().
Referenced by TCON2F_translate().
void TCON2F_hollerith | ( | TOKEN_BUFFER | tokens, |
TCON | tvalue | ||
) |
Definition at line 192 of file tcon2f.cxx.
References Append_Token_String(), ASSERT_DBG_WARN, DIAG_W2F_UNEXPECTED_BTYPE, MTYPE_name, MTYPE_STR, Targ_String_Address(), Targ_String_Length(), and TCON_ty.
Referenced by ST2F_use_const().
void TCON2F_translate | ( | TOKEN_BUFFER | tokens, |
TCON | tvalue, | ||
BOOL | is_logical, | ||
TY_IDX | object_ty | ||
) |
Definition at line 214 of file tcon2f.cxx.
References Append_Token_Special(), Append_Token_String(), ASSERT_DBG_WARN, Concat2_Strings(), DIAG_W2F_UNEXPECTED_BTYPE, Extract_Complex_Imag(), Extract_Complex_Real(), FALSE, Get_Maximum_Linelength(), MTYPE_C4, MTYPE_C8, MTYPE_CLASS_INTEGER, MTYPE_CQ, MTYPE_F4, MTYPE_F8, MTYPE_FQ, MTYPE_I1, MTYPE_I2, MTYPE_I4, MTYPE_I8, MTYPE_name, MTYPE_STR, MTYPE_type_class, MTYPE_U1, MTYPE_U2, MTYPE_U4, MTYPE_U8, NULL, Remove_Trailing_Zero_Fraction(), Targ_Print(), Targ_String_Address(), Targ_String_Length(), Targ_To_Host(), TCON2F_Append_String_Const(), TCON2F_translate(), TCON_ty, and TY_size().
Referenced by INIT2F_Implied_DoLoop(), INITVKIND_val(), ST2F_decl_parameter(), ST2F_use_const(), TCON2F_translate(), TY2F_Append_ARB(), WN2F_casegoto(), WN2F_const(), WN2F_Expr_Plus_Literal(), WN2F_intconst(), and WN2F_triplet().
void TCON2F_translate | ( | TOKEN_BUFFER | tokens, |
TCON | tvalue, | ||
BOOL | is_logical | ||
) |
Definition at line 396 of file tcon2f.cxx.
References TCON2F_translate().