Changeset 8395


Ignore:
Timestamp:
01/24/05 14:37:14 (17 years ago)
Author:
asimon
Message:

Pass the error message when signaling registered exceptions

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/lisp/Java.java

    r8383 r8395  
    33 *
    44 * Copyright (C) 2002-2005 Peter Graves
    5  * $Id: Java.java,v 1.47 2005-01-22 11:54:15 piso Exp $
     5 * $Id: Java.java,v 1.48 2005-01-24 14:37:14 asimon Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    357357                Class tClass = t.getClass();
    358358                if (registeredExceptions.containsKey(tClass)) {
    359                     signal((Symbol)registeredExceptions.get(tClass));
     359      signal((Symbol)registeredExceptions.get(tClass), new SimpleString(getMessage(t)));
    360360                }
    361361                signal(new LispError(getMessage(t)));
     
    393393                Class tClass = t.getClass();
    394394                if (registeredExceptions.containsKey(tClass)) {
    395                     signal((Symbol)registeredExceptions.get(tClass));
     395                    signal((Symbol)registeredExceptions.get(tClass), new SimpleString(getMessage(t)));
    396396                }
    397397                signal(new LispError(getMessage(t)));
     
    458458                Class tClass = t.getClass();
    459459                if (registeredExceptions.containsKey(tClass)) {
    460                     signal((Symbol)registeredExceptions.get(tClass));
     460                    signal((Symbol)registeredExceptions.get(tClass), new SimpleString(getMessage(t)));
    461461                }
    462462                signal(new LispError(getMessage(t)));
     
    487487                Class tClass = t.getClass();
    488488                if (registeredExceptions.containsKey(tClass)) {
    489                     signal((Symbol)registeredExceptions.get(tClass));
     489                    signal((Symbol)registeredExceptions.get(tClass), new SimpleString(getMessage(t)));
    490490                }
    491491                signal(new LispError(getMessage(t)));
     
    538538                Class tClass = t.getClass();
    539539                if (registeredExceptions.containsKey(tClass)) {
    540                     signal((Symbol)registeredExceptions.get(tClass));
     540                    signal((Symbol)registeredExceptions.get(tClass), new SimpleString(getMessage(t)));
    541541                }
    542542                signal(new LispError(getMessage(t)));
Note: See TracChangeset for help on using the changeset viewer.