OpenADFortTk (basic)
src/whirl2xaif/ty2xaif.cxx File Reference
#include <sstream>
#include "Open64IRInterface/Open64BasicTypes.h"
#include "wn2xaif.h"
#include "wn2xaif_mem.h"
#include "st2xaif.h"
#include "ty2xaif.h"
Include dependency graph for ty2xaif.cxx:

Go to the source code of this file.

Namespaces

namespace  whirl2xaif

Defines

#define NOT_BITFIELD_OR_IS_FIRST_OF_BITFIELD(f)   (!FLD_is_bit_field(f) || (FLD_is_bit_field(f) && (FLD_bofst(f) == 0) || FLD_bofst(f) > 16))
#define FLD_INFO_ALLOC_CHUNK   16

Typedefs

typedef void(* whirl2xaif::TY2F_HANDLER_FUNC )(xml::ostream &, TY_IDX, PUXlationContext &ctxt)

Functions

static void whirl2xaif::TY2F_invalid (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_scalar (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_array (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_array_for_pointer (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_struct (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_2_struct (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_pointer (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static void whirl2xaif::TY2F_void (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
void whirl2xaif::TY2F_translate (xml::ostream &xos, TY_IDX ty, BOOL notyapp, PUXlationContext &ctxt)
void whirl2xaif::TY2F_translate (xml::ostream &xos, TY_IDX ty, PUXlationContext &ctxt)
static std::string whirl2xaif::TY2F_Append_Array_Bnd_Ph (ST_IDX arbnd)
static void whirl2xaif::TY2F_Append_ARB (xml::ostream &xos, ARB_HANDLE arb, TY_IDX ty_idx, PUXlationContext &ctxt)
static BOOL whirl2xaif::TY2F_is_character (TY_IDX ty)
static BOOL whirl2xaif::TY2F_Pointer_To_Dope (TY_IDX ty)
static FLD_PATH_INFO * whirl2xaif::New_Fld_Path_Info (FLD_HANDLE fld)
static STAB_OFFSET whirl2xaif::TY2F_Fld_Size (FLD_HANDLE this_fld, mUINT64 max_size)
static FLD_PATH_INFO * whirl2xaif::Select_Best_Fld_Path (FLD_PATH_INFO *path1, FLD_PATH_INFO *path2, TY_IDX desired_ty, mUINT64 desired_offset)
static FLD_PATH_INFO * whirl2xaif::Construct_Fld_Path (FLD_HANDLE fld, TY_IDX struct_ty, TY_IDX desired_ty, mUINT64 desired_offset, mUINT64 max_fld_size)
static const char * whirl2xaif::TY2F_Fld_Name (FLD_HANDLE fld, BOOL common_or_equivalence, BOOL alt_return_name)
static void whirl2xaif::TY2F_Equivalence (xml::ostream &xos, const char *equiv_name, const char *fld_name, STAB_OFFSET fld_ofst)
static void whirl2xaif::TY2F_Equivalence_FldList (xml::ostream &xos, FLD_HANDLE fldlist, UINT equiv_var_idx, mUINT64 ofst, BOOL *common_block_equivalenced)
static void whirl2xaif::TY2F_Equivalence_List (xml::ostream &xos, const TY_IDX struct_ty)
static void whirl2xaif::TY2F_Translate_EquivCommon_PtrFld (xml::ostream &xos, FLD_HANDLE fld)
static void whirl2xaif::TY2F_Declare_Common_Flds (xml::ostream &xos, FLD_HANDLE fldlist, BOOL alt_return, BOOL *is_equiv)
static void whirl2xaif::TY2F_List_Common_Flds (xml::ostream &xos, FLD_HANDLE fldlist)
void whirl2xaif::TY2F_Translate_ArrayElt (xml::ostream &xos, TY_IDX arr_ty_idx, STAB_OFFSET arr_ofst)
void whirl2xaif::TY2F_Translate_Common (xml::ostream &xos, const char *name, TY_IDX ty_idx)
void whirl2xaif::TY2F_Translate_Equivalence (xml::ostream &xos, TY_IDX ty_idx, BOOL alt_return)
FLD_PATH_INFO * whirl2xaif::TY2F_Free_Fld_Path (FLD_PATH_INFO *fld_path)
FLD_PATH_INFO * whirl2xaif::TY2F_Get_Fld_Path (const TY_IDX struct_ty, const TY_IDX object_ty, STAB_OFFSET offset)
void whirl2xaif::TY2F_Translate_Fld_Path (xml::ostream &xos, FLD_PATH_INFO *fld_path, BOOL deref, BOOL member_of_common, BOOL alt_ret_name, PUXlationContext &ctxt)
void whirl2xaif::TY2F_Fld_Separator (xml::ostream &xos)
FLD_HANDLE whirl2xaif::TY2F_Last_Fld (FLD_PATH_INFO *fld_path)
FLD_PATH_INFO * whirl2xaif::TY2F_Point_At_Path (FLD_PATH_INFO *path, STAB_OFFSET off)
void whirl2xaif::TY2F_Dump_Fld_Path (FLD_PATH_INFO *fld_path)
const char * whirl2xaif::TranslateTYToSymType (TY_IDX ty_idx)
const char * whirl2xaif::TranslateTYToMType (TY_IDX ty_idx)
const char * whirl2xaif::TranslateTYToSymShape (TY_IDX ty_idx)

Variables

WN * whirl2xaif::PU_Body
BOOL whirl2xaif::Array_Bnd_Temp_Var = FALSE
static const TY2F_HANDLER_FUNC whirl2xaif::TY2F_Handler [KIND_LAST]
static FLD_PATH_INFO * whirl2xaif::Free_Fld_Path_Info = NULL

Define Documentation

#define FLD_INFO_ALLOC_CHUNK   16

Definition at line 168 of file ty2xaif.cxx.

Referenced by whirl2xaif::New_Fld_Path_Info().

#define NOT_BITFIELD_OR_IS_FIRST_OF_BITFIELD (   f)    (!FLD_is_bit_field(f) || (FLD_is_bit_field(f) && (FLD_bofst(f) == 0) || FLD_bofst(f) > 16))

Definition at line 62 of file ty2xaif.cxx.

Referenced by whirl2xaif::TY2F_Get_Fld_Path().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Friends Defines