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

[Luke Gorrie]

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

Modified Files:
	swank-backend.lisp 
Log Message:
(:location): Added a 'hints' property list to the location
structure. This is for extra information that compliments the
buffer/position.

Date: Sat May  1 22:16:04 2004
Author: lgorrie

Index: slime/swank-backend.lisp
diff -u slime/swank-backend.lisp:1.44 slime/swank-backend.lisp:1.45
--- slime/swank-backend.lisp:1.44	Sun Apr 25 02:35:29 2004
+++ slime/swank-backend.lisp	Sat May  1 22:16:04 2004
@@ -349,8 +349,14 @@
 ;;;; Definition finding
 
 (defstruct (:location (:type list) :named
-                      (:constructor make-location (buffer position)))
-  buffer position)
+                      (:constructor make-location
+                                    (buffer position &optional hints)))
+  buffer position
+  ;; Hints is a property list optionally containing:
+  ;;   :snippet SOURCE-TEXT
+  ;;     This is a snippet of the actual source text at the start of
+  ;;     the definition, which could be used in a text search.
+  hints)
 
 (defstruct (:error (:type list) :named (:constructor)) message)
 (defstruct (:file (:type list) :named (:constructor)) name)