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

[Helmut Eller]

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

Modified Files:
	swank-backend.lisp 
Log Message:
(sldb-step, default-readtable-alist): New backend functions.

Date: Wed Jun 16 13:25:09 2004
Author: heller

Index: slime/swank-backend.lisp
diff -u slime/swank-backend.lisp:1.51 slime/swank-backend.lisp:1.52
--- slime/swank-backend.lisp:1.51	Thu Jun 10 10:52:27 2004
+++ slime/swank-backend.lisp	Wed Jun 16 13:25:09 2004
@@ -39,7 +39,7 @@
   "List of interface functions that are not implemented.
 DEFINTERFACE adds to this list and DEFIMPLEMENTATION removes.")
 
-(defmacro definterface (name args documentation &body default-body)
+(defmacro definterface (name args documentation &rest default-body)
   "Define an interface function for the backend to implement.
 A generic function is defined with NAME, ARGS, and DOCUMENTATION.
 
@@ -172,6 +172,10 @@
   "Call FN with hooks to handle special syntax."
   (funcall fn))
 
+(definterface default-readtable-alist ()
+    "Return a suitable initial value for SWANK:*READTABLE-ALIST*."
+  '())
+
 
 ;;;; Compilation
 
@@ -386,6 +390,10 @@
    symbol-or-name)
   (:SBCL :NODE node-name)"
   '())
+
+(definterface sldb-step (frame-number)
+    "Step to the next code location in the frame FRAME-NUMBER.")
+  
 
 
 ;;;; Definition finding