[slime-cvs] CVS update: slime/swank.lisp

[Helmut Eller]

Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv8417

Modified Files:
      Tag: package-split
	swank.lisp 
Log Message:
(frame-source-location-for-emacs): Export it. Reported by Jouni K Seppanen

Date: Tue Mar  9 13:47:59 2004
Author: heller

Index: slime/swank.lisp
diff -u slime/swank.lisp:1.137.2.1 slime/swank.lisp:1.137.2.2
--- slime/swank.lisp:1.137.2.1	Tue Mar  9 03:46:50 2004
+++ slime/swank.lisp	Tue Mar  9 13:47:59 2004
@@ -13,6 +13,8 @@
            #:start-server 
            #:create-swank-server
            #:ed-in-emacs
+           
+           #:frame-source-location-for-emacs
            ))
 
 (in-package :swank)
@@ -932,6 +934,10 @@
 
 (defslimefun frame-catch-tags-for-emacs (frame-index)
   (frame-catch-tags frame-index))
+
+(defslimefun sldb-disassemble (index)
+  (with-output-to-string (*standard-output*)
+    (disassemble-frame index)))
 
 
 ;;;; Evaluation