unparse_target_ftn.h File Reference

#include "unparse_target.h"
#include "whirl2f_common.h"
#include "symtab.h"
#include "intrn_info.h"
#include "wutil.h"
#include "token_names.h"

Include dependency graph for unparse_target_ftn.h:

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

Go to the source code of this file.

Classes
class	Unparse_Target_FTN
Defines
#define	NUM_FTN_TY_RNAMES   (sizeof(Ftn_Reserved_Ty_Name)/sizeof(char *))
#define	NUM_FTN_ST_RNAMES   (sizeof(Ftn_Reserved_St_Name)/sizeof(char *))
Functions
static const char *	W2CF_Get_Ftn_St_Name (const ST *st, const char *original_name)
Variables
static const char *	Ftn_Reserved_Ty_Name []
static const char *	Ftn_Reserved_St_Name []

---

Define Documentation

#define NUM_FTN_ST_RNAMES   (sizeof(Ftn_Reserved_St_Name)/sizeof(char *))

Definition at line 110 of file unparse_target_ftn.h.

Referenced by Unparse_Target_FTN::Unparse_Target_FTN().

#define NUM_FTN_TY_RNAMES   (sizeof(Ftn_Reserved_Ty_Name)/sizeof(char *))

Definition at line 109 of file unparse_target_ftn.h.

Referenced by Unparse_Target_FTN::Unparse_Target_FTN().

---

Function Documentation

static const char* W2CF_Get_Ftn_St_Name	(	const ST *	st,
		const char *	original_name
	)		[static]

Definition at line 47 of file unparse_target_ftn.h.

References CLASS_VAR, Get_Name_Buf_Slot(), ST_is_namelist(), ST_sym_class(), Stab_External_Linkage(), Stab_Is_Based_At_Common_Or_Equivalence(), strcpy, and WN2F_F90_pu.

Referenced by Unparse_Target_FTN::Get_St_Name().

Here is the call graph for this function:

---

Variable Documentation

const char* Ftn_Reserved_St_Name[] [static]

Initial value:

{
   "TO DO"
}

Definition at line 104 of file unparse_target_ftn.h.

Referenced by Unparse_Target_FTN::Unparse_Target_FTN().

const char* Ftn_Reserved_Ty_Name[] [static]

Initial value:

{
   "split_st",                
   "__$w2c_predef_ld_union",  
   "__$w2c_predef_ldv_union"  
}

Definition at line 97 of file unparse_target_ftn.h.

Referenced by Unparse_Target_FTN::Unparse_Target_FTN().