[slime-cvs] CVS slime

[trittweiler]

Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv4119

Modified Files:
	swank.lisp 
Log Message:

* swank.lisp (read-softly-from-string): Now actually returns all
  three values as explained in its docstring.


--- /project/slime/cvsroot/slime/swank.lisp	2007/12/13 15:09:47	1.522
+++ /project/slime/cvsroot/slime/swank.lisp	2007/12/20 10:33:37	1.523
@@ -1581,7 +1581,7 @@
         compound forms like lists or vectors.)"
   (multiple-value-bind (symbol found? symbol-name package) (parse-symbol string)
     (if found?
-        (values symbol nil)
+        (values symbol (length string) nil)
         (multiple-value-bind (sexp pos) (read-from-string string)
           (values sexp pos
                   (when (symbolp sexp)