PATCH: SBCL 0.7.13 support
Daniel Barlow <[email protected]>
| Newsgroups | gmane.lisp.ilisp.devel |
|---|---|
| Message-ID | <[email protected]> |
ILISP currently sends ':r toplevel' to SBCL to exit the debugger. In
SBCL 0.7.13 and later versions, the introduction of a 'return' command
means that :r is ambiguous.
I've tested the ilisp-reset command, which is sent by C-z z. I don't
know how to trigger the sending of comint-fix-error, but it looks like
an obvious fix.
Anyone who knows about ILD may also want to add 'return' support for
SBCL, but note that the :return command only works given appropriate
optimization qualities, and - never having used it - I don't know what
ILD does if its commands fail
* (defun foo (n) (declare (optimize (speed 0) (debug 3) (safety 3))) (/ 3 n))
STYLE-WARNING: redefining FOO in DEFUN
FOO
* (foo 0)
debugger invoked on condition of type DIVISION-BY-ZERO:
arithmetic error DIVISION-BY-ZERO signalled
Operation was SB-KERNEL::DIVISION, operands (3 0).
0] :return 1
can't find a tag for this frame
(hint: try increasing the DEBUG optimization quality and recompiling)
0] :down
(FOO 0)
1] :return 1
1
*
Anyway, here's the easy bit
Index: ilisp-sbcl.el
===================================================================
RCS file: /cvsroot/ilisp/ILISP/ilisp-sbcl.el,v
retrieving revision 1.17
diff -u -r1.17 ilisp-sbcl.el
--- ilisp-sbcl.el 4 Mar 2003 03:05:51 -0000 1.17
+++ ilisp-sbcl.el 22 Mar 2003 17:34:07 -0000
@@ -152,9 +152,9 @@
ilisp-arglist-command "(ilisp:ilisp-arglist \"%s\" \"%s\")"
ilisp-find-source-command "(ilisp:source-file \"%s\" \"%s\" \"%s\")"
- comint-fix-error ":r abort"
+ comint-fix-error ":restart abort"
comint-continue ":go"
- ilisp-reset ":r toplevel"
+ ilisp-reset ":restart toplevel"
comint-interrupt-regexp "interrupted at"
;; Hardcoded binary extensions are undesirable.
-dan
--
http://www.cliki.net/ - Link farm for free CL-on-Unix resources
-------------------------------------------------------
This SF.net email is sponsored by:Crypto Challenge is now open!
Get cracking and register here for some mind boggling fun and
the chance of winning an Apple iPod:
http://ads.sourceforge.net/cgi-bin/redirect.pl?thaw0031en