Changeset 12814


Ignore:
Timestamp:
07/20/10 18:36:44 (12 years ago)
Author:
astalla
Message:

Fix for r12809: bind *print-readably* to NIL when printing conditions in the debugger to avoid Maximum error depth exceeded.
Fix for r12813: Better error reporting.

Location:
trunk/abcl/src/org/armedbear/lisp
Files:
2 edited

Legend:

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

    r12813 r12814  
    530530      constructor = findConstructor((Class<?>) object, args);
    531531        } else {
    532       return type_error(classRef,
    533             list(Symbol.OR,
    534                  list(Symbol.JCLASS,
    535                 new SimpleString("java.lang.reflect.Constructor")),
    536                  list(Symbol.JCLASS,
    537                 new SimpleString("java.lang.Class"))));
     532      return error(new LispError(classRef.writeToString() + " is neither a Constructor nor a Class"));
    538533        }
    539534    }
  • trunk/abcl/src/org/armedbear/lisp/debug.lisp

    r12587 r12814  
    8686    (fresh-line *debug-io*)
    8787    (with-standard-io-syntax
    88       (let ((*print-structure* nil))
     88      (let ((*print-structure* nil)
     89      (*print-readably* nil))
    8990        (when (and *load-truename* (streamp *load-stream*))
    9091          (simple-format *debug-io*
Note: See TracChangeset for help on using the changeset viewer.