wn_attr.h

Go to the documentation of this file.

// -*-Mode: C++;-*-
#ifndef wn_attr_INCLUDED
#define wn_attr_INCLUDED

#include "Open64BasicTypes.h"


/* several craylib/dope items represent a no-op by a zero inconst...*/
#define IS_IO_NULL_OPR(wn) ((WN_operator(wn) == OPR_INTCONST) && (WN_const_val(wn) == 0))

#define WN_IOITEM(x) ((IOITEM) WN_io_item(x))
#define WN_IOSTMT(x) ((IOSTATEMENT) WN_io_statement(x))

#define IS_IO_ITEM_IOU(item) \
 (WN_IOITEM(item) >= IOU_NONE && WN_IOITEM(item) <= IOU_INTERNAL)
#define IS_IO_ITEM_IOF(item) \
 ((WN_IOITEM(item) >= IOF_NONE && WN_IOITEM(item) <= IOF_CR_FMTSRC_DOPE))
#define IS_IO_ITEM_IOC(item) \
 (WN_IOITEM(item) >= IOC_ACCESS && WN_IOITEM(item) <= IOC_ERRFLAG)
#define IS_IO_ITEM_IOL(item) \
 ((WN_IOITEM(item) >= IOL_ARRAY && WN_IOITEM(item) <= IOL_VAR) || \
 (WN_IOITEM(item) == IOL_DOPE))

#define INTR_is_adrtmp(intrn) \
 ((intrn) == INTRN_U4I1ADRTMP || \
 (intrn) == INTRN_U4I2ADRTMP || \
 (intrn) == INTRN_U4I4ADRTMP || \
 (intrn) == INTRN_U4I8ADRTMP || \
 (intrn) == INTRN_U4F4ADRTMP || \
 (intrn) == INTRN_U4F8ADRTMP || \
 (intrn) == INTRN_U4FQADRTMP || \
 (intrn) == INTRN_U4C4ADRTMP || \
 (intrn) == INTRN_U4C8ADRTMP || \
 (intrn) == INTRN_U4CQADRTMP || \
 (intrn) == INTRN_U4VADRTMP || \
 (intrn) == INTRN_U8I1ADRTMP || \
 (intrn) == INTRN_U8I2ADRTMP || \
 (intrn) == INTRN_U8I4ADRTMP || \
 (intrn) == INTRN_U8I8ADRTMP || \
 (intrn) == INTRN_U8F4ADRTMP || \
 (intrn) == INTRN_U8F8ADRTMP || \
 (intrn) == INTRN_U8FQADRTMP || \
 (intrn) == INTRN_U8C4ADRTMP || \
 (intrn) == INTRN_U8C8ADRTMP || \
 (intrn) == INTRN_U8CQADRTMP || \
 (intrn) == INTRN_U8VADRTMP)

#define INTR_is_valtmp(intrn) \
 ((intrn) == INTRN_I4VALTMP || \
 (intrn) == INTRN_I8VALTMP || \
 (intrn) == INTRN_F4VALTMP || \
 (intrn) == INTRN_F8VALTMP || \
 (intrn) == INTRN_FQVALTMP || \
 (intrn) == INTRN_C4VALTMP || \
 (intrn) == INTRN_C8VALTMP || \
 (intrn) == INTRN_CQVALTMP)

#define WN_Skip_Parm(arg) \
 ((arg)!=NULL && WN_operator(arg) == OPR_PARM? WN_kid0(arg) : arg)


extern TY_IDX 
WN_Tree_Type(const WN *wn);

extern TY_IDX 
Get_Field_Type(TY_IDX base, int field_id);

extern TY_IDX 
WN_GetRefObjType(const WN* wn);

extern TY_IDX 
WN_GetBaseObjType(const WN* wn);

extern TY_IDX 
WN_GetExprType(const WN* wn);

extern TY_IDX 
WN_Call_Type(const WN* wn);

extern TY_IDX 
WN_Call_Return_Type(const WN* wn);

extern INT
WN_Call_First_Arg_Idx(const WN* wn);

extern INT
WN_Call_Last_Arg_Idx(const WN* wn);

extern const char * 
WN_intrinsic_name(INTRINSIC intr_opc);

extern TY_IDX 
WN_intrinsic_return_ty(const WN *call);

extern BOOL 
WN_intrinsic_return_to_param(TY_IDX return_ty);

extern WN *
WN_Get_PtrAdd_Intconst(WN* wn0, WN* wn1, TY_IDX pointed_ty);

#endif