01: package sisc.nativefun;
02:
03: import sisc.interpreter.SchemeException;
04:
05: public class NestedPrimRuntimeException extends PrimRuntimeException {
06:
07: protected SchemeException e;
08:
09: public NestedPrimRuntimeException(String message, SchemeException e) {
10: super (message);
11: this .e = e;
12: }
13:
14: public NestedPrimRuntimeException(SchemeException e) {
15: super ();
16: this .e = e;
17: }
18:
19: public SchemeException getRootCause() {
20: return e;
21: }
22: }
23:
24: /*
25: * The contents of this file are subject to the Mozilla Public
26: * License Version 1.1 (the "License"); you may not use this file
27: * except in compliance with the License. You may obtain a copy of
28: * the License at http://www.mozilla.org/MPL/
29: *
30: * Software distributed under the License is distributed on an "AS
31: * IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
32: * implied. See the License for the specific language governing
33: * rights and limitations under the License.
34: *
35: * The Original Code is the Second Interpreter of Scheme Code (SISC).
36: *
37: * The Initial Developer of the Original Code is Scott G. Miller.
38: * Portions created by Scott G. Miller are Copyright (C) 2000-2007
39: * Scott G. Miller. All Rights Reserved.
40: *
41: * Contributor(s):
42: * Matthias Radestock
43: *
44: * Alternatively, the contents of this file may be used under the
45: * terms of the GNU General Public License Version 2 or later (the
46: * "GPL"), in which case the provisions of the GPL are applicable
47: * instead of those above. If you wish to allow use of your
48: * version of this file only under the terms of the GPL and not to
49: * allow others to use your version of this file under the MPL,
50: * indicate your decision by deleting the provisions above and
51: * replace them with the notice and other provisions required by
52: * the GPL. If you do not delete the provisions above, a recipient
53: * may use your version of this file under either the MPL or the
54: * GPL.
55: */
|