[slime-cvs] CVS slime
CVS User heller
heller at common-lisp.net
Fri Jun 5 19:58:54 UTC 2009
Update of /project/slime/cvsroot/slime
In directory cl-net:/tmp/cvs-serv27345
Modified Files:
ChangeLog swank-openmcl.lisp
Log Message:
* swank-openmcl.lisp (disassemble-frame): Print current PC.
--- /project/slime/cvsroot/slime/ChangeLog 2009/06/05 19:49:01 1.1780
+++ /project/slime/cvsroot/slime/ChangeLog 2009/06/05 19:58:53 1.1781
@@ -8,6 +8,8 @@
* swank-openmcl.lisp (compiler-warning-short-message): New GF.
(handle-compiler-warning): Use it.
+ (disassemble-frame): Print current PC.
+
2009-06-04 Helmut Eller <heller at common-lisp.net>
* slime.el (slime-dispatch-event [:emcas-rex]): Don't clutter
--- /project/slime/cvsroot/slime/swank-openmcl.lisp 2009/06/05 19:49:02 1.174
+++ /project/slime/cvsroot/slime/swank-openmcl.lisp 2009/06/05 19:58:54 1.175
@@ -538,7 +538,7 @@
(defimplementation disassemble-frame (the-frame-number)
(with-frame (p context lfun pc) the-frame-number
- (format t "LFUN: ~a~%PC: ~a FP: #x~x CONTEXT: ~a~%" flun pc p context)
+ (format t "LFUN: ~a~%PC: ~a FP: #x~x CONTEXT: ~a~%" lfun pc p context)
(disassemble lfun)))
;; BREAK
More information about the slime-cvs
mailing list