1 // Copyright (C) 2007-2023 CEA, EDF, OPEN CASCADE
3 // Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License, or (at your option) any later version.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 // File : CASCatch_Failure.cxx
24 // Author : Sergey RUIN, Open CASCADE S.A.S (sergey.ruin@opencascade.com)
26 #include "CASCatch_Failure.hxx"
27 #include "CASCatch_ErrorHandler.hxx"
28 #include <Standard_TypeMismatch.hxx>
29 #include <Standard_Type.hxx>
32 IMPLEMENT_STANDARD_RTTIEXT(CASCatch_Failure, Standard_Transient)
34 #ifndef NO_CXX_EXCEPTION
35 static Handle(CASCatch_Failure) RaisedError;
38 //================================================================================
40 * \brief creates a CASCatch_Failure
42 //================================================================================
43 CASCatch_Failure::CASCatch_Failure () { myMessage = (Standard_Character*)"Signal detected";}
46 //================================================================================
48 * \brief creates a CASCatch_Failure with a message
49 * \param an exception message
51 //================================================================================
52 CASCatch_Failure::CASCatch_Failure (const Standard_CString AString)
55 myMessage = new Standard_Character[strlen(AString) + 1];
56 strcpy(myMessage,AString);
60 //================================================================================
62 * \brief returns the last caught exception
64 //================================================================================
65 Handle(CASCatch_Failure) CASCatch_Failure::Caught()
67 #ifdef NO_CXX_EXCEPTION
68 return CASCatch_ErrorHandler::LastCaughtError();
74 //================================================================================
76 * \brief raises a CASCatch_Failure exception
77 * \param an exception message
79 //================================================================================
80 void CASCatch_Failure::Raise (const Standard_CString AString)
82 Handle(CASCatch_Failure) E = new CASCatch_Failure() ;
83 E->Reraise (AString) ;
87 //================================================================================
89 * \brief re-raises a CASCatch_Failure exception
90 * \param an exception message
92 //================================================================================
93 void CASCatch_Failure::Reraise (const Standard_CString AString)
96 myMessage = new Standard_Character[strlen(AString) + 1];
97 strcpy(myMessage,AString);
100 #ifdef NO_CXX_EXCEPTION
101 CASCatch_ErrorHandler::Error(this) ;
102 CASCatch_ErrorHandler::Abort();
109 //================================================================================
111 * \brief returns an exception message
113 //================================================================================
114 Standard_CString CASCatch_Failure::GetError() const
119 //================================================================================
121 * \brief Is called when using standard C++ exceptions
123 //================================================================================
124 void CASCatch_Failure::Throw() const
126 #ifndef NO_CXX_EXCEPTION
127 throw CASCatch_Failure() ;