Changeset 12849

Timestamp:

08/02/10 06:07:45 (13 years ago)

Author:

Mark Evenson

Message:

Narrow LISP-ERROR to STORAGE-CONDITION.

Now JRUN-EXCEPTION-PROTECTED behaves like INTERACTIVE-EVAL which
should be correct.

Include textual message about reason for STORAGE-CONDITION

Location:

trunk/abcl/src/org/armedbear/lisp

Files:

• Java.java (modified) (1 diff)
• Lisp.java (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/Java.java

@@ -1202 +1202 @@
             }
             catch (OutOfMemoryError oom) {
-                return error(new StorageCondition("Out of memory."));
+                return error(new StorageCondition("Out of memory " + oom.getMessage()));
             }
             catch (StackOverflowError oos) {

trunk/abcl/src/org/armedbear/lisp/Lisp.java

@@ -278 +278 @@
         catch (OutOfMemoryError e)
           {
-            return error(new LispError("Out of memory."));
+            return error(new StorageCondition("Out of memory " + e.getMessage()));
           }
         catch (StackOverflowError e)