[slime-cvs] CVS slime

[trittweiler]

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

Modified Files:
	ChangeLog 
Log Message:

Fix regressions in the `find-definition' test case on SBCL:

M-. on e.g. SWANK::READ-FROM-EMACS would bring the user to

  (|defun read-from-emacs ...)

and not

  |(defun read-from-emacs ...)
	
* swank-sbcl.lisp (source-file-position): Don't 1+ the returned
  position; i.e. return a position usable as a CL /file position/
  which start from 0, and not a position usable in Emacs where
  buffer points start from 1. This is important because the return
  value is passed to SWANK-BACKEND::READ-SNIPPET which invokes
  CL:FILE-POSITION on it.
  (make-definition-source-location): Adapted to 1+ the position
  passed to Emacs, to reflect above change.


--- /project/slime/cvsroot/slime/ChangeLog	2008/02/20 22:12:37	1.1293
+++ /project/slime/cvsroot/slime/ChangeLog	2008/02/21 12:56:21	1.1294
@@ -1,3 +1,24 @@
+2008-02-21  Tobias C. Rittweiler  <tcr at freebits.de>
+
+	Fix regressions in the `find-definition' test case on SBCL:
+
+	M-. on e.g. SWANK::READ-FROM-EMACS would bring the user to
+
+	  (|defun read-from-emacs ...)
+
+	and not
+
+	  |(defun read-from-emacs ...)
+	
+	* swank-sbcl.lisp (source-file-position): Don't 1+ the returned
+	position; i.e. return a position usable as a CL /file position/
+	which start from 0, and not a position usable in Emacs where
+	buffer points start from 1. This is important because the return
+	value is passed to SWANK-BACKEND::READ-SNIPPET which invokes
+	CL:FILE-POSITION on it.
+	(make-definition-source-location): Adapted to 1+ the position
+	passed to Emacs, to reflect above change.
+	
 2008-02-20  Helmut Eller  <heller at common-lisp.net>
 
 	Better factorization for M-. and xref commands.