Changeset 13091 for trunk/abcl/src/org


Ignore:
Timestamp:
12/11/10 23:19:21 (11 years ago)
Author:
ehuelsmann
Message:

Override UnhandledCondition?'s getMessage() function to report
the original text.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Interpreter.java

    r13090 r13091  
    472472            return condition;
    473473        }
     474
     475        @Override
     476        public String getMessage() {
     477            String conditionText;
     478            try {
     479                conditionText = getCondition().writeToString();
     480            } catch (Throwable t) {
     481                conditionText = "<error printing Lisp condition>";
     482            }
     483
     484            return "Unhandled lisp condition: " + conditionText;
     485        }
     486
     487
    474488    };
    475489
Note: See TracChangeset for help on using the changeset viewer.