whirl2f_common.h File Reference

#include "common_include.h"
#include "w2f_driver.h"

Include dependency graph for whirl2f_common.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Defines
#define	W2F_TY_pointed(ty, msg)
#define	Prepend_Idented_Newline   DO_NOT_USE_THIS_FUNCTION
#define	Append_Idented_Newline   DO_NOT_USE_THIS_FUNCTION
#define	WHIRL2F_number_as_name(number)   Number_as_String(number, "%llu")
#define	WHIRL2F_ptr_as_name(ptr)   Ptr_as_String(ptr)
Functions
const char *	WHIRL2F_make_valid_name (const char *name, BOOL allow_dot)
void	WHIRL2F_Append_Comment (TOKEN_BUFFER tokens, const char *cmt, UINT prefix_lines, UINT suffix_lines)
void	WHIRL2F_Parenthesize (TOKEN_BUFFER tokens)
Variables
BOOL	WN2F_F90_pu

---

Define Documentation

#define Append_Idented_Newline   DO_NOT_USE_THIS_FUNCTION

Definition at line 130 of file whirl2f_common.h.

#define Prepend_Idented_Newline   DO_NOT_USE_THIS_FUNCTION

Definition at line 129 of file whirl2f_common.h.

#define W2F_TY_pointed	(		ty,
			msg
	)

Value:

(ASSERT_DBG_FATAL(TY_Is_Pointer(ty), (DIAG_W2F_EXPECTED_PTR, (msg))), \
    TY_pointed(ty))

Definition at line 121 of file whirl2f_common.h.

Referenced by WN2F_array(), WN2F_arrsection(), WN2F_istore(), and WN2F_pstore().

#define WHIRL2F_number_as_name

(

number

)

Number_as_String(number, "%llu")

Definition at line 136 of file whirl2f_common.h.

Referenced by Append_Arg_Numbers(), Append_Prefetch_Attributes(), WN2F_Append_Prefetch_Map(), WN2F_block(), WN2F_casegoto(), WN2F_compgoto(), WN2F_condbr(), WN2F_do_loop(), WN2F_goto(), WN2F_io_control(), WN2F_label(), and WN2F_prefetch().

#define WHIRL2F_ptr_as_name

(

ptr

)

Ptr_as_String(ptr)

Definition at line 138 of file whirl2f_common.h.

---

Function Documentation

void WHIRL2F_Append_Comment	(	TOKEN_BUFFER	tokens,
		const char *	cmt,
		UINT	prefix_lines,
		UINT	suffix_lines
	)

Definition at line 120 of file whirl2f_common.cxx.

References Append_F77_Comment_Newline(), Append_Token_String(), FALSE, NULL, and TRUE.

Referenced by WN2F_Append_Block_Data(), WN2F_comment(), WN2F_do_loop(), WN2F_do_while(), WN2F_Exit_PU_Block(), and WN2F_translate_purple_main().

Here is the call graph for this function:

const char* WHIRL2F_make_valid_name	(	const char *	name,
		BOOL	allow_dot
	)

Definition at line 58 of file whirl2f_common.cxx.

References Get_Name_Buf_Slot(), name, NULL, and strcpy.

Referenced by Unparse_Target_FTN::Make_Valid_Name(), ST2F_use_var(), and TY2F_Fld_Name().

Here is the call graph for this function:

void WHIRL2F_Parenthesize

(

TOKEN_BUFFER

tokens

)

Definition at line 150 of file whirl2f_common.cxx.

References Append_Token_Special(), and Prepend_Token_Special().

Referenced by WN2F_Translate_DoLoop_Bound().

Here is the call graph for this function:

---

Variable Documentation

BOOL WN2F_F90_pu

Definition at line 169 of file w2f_driver.cxx.

Referenced by INIT2F_Get_Array_Segment(), INITVKIND_const(), Unparse_Target_FTN::Make_Valid_Name(), ST2F_use_var(), TY2F_Fld_Separator(), TY2F_pointer(), TY2F_scalar(), TY2F_struct(), TY2F_Translate_Structure(), W2CF_Get_Ftn_St_Name(), W2F_Outfile_Translate_Pu(), WN2F_array(), WN2F_arrsection(), WN2F_End_Routine_Strings(), and WN2F_Load_Return_Reg().