anl_common.h File Reference

#include "defs.h"
#include "config.h"
#include "erglob.h"
#include "glob.h"
#include "wn.h"
#include "wn_util.h"
#include "symtab.h"
#include "irbdata.h"
#include "wintrinsic.h"
#include "wn_pragmas.h"
#include "cxx_memory.h"
#include "lwn_util.h"
#include "flags.h"
#include "file_util.h"
#include "anl_diagnostics.h"
#include "anl_cbuf.h"
#include "anl_srcpos.h"

Include dependency graph for anl_common.h:

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

Go to the source code of this file.

Classes
class	COUNTER
Defines
#define	TY_IS_POINTER(ty)   (TY_kind(ty) == KIND_POINTER)
#define	TY_IS_ARRAY(ty)   (TY_kind(ty) == KIND_ARRAY)
#define	ST_AT_FILE_SCOPE(st)   Is_Global_Symbol(st)
#define	ST_IS_VALID_BASE(st)
#define	ST_IS_COMMON_BLOCK(st)
#define	ST_IS_EQUIVALENCE_BLOCK(st)
#define	ST_IS_BASED_AT_COMMON_OR_EQUIVALENCE(st)
#define	ST_NO_LINKAGE(st)
#define	ST_EXTERNAL_LINKAGE(st)
Typedefs
typedef TYPE_ID	MTYPE
typedef mINT64	STAB_OFFSET
Functions
void	Adjust_Srcpos_Range (WN *stmt, ANL_SRCPOS *min, ANL_SRCPOS *max)

---

Define Documentation

#define ST_AT_FILE_SCOPE

(

st

)

Is_Global_Symbol(st)

Definition at line 78 of file anl_common.h.

#define ST_EXTERNAL_LINKAGE

(

st

)

Value:

(ST_export(st) == EXPORT_INTERNAL  ||  \
     ST_export(st) == EXPORT_HIDDEN    ||  \
     ST_export(st) == EXPORT_PROTECTED ||  \
     ST_export(st) == EXPORT_OPTIONAL  ||  \
     ST_export(st) == EXPORT_PREEMPTIBLE)

Definition at line 108 of file anl_common.h.

Referenced by W2CF_TRANSLATOR::_Get_Ftn_Name().

#define ST_IS_BASED_AT_COMMON_OR_EQUIVALENCE

(

st

)

Value:

(ST_IS_VALID_BASE(st) &&                      \
    (ST_IS_COMMON_BLOCK(ST_base(st)) ||          \
     ST_IS_EQUIVALENCE_BLOCK(ST_base(st))))

Definition at line 99 of file anl_common.h.

Referenced by W2CF_TRANSLATOR::_Get_Ftn_Name().

#define ST_IS_COMMON_BLOCK

(

st

)

Value:

(PU_ftn_lang(Get_Current_PU()) &&       \
     (ST_sclass(st) == SCLASS_COMMON ||     \
      ST_sclass(st) == SCLASS_DGLOBAL)   && \
     TY_kind(ST_type(st)) == KIND_STRUCT && \
     !ST_AT_FILE_SCOPE(st))

Definition at line 85 of file anl_common.h.

Referenced by ANL_PRAGMA_ATTRIBUTE::_Write_Pragma_Arguments().

#define ST_IS_EQUIVALENCE_BLOCK

(

st

)

Value:

(PU_ftn_lang(Get_Current_PU()) &&       \
     TY_kind(ST_type(st)) == KIND_STRUCT && \
     ST_sclass(st) != SCLASS_COMMON      && \
     ! TY_fld(Ty_Table[ST_type(st)]).Is_Null()  && \
     (FLD_equivalence(TY_fld(Ty_Table[ST_type(st)]))))

Definition at line 92 of file anl_common.h.

#define ST_IS_VALID_BASE

(

st

)

Value:

(ST_base(st) != NULL && \
    ST_base(st) != (st) && \
    ST_sym_class(ST_base(st)) != CLASS_BLOCK) /* cg generated */

Definition at line 80 of file anl_common.h.

#define ST_NO_LINKAGE

(

st

)

Value:

(ST_export(st) == EXPORT_LOCAL ||   \
     ST_export(st) == EXPORT_LOCAL_INTERNAL)

Definition at line 104 of file anl_common.h.

#define TY_IS_ARRAY

(

ty

)

(TY_kind(ty) == KIND_ARRAY)

Definition at line 76 of file anl_common.h.

Referenced by W2CF_TRANSLATOR::_Get_Expr_Pointed_Ty().

#define TY_IS_POINTER

(

ty

)

(TY_kind(ty) == KIND_POINTER)

Definition at line 75 of file anl_common.h.

Referenced by W2CF_TRANSLATOR::_Is_Ptr_Expr().

---

Typedef Documentation

typedef TYPE_ID MTYPE

Definition at line 72 of file anl_common.h.

typedef mINT64 STAB_OFFSET

Definition at line 73 of file anl_common.h.

---

Function Documentation

void Adjust_Srcpos_Range	(	WN *	stmt,
		ANL_SRCPOS *	min,
		ANL_SRCPOS *	max
	)

Definition at line 57 of file anl_func_entry.cxx.

References NULL, WN_ITER_wn, WN_WALK_StmtIter(), and WN_WALK_StmtNext().

Referenced by ANL_PRAGMA_CONSTRUCT::_Get_Max_Construct_Srcpos(), ANL_LOOP_CONSTRUCT::_Loop_Srcpos_Range(), ANL_REGION_CONSTRUCT::_Region_Srcpos_Range(), and ANL_FUNC_ENTRY::Emit_Original_Construct().

Here is the call graph for this function: