Changeset 14038

Timestamp:

08/01/12 20:49:12 (8 years ago)

Author:

ehuelsmann

Message:

Make the JVM exit with a non-zero (89) value
when we have errors nesting too deep.

Helps Mark write bisect programs :-)

File:

• trunk/abcl/src/org/armedbear/lisp/signal.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/signal.lisp

@@ -72 +72 @@
              (if (fboundp 'internal-debug)
                  (internal-debug)
-                 (quit)))
+                 (quit :status 89))) ;; it's a prime and a fibonacci!
             (t
              (invoke-debugger condition))))))