|
OpenADFortTk (basic)
|
#include "Exception.h"

Go to the source code of this file.
Classes | |
| class | fortTkSupport::Diagnostics |
Namespaces | |
| namespace | fortTkSupport |
Defines | |
| #define | FORTTK_DBG_LVL 0 |
| #define | FORTTK_DIAGIF(level) if (level <= fortTkSupport::Diagnostics::getDiagnosticFilterLevel()) |
| #define | FORTTK_DIAGIF_DEV(level) if (level <= FORTTK_DBG_LVL) |
| #define | FORTTK_MSG(level, streamArgs) |
| #define | FORTTK_DEVMSG(level, streamArgs) |
| #define | FORTTK_EMSG(streamArgs) |
| #define | FORTTK_WMSG(streamArgs) |
| #define | FORTTK_ASSERT(expr, streamArgs) if (!(expr)) FORTTK_THROW(streamArgs) |
| #define | FORTTK_ASSERT_WARN(expr, streamArgs) if (!(expr)) FORTTK_WMSG(streamArgs) |
| #define | FORTTK_DIE(streamArgs) FORTTK_THROW(streamArgs) |
| #define | FORTTK_THROW(streamArgs) |
| #define FORTTK_ASSERT | ( | expr, | |
| streamArgs | |||
| ) | if (!(expr)) FORTTK_THROW(streamArgs) |
Definition at line 78 of file Diagnostics.h.
Referenced by fortTkSupport::AddToScalarizedRefTabOp::AddToScalarizedRefTabOp(), xaif2whirl::ConvertScalarizedRefToActiveType(), xaif2whirl::ConvertStructMemberToActiveType(), copyTypeAdjust(), xaif2whirl::CreateCFGraph(), xaif2whirl::XlateExpression::createExpressionGraph(), xaif2whirl::CreateST(), xaif2whirl::FindIntervalBoundary(), whirl2xaif::findRequiredProgramSymbols(), AdjustInterfaces::forPUInfo(), xaif2whirl::GetId(), xaif2whirl::GetIdList(), whirl2xaif::GetLoopReversalType(), xaif2whirl::XlateExpression::getRType(), xaif2whirl::XlateExpression::getRTypeFromOpands(), xaif2whirl::GetSymbol(), sexp2whirl::GetWhirlFlg(), sexp2whirl::GetWhirlOpaqueFlg(), sexp2whirl::GetWhirlOpr(), sexp2whirl::GetWhirlSym(), sexp2whirl::GetWhirlSymRef(), sexp2whirl::GetWhirlTy(), sexp2whirl::GetWhirlTyUse(), xaif2whirl::XlateExpression::getWNIntrinsic(), xaif2whirl::main_SAX(), xaif2whirl::MY_Make_Array_Type(), whirl2xaif::SearchSymbolTableEntry::operator()(), whirl2xaif::operator<<(), whirl2xaif::Select_Best_Fld_Path(), whirl2xaif::ST2F_deref_translate(), xaif2whirl::TranslateBasicBlock(), xaif2whirl::TranslateCFG(), xaif2whirl::XlateExpression::translateConstant(), xaif2whirl::XlateExpression::translateExpression(), sexp2whirl::TranslateGlobalSymbolTables(), sexp2whirl::TranslateLocalSymbolTables(), whirl2xaif::Whirl2Xaif::translatePU(), xaif2whirl::XlateExpression::translateVarRef(), xaif2whirl::XlateExpression::translateVarRefSimple(), whirl2sexp::TranslateWNChildren(), sexp2whirl::TranslateWNChildren(), whirl2xaif::TY2F_2_struct(), whirl2xaif::TY2F_array(), whirl2xaif::TY2F_array_for_pointer(), whirl2xaif::TY2F_Get_Fld_Path(), whirl2xaif::TY2F_scalar(), whirl2xaif::TY2F_struct(), whirl2xaif::TY2F_Translate_Common(), whirl2xaif::TY2F_Translate_Equivalence(), whirl2xaif::TY2F_void(), whirl2xaif::WN2F_agoto(), whirl2xaif::WN2F_arrsection(), whirl2xaif::WN2F_cvt(), whirl2xaif::WN2F_cvtl(), whirl2xaif::WN2F_dealloca(), whirl2xaif::WN2F_eval(), whirl2xaif::WN2F_implied_do(), whirl2xaif::WN2F_interface_blk(), WN2F_ios_accept(), WN2F_ios_backspace(), WN2F_ios_close(), WN2F_ios_cr(), WN2F_ios_decode(), WN2F_ios_definefile(), WN2F_ios_delete(), WN2F_ios_encode(), WN2F_ios_endfile(), WN2F_ios_find(), WN2F_ios_inquire(), WN2F_ios_namelist(), WN2F_ios_open(), WN2F_ios_print(), WN2F_ios_rewind(), WN2F_ios_rewrite(), WN2F_ios_type(), WN2F_ios_unlock(), whirl2xaif::WN2F_madd(), whirl2xaif::WN2F_mload(), whirl2xaif::WN2F_mstore(), whirl2xaif::WN2F_msub(), whirl2xaif::WN2F_namelist_stmt(), whirl2xaif::WN2F_nmadd(), whirl2xaif::WN2F_nmsub(), whirl2xaif::WN2F_nullify_stmt(), whirl2xaif::WN2F_parm(), whirl2xaif::WN2F_pstid(), whirl2xaif::WN2F_pstore(), whirl2xaif::WN2F_region(), whirl2xaif::WN2F_String_Argument(), whirl2xaif::WN2F_tas(), whirl2sexp::xlate_AGOTO(), whirl2sexp::xlate_ALLOCA(), whirl2sexp::xlate_ALTENTRY(), whirl2xaif::xlate_ALTENTRY(), whirl2xaif::xlate_ARRAY(), xaif2whirl::XlateExpression::xlate_ArrayElementReference(), whirl2sexp::xlate_ARRAYx(), sexp2whirl::xlate_ARRAYx(), xaif2whirl::xlate_BasicBlock_OLD(), xaif2whirl::xlate_BBCond_OLD(), whirl2xaif::xlate_BBStmt(), whirl2xaif::xlate_BinaryOp(), whirl2sexp::xlate_BinaryOp(), sexp2whirl::xlate_BinaryOp(), whirl2xaif::xlate_BLOCK(), whirl2sexp::xlate_BLOCK(), sexp2whirl::xlate_BLOCK(), xaif2whirl::XlateExpression::xlate_BooleanOperation(), whirl2xaif::xlate_CALL(), sexp2whirl::xlate_CASEGOTO(), whirl2sexp::xlate_CASEGOTO(), whirl2xaif::xlate_COMMENT(), whirl2xaif::xlate_condBR(), sexp2whirl::xlate_condBR(), whirl2sexp::xlate_condBR(), whirl2xaif::xlate_CONST(), whirl2sexp::xlate_CONST(), sexp2whirl::xlate_CONST(), whirl2sexp::xlate_CVT_CVTL(), sexp2whirl::xlate_CVT_CVTL(), whirl2xaif::xlate_DO_LOOP(), whirl2xaif::xlate_DO_WHILE(), whirl2xaif::xlate_EntryPoint(), sexp2whirl::xlate_FILE_INFO(), sexp2whirl::xlate_FUNC_ENTRY(), whirl2sexp::xlate_FUNC_ENTRY(), whirl2xaif::xlate_FUNC_ENTRY(), xaif2whirl::XlateExpression::xlate_FunctionCall(), whirl2xaif::xlate_GOTO(), sexp2whirl::xlate_GOTOx_LABEL(), whirl2sexp::xlate_GOTOx_LABEL(), whirl2sexp::xlate_IDNAME(), sexp2whirl::xlate_IDNAME(), whirl2xaif::xlate_IF(), whirl2xaif::xlate_ILOAD(), whirl2sexp::xlate_IMPLIED_DO(), xaif2whirl::XlateStmt::xlate_InlinableSubroutineCall(), whirl2xaif::xlate_INTCONST(), whirl2sexp::xlate_INTCONST(), sexp2whirl::xlate_INTCONST(), sexp2whirl::xlate_INTERFACE(), xaif2whirl::XlateExpression::xlate_Intrinsic(), whirl2xaif::xlate_INTRINSIC_CALL(), whirl2xaif::xlate_INTRINSIC_OP(), whirl2xaif::xlate_IO(), sexp2whirl::xlate_IO(), whirl2sexp::xlate_IO(), whirl2sexp::xlate_IO_ITEM(), sexp2whirl::xlate_IO_ITEM(), xlate_IO_ITEM_control(), xlate_IR(), whirl2xaif::xlate_ISTORE(), whirl2xaif::xlate_LABEL(), whirl2xaif::xlate_LDA(), sexp2whirl::xlate_LDA_LDMA(), whirl2sexp::xlate_LDA_LDMA(), whirl2xaif::xlate_LDID(), whirl2sexp::xlate_LDID_STID(), sexp2whirl::xlate_LDID_STID(), whirl2sexp::xlate_misc_stmt(), sexp2whirl::xlate_misc_stmt(), sexp2whirl::xlate_multiBR(), whirl2sexp::xlate_multiBR(), xlate_Operand(), whirl2xaif::xlate_PAREN(), whirl2sexp::xlate_PARM(), sexp2whirl::xlate_PARM(), whirl2xaif::xlate_PRAGMA(), whirl2xaif::xlate_PREFETCH(), xlate_PU(), xlate_PUForest(), xlate_PUTree(), whirl2xaif::xlate_RECIP(), whirl2sexp::xlate_REGION(), whirl2xaif::xlate_RETURN(), whirl2xaif::xlate_RETURN_VAL(), whirl2sexp::xlate_RETURNx(), sexp2whirl::xlate_RETURNx(), whirl2xaif::xlate_STDecl_FUNC(), whirl2xaif::xlate_STDecl_TYPE(), whirl2xaif::xlate_STDecl_VAR(), whirl2xaif::xlate_STID(), sexp2whirl::xlate_STR_TAB_entry(), whirl2sexp::xlate_STRCTFLD(), sexp2whirl::xlate_STRCTFLD(), whirl2sexp::xlate_structured_cf(), sexp2whirl::xlate_structured_cf(), whirl2xaif::xlate_STUse_BLOCK(), whirl2xaif::xlate_STUse_CONST(), whirl2xaif::xlate_STUse_VAR(), xaif2whirl::XlateStmt::xlate_SubroutineCall(), whirl2xaif::xlate_SWITCH(), xaif2whirl::xlate_Symbol(), xaif2whirl::XlateExpression::xlate_SymbolReference(), xaif2whirl::XlateExpression::xlate_SymbolReferenceCollapsedPath(), xlate_SYMTAB(), sexp2whirl::xlate_TAS(), whirl2sexp::xlate_TAS(), sexp2whirl::xlate_TCON_STR_TAB_entry(), sexp2whirl::xlate_TernaryOp(), whirl2sexp::xlate_TernaryOp(), whirl2xaif::xlate_UnaryOp(), whirl2sexp::xlate_UnaryOp(), sexp2whirl::xlate_UnaryOp(), whirl2xaif::xlate_USE(), xaif2whirl::XlateExpression::xlate_VarRef(), whirl2xaif::xlate_WHILE_DO(), sexp2whirl::xlate_xCALL(), whirl2sexp::xlate_xCALL(), sexp2whirl::xlate_xLOADx_xSTOREx(), whirl2sexp::xlate_xLOADx_xSTOREx(), sexp2whirl::xlate_xPRAGMA(), and whirl2sexp::xlate_xPRAGMA().
| #define FORTTK_ASSERT_WARN | ( | expr, | |
| streamArgs | |||
| ) | if (!(expr)) FORTTK_WMSG(streamArgs) |
Definition at line 83 of file Diagnostics.h.
Referenced by AdjustInterfaces::findPU(), AdjustInterfaces::findPUSymbolType(), xaif2whirl::XlateStmt::patchWN_IO_cray(), whirl2xaif::TCON2F_hollerith(), whirl2xaif::WN2F_array_bounds(), whirl2xaif::WN2F_arrsection(), whirl2xaif::WN2F_arrsection_bounds(), WN2F_Convert(), WN2F_ios_decode(), WN2F_ios_encode(), whirl2xaif::WN2F_mstore(), xaif2whirl::XlateExpression::xlate_ExprOpUsingIntrinsicTable(), xlate_IO_ITEM_control(), xlate_IO_ITEM_format(), and whirl2xaif::xlate_MemRef().
| #define FORTTK_DBG_LVL 0 |
Definition at line 38 of file Diagnostics.h.
| #define FORTTK_DEVMSG | ( | level, | |
| streamArgs | |||
| ) |
if (level <= FORTTK_DBG_LVL) { \ std::cerr << "FortTk[debugLevel=" << level << "]: " << streamArgs << std::endl; }
Definition at line 58 of file Diagnostics.h.
Referenced by whirl2sexp::TranslateWN(), sexp2whirl::TranslateWN(), xlate_IO_ITEM_control(), sexp2whirl::xlate_unknown(), and whirl2sexp::xlate_unknown().
| #define FORTTK_DIAGIF | ( | level | ) | if (level <= fortTkSupport::Diagnostics::getDiagnosticFilterLevel()) |
Definition at line 41 of file Diagnostics.h.
| #define FORTTK_DIAGIF_DEV | ( | level | ) | if (level <= FORTTK_DBG_LVL) |
Definition at line 44 of file Diagnostics.h.
Referenced by fortTkSupport::MassageOACallGraphIntoXAIFCallGraph().
| #define FORTTK_DIE | ( | streamArgs | ) | FORTTK_THROW(streamArgs) |
Definition at line 89 of file Diagnostics.h.
Referenced by xaif2whirl::ConvertToActiveType(), copyTypeAdjust(), xaif2whirl::CreateST(), xaif2whirl::XAIF_SAXHandler::endElement(), fortTkSupport::BaseMap< PU_Info *, ScalarizedRefTab_W2X * >::Find(), fortTkSupport::SymTabIdToSymTabMap::Find(), InterfaceData::findAndAdjustInterface(), whirl2xaif::PUXlationContext::findDoChainId(), xaif2whirl::FindIntervalBoundary(), xaif2whirl::PUXlationContext::findParentBlockWN(), whirl2xaif::PUXlationContext::findParentBlockWN(), xaif2whirl::PUXlationContext::findParentWN(), whirl2xaif::PUXlationContext::findParentWN(), whirl2xaif::PUXlationContext::findPUId(), whirl2xaif::PUXlationContext::findScalarizedRef(), whirl2xaif::PUXlationContext::findSymTabId(), whirl2xaif::PUXlationContext::findUDDUChainId(), fortTkSupport::IntrinsicXlationTable::findWHIRLInfo(), xaif2whirl::PUXlationContext::findWN(), xaif2whirl::PUXlationContext::findWNId(), whirl2xaif::PUXlationContext::findWNId(), fortTkSupport::IntrinsicXlationTable::findXAIFInfo(), FiniOutputStream(), whirl2xaif::XlationContext::flagToString(), whirl2xaif::PUXlationContext::getAliasMapKey(), whirl2xaif::GetCFGEdgeCondVal(), whirl2xaif::PUXlationContext::getDoChains(), whirl2xaif::XlationContext::getEdgeId(), whirl2xaif::PUXlationContext::getMostRecentWN(), whirl2xaif::PUXlationContext::getPUToIdMap(), whirl2xaif::PUXlationContext::getScalarizedRefTab(), xaif2whirl::GetSuccessor(), xaif2whirl::GetSuccessorAlongEdge(), whirl2xaif::PUXlationContext::getSymTabToIdMap(), whirl2xaif::PUXlationContext::getUDDUChains(), whirl2xaif::XlationContext::getVertexId(), whirl2xaif::XlationContext::getWN(), xaif2whirl::PUXlationContext::getWNIdToWNMap(), xaif2whirl::PUXlationContext::getWNParentMap(), whirl2xaif::PUXlationContext::getWNParentMap(), whirl2xaif::PUXlationContext::getWNToIdMap(), xaif2whirl::PUXlationContext::getWNToWNIdMap(), InitOutputStream(), whirl2xaif::PUXlationContext::isActiveStmt(), whirl2xaif::PUXlationContext::isActiveSym(), whirl2xaif::PUXlationContext::isActiveVarRef(), fortTkSupport::IntrinsicXlationTable::LtSortedTable::operator()(), fortTkSupport::PrintEntry::operator()(), xaif2whirl::XlateStmt::patchWN_IO_ITEM_list(), xaif2whirl::PUXlationContext::PushNewXlationContext(), whirl2xaif::PUXlationContext::PushNewXlationContext(), ReadWhirlSexp(), whirl2xaif::PUXlationContext::setActivity(), whirl2xaif::PUXlationContext::setAlias(), whirl2xaif::PUXlationContext::setAliasMapXAIF(), whirl2xaif::PUXlationContext::setDoChains(), whirl2xaif::PUXlationContext::setPUToIdMap(), whirl2xaif::PUXlationContext::setScalarizedRefTab(), whirl2xaif::PUXlationContext::setSymTabToIdMap(), whirl2xaif::PUXlationContext::setUDDUChains(), whirl2xaif::XlationContext::setWN(), xaif2whirl::PUXlationContext::setWNIdToWNMap(), xaif2whirl::PUXlationContext::setWNParentMap(), whirl2xaif::PUXlationContext::setWNParentMap(), whirl2xaif::PUXlationContext::setWNToIdMap(), xaif2whirl::PUXlationContext::setWNToWNIdMap(), xaif2whirl::XAIF_SAXHandler::startElement(), whirl2xaif::TCON2F_translate(), fortTkSupport::IntrinsicXlationTable::toString(), xaif2whirl::TranslateCFG(), xaif2whirl::XlateExpression::translateConstant(), xaif2whirl::XlateStmt::translateStmt(), whirl2xaif::TranslateTYToMType(), whirl2xaif::TranslateTYToSymShape(), whirl2xaif::TranslateTYToSymType(), xaif2whirl::XlateExpression::translateVarRefSimple(), whirl2xaif::TY2F_invalid(), whirl2xaif::TY2F_scalar(), whirl2xaif::WN2F_alloca(), whirl2xaif::WN2F_arrsection_bounds(), whirl2xaif::WN2F_bnor(), whirl2xaif::LOC_INFO::WN2F_Find_And_Mark_Nested_Address(), whirl2xaif::WN2F_imagpart(), whirl2xaif::WN2F_lshr(), whirl2xaif::WN2F_realpart(), whirl2xaif::WN2F_region(), whirl2xaif::WN2F_rsqrt(), whirl2xaif::WN2F_select(), whirl2xaif::WN2F_Substring(), xaif2whirl::XAIFTyToWHIRLTy(), whirl2sexp::xlate_AGOTO(), sexp2whirl::xlate_AGOTO(), sexp2whirl::xlate_ALLOCA(), whirl2sexp::xlate_ALLOCA(), sexp2whirl::xlate_ALTENTRY(), whirl2sexp::xlate_ALTENTRY(), xaif2whirl::XlateExpression::xlate_ArrayElementReference(), xaif2whirl::xlate_BBCond_OLD(), xlate_BinaryOpUsingIntrinsicTable(), whirl2xaif::xlate_BLOCK(), whirl2xaif::xlate_CALL(), xaif2whirl::xlate_CFGstruct(), xaif2whirl::xlate_CFGunstruct(), whirl2xaif::xlate_condBR(), xaif2whirl::XlateStmt::xlate_DerivativePropagator(), whirl2xaif::xlate_DO_LOOP(), whirl2xaif::xlate_DO_WHILE(), xaif2whirl::XlateExpression::xlate_Expression(), xaif2whirl::XlateExpression::xlate_ExprOpUsingIntrinsicTable(), xaif2whirl::XlateExpression::xlate_FunctionCall(), whirl2xaif::xlate_IF(), whirl2xaif::xlate_ILOADX(), sexp2whirl::xlate_IMPLIED_DO(), whirl2sexp::xlate_IMPLIED_DO(), xaif2whirl::XlateStmt::xlate_InlinableSubroutineCall(), whirl2xaif::xlate_IO_ITEM(), xlate_IO_ITEM_format(), xlate_IO_ITEM_list(), xlate_IO_ITEM_unit(), whirl2xaif::xlate_ISTOREX(), whirl2xaif::xlate_MemRef(), whirl2xaif::xlate_RECIP(), whirl2sexp::xlate_REGION(), sexp2whirl::xlate_REGION(), whirl2xaif::xlate_RETURN(), whirl2xaif::xlate_SideEffectEntry(), sexp2whirl::xlate_ST_TAB(), whirl2xaif::xlate_STDecl_error(), whirl2xaif::xlate_STUse_error(), xaif2whirl::XlateStmt::xlate_SubroutineCall(), whirl2xaif::xlate_SWITCH(), xaif2whirl::XlateExpression::xlate_SymbolReference(), sexp2whirl::xlate_SYMTAB_entry(), whirl2xaif::xlate_unknown(), xaif2whirl::XlateExpression::xlate_VarRef(), and whirl2xaif::xlate_WHILE_DO().
| #define FORTTK_EMSG | ( | streamArgs | ) |
{ std::cerr << "FortTk: ERROR:"; \
if (fortTkSupport::Diagnostics::getDiagnosticFilterLevel()) { \
std::cerr << "[" << __FILE__ << ":" << __LINE__ << "]"; } \
std::cerr << ": " << streamArgs << std::endl; }
Definition at line 63 of file Diagnostics.h.
| #define FORTTK_MSG | ( | level, | |
| streamArgs | |||
| ) |
if (level <= fortTkSupport::Diagnostics::getDiagnosticFilterLevel()) { \ std::cerr << "FortTk: " << streamArgs << std::endl; }
Definition at line 52 of file Diagnostics.h.
Referenced by copyTypeAdjust(), fortTkSupport::BaseMap< PU_Info *, ScalarizedRefTab_W2X * >::Find(), whirl2xaif::PUXlationContext::findDoChainId(), AdjustInterfaces::findPUSymbolType(), whirl2xaif::PUXlationContext::findUDDUChainId(), AdjustInterfaces::forPUInfo(), whirl2xaif::PUXlationContext::getAliasMapKey(), whirl2xaif::hasUnstructuredCF(), fortTkSupport::InterOAInfoMap::init(), xaif2whirl::XAIF_SAXHandler::initialize(), fortTkSupport::IntraOAInfo::IntraOAInfo(), fortTkSupport::ScalarizedRef::isRefScalarizable(), xaif2whirl::main_SAX(), fortTkSupport::AddToScalarizedRefTabOp::operator()(), whirl2xaif::PUXlationContext::setAliasMapXAIF(), whirl2xaif::PUXlationContext::setDoChains(), xaif2whirl::XlationContext::setFlag(), whirl2xaif::XlationContext::setFlag(), whirl2xaif::PUXlationContext::setScalarizedRefTab(), whirl2xaif::PUXlationContext::setUDDUChains(), whirl2xaif::XlationContext::setWN(), xaif2whirl::PUXlationContext::setWNIdToWNMap(), xaif2whirl::PUXlationContext::setWNParentMap(), whirl2xaif::PUXlationContext::setWNParentMap(), whirl2xaif::PUXlationContext::setWNToIdMap(), xaif2whirl::PUXlationContext::setWNToWNIdMap(), xaif2whirl::TranslateCFG(), whirl2xaif::XlationContext::unsetFlag(), xaif2whirl::xlate_CFGunstruct(), whirl2xaif::xlate_EntryPoint(), whirl2xaif::xlate_PassiveStmt(), whirl2xaif::xlate_SideEffectEntry(), whirl2xaif::xlate_SideEffectLocationPrint(), and whirl2xaif::xlate_STDecl_VAR().
| #define FORTTK_THROW | ( | streamArgs | ) |
{ std::ostringstream WeIrDnAmE; \
WeIrDnAmE << streamArgs << std::ends; \
throw fortTkSupport::FatalException(WeIrDnAmE.str(), __FILE__, __LINE__); }
Definition at line 95 of file Diagnostics.h.
| #define FORTTK_WMSG | ( | streamArgs | ) |
{ std::cerr << "FortTk: WARNING:"; \
if (fortTkSupport::Diagnostics::getDiagnosticFilterLevel()) { \
std::cerr << "[" << __FILE__ << ":" << __LINE__ << "]"; } \
std::cerr << ": " << streamArgs << std::endl; }
Definition at line 70 of file Diagnostics.h.
Referenced by xaif2whirl::ConvertToActiveType(), InterfaceData::findAndAdjustInterface(), whirl2xaif::Whirl2Xaif::translatePU(), whirl2xaif::xlate_BBStmt(), and whirl2xaif::xlate_SideEffectNamedLocation().