initial
[prop.git] / lib-src / generic / except.cc
blob60cee8913de836c5c37dccec73bb270bf79e7523
1 //////////////////////////////////////////////////////////////////////////////
2 // NOTICE:
3 //
4 // ADLib, Prop and their related set of tools and documentation are in the
5 // public domain. The author(s) of this software reserve no copyrights on
6 // the source code and any code generated using the tools. You are encouraged
7 // to use ADLib and Prop to develop software, in both academic and commercial
8 // settings, and are free to incorporate any part of ADLib and Prop into
9 // your programs.
11 // Although you are under no obligation to do so, we strongly recommend that
12 // you give away all software developed using our tools.
14 // We also ask that credit be given to us when ADLib and/or Prop are used in
15 // your programs, and that this notice be preserved intact in all the source
16 // code.
18 // This software is still under development and we welcome any suggestions
19 // and help from the users.
21 // Allen Leung
22 // 1994
23 //////////////////////////////////////////////////////////////////////////////
25 #include <stdlib.h>
26 #include <setjmp.h>
27 #include <iostream.h>
28 #include <AD/generic/except.h>
30 jmp_buf * __current_handler__;
31 Exception * __current_exception__;
33 void Exception::raise()
34 { if (__current_handler__) {
35 __current_exception__ = this;
36 longjmp(*__current_handler__,1);
38 cerr << "Uncaught exception " << name() << '\n';
39 exit(1);