fixes for host gcc 4.6.1
[zpugcc/jano.git] / toolchain / gcc / libstdc++-v3 / libsupc++ / vterminate.cc
blobb53e9cea5aba810d7fdc98595563b131604db7b9
1 // Verbose terminate_handler -*- C++ -*-
3 // Copyright (C) 2001, 2002, 2004 Free Software Foundation
4 //
5 // This file is part of the GNU ISO C++ Library. This library is free
6 // software; you can redistribute it and/or modify it under the
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 2, or (at your option)
9 // 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
14 // GNU General Public License for more details.
16 // You should have received a copy of the GNU General Public License along
17 // with this library; see the file COPYING. If not, write to the Free
18 // Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
19 // USA.
21 // As a special exception, you may use this file as part of a free software
22 // library without restriction. Specifically, if other files instantiate
23 // templates or use macros or inline functions from this file, or you compile
24 // this file and link it with other files to produce an executable, this
25 // file does not by itself cause the resulting executable to be covered by
26 // the GNU General Public License. This exception does not however
27 // invalidate any other reasons why the executable file might be covered by
28 // the GNU General Public License.
30 #include <bits/c++config.h>
31 #include <cstdlib>
32 #include <exception>
33 #include <exception_defines.h>
34 #include <cxxabi.h>
35 # include <cstdio>
37 using namespace std;
38 using namespace abi;
40 namespace __gnu_cxx
42 // A replacement for the standard terminate_handler which prints
43 // more information about the terminating exception (if any) on
44 // stderr.
45 void __verbose_terminate_handler()
47 static bool terminating;
48 if (terminating)
50 fputs("terminate called recursively\n", stderr);
51 abort ();
53 terminating = true;
55 // Make sure there was an exception; terminate is also called for an
56 // attempt to rethrow when there is no suitable exception.
57 type_info *t = __cxa_current_exception_type();
58 if (t)
60 // Note that "name" is the mangled name.
61 char const *name = t->name();
63 int status = -1;
64 char *dem = 0;
66 dem = __cxa_demangle(name, 0, 0, &status);
68 fputs("terminate called after throwing an instance of '", stderr);
69 if (status == 0)
70 fputs(dem, stderr);
71 else
72 fputs(name, stderr);
73 fputs("'\n", stderr);
75 if (status == 0)
76 free(dem);
79 // If the exception is derived from std::exception, we can
80 // give more information.
81 try { __throw_exception_again; }
82 #ifdef __EXCEPTIONS
83 catch (exception &exc)
85 char const *w = exc.what();
86 fputs(" what(): ", stderr);
87 fputs(w, stderr);
88 fputs("\n", stderr);
90 #endif
91 catch (...) { }
93 else
94 fputs("terminate called without an active exception\n", stderr);
96 abort();
98 } // namespace __gnu_cxx