slime-devel

slime-devel@common-lisp.net

4231 discussions

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 13 Mar '04

13 Mar '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.294 slime/ChangeLog:1.295 --- slime/ChangeLog:1.294 Fri Mar 12 00:36:56 2004 +++ slime/ChangeLog Fri Mar 12 16:20:23 2004 @@ -1,3 +1,19 @@ +2004-03-12 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-backend.lisp (find-definitions): Fix docstring. + + * slime.el (slime-dispatch-event): Re-enable :ed command. + (sldb-return-from-frame): Send swank:sldb-return-from-frame. + + * swank-cmucl.lisp (find-definitions): Allow names like (setf car). + + * swank.lisp (sldb-return-from-frame): Convert the string to a + sexp. + (dispatch-event, send-to-socket-io): Allow %apply events. + (safe-condition-message): Bind *pretty-print* to t. + (set-default-directory): Use the truename. + (find-definitions-for-emacs): Allow names like (setf car). + 2004-03-12 Wolfgang Jenkner <wjenkner(a)inode.at> * swank.lisp (:swank): Export startup-multiprocessing,

1 0

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 12 Mar '04

12 Mar '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.293 slime/ChangeLog:1.294 --- slime/ChangeLog:1.293 Wed Mar 10 17:12:56 2004 +++ slime/ChangeLog Fri Mar 12 00:36:56 2004 @@ -1,3 +1,10 @@ +2004-03-12 Wolfgang Jenkner <wjenkner(a)inode.at> + + * swank.lisp (:swank): Export startup-multiprocessing, + restart-frame, return-from-frame. + What about kill-thread and interrupt-thread, which are accessed + as internal symbols? + 2004-03-10 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * swank-cmucl.lisp (struct-definitions, find-dd)

1 0

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 11 Mar '04

11 Mar '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.289 slime/ChangeLog:1.293 --- slime/ChangeLog:1.289 Tue Mar 9 15:43:56 2004 +++ slime/ChangeLog Wed Mar 10 17:12:56 2004 @@ -1,3 +1,43 @@ +2004-03-10 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-cmucl.lisp (struct-definitions, find-dd) + (type-definitions, function-info-definitions) + (source-transform-definitions, setf-definitions): New funtions. + (find-definitions): Include struct definitions, deftypes, setf + defintions, compiler-macros and compiler transforms. + +2004-03-10 Andras Simon <andras(a)renyi.hu> + + * swank.lisp (print-arglist): Use with-standard-io-syntax. + +2004-03-10 Pawel Ostrowski <pasza(a)zodiac.mimuw.edu.pl> + + * swank-cmucl.lisp (unprofile-all): (eval '(profile:unprofile)) + instead of just calling it since it is a macro in cmucl. + + * swank.lisp (:swank): export profile symbols (profiled-functions, + profile-report, profile-reset, unprofile-all, profile-package) + +2004-03-10 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-allegro.lisp, swank-lispworks.lisp, swank-sbcl.lisp, + swank-clisp.lisp, swank-cmucl.lisp (find-definitions): Some + tweaking. + + * swank.lisp (print-arglist): Bind *pretty-circle* to nil to avoid + output like "(function . (cons))". Suggested by Michael Livshin. + (test-print-arglist): Re-enable the tests. + (find-definitions-for-emacs): Renamed from + find-function-locations. + + * slime.el (slime-edit-definition): Renamed from + slime-edit-fdefinition. Display the dspec if there are multiple + definitions. + (slime-symbol-name-at-point): Handle the case when there is no + symbol at point. + (slime-expected-failures): New function + (slime-execute-tests): Use it. + 2004-03-09 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * swank.lisp (frame-source-location-for-emacs): Export it.

1 0

[slime-devel] [PATCH] slime profiling - little fix
by Pawel Ostrowski 10 Mar '04

10 Mar '04

Hello, When I was playing with slime profiling interface I encountered some errors: - CMUCL 18e complained about (profiled-functions, profile-report, profile-reset, unprofile-all, profile-package) symbols not being exported by swank package when I tried entries from slime/profiling menu. I just added missing exports to swank.lisp and it works fine, however I do not know slime code well so it may be not the best solution. I tried this with CLISP 2.32 and my fix helps too. Without the fix i get the following errors: error in process filter: cond: No frame at point error in process filter: No frame at point - (slime-unprofile-all) had no effect on CMUCL 18e because it called (profile:unprofile) which is a macro. I replaced it with (eval '(profile:unprofile)) and now it works fine. -- Pasza pasza (at) zodiac.mimuw.edu.pl

2 1

[slime-devel] (string= "(function . (cons))" "(function cons)") ==> nil
by Michael Livshin 10 Mar '04

10 Mar '04

the latest Slime (both HEAD & FAIRLY-STABLE) does not load for me due to failed asserts that check the equality cited in the subject. apparently #'pprint-logical-block in CMUCL 18e does not work the way swank.lisp thinks it works. or something. I've worked around this by making #'test-print-arglist be: (defun test-print-arglist (list string) (equal (read-from-string (print-arglist-to-string list)) (read-from-string string))) perhaps it will break something; so far it does not. cheers, --m -- Well, I wish you'd just tell me rather than trying to engage my enthusiasm, because I haven't got one.

3 5

[slime-devel] Some new functions
by Bill_Clementson＠peoplesoft.com 10 Mar '04

10 Mar '04

I am enclosing some functions that I use quite a bit in my Lisp programming. They might be useful to include in SLIME. The first 2 are based on functions originally written by Paul Foley. If you want to include them, I would suggest binding insert-balanced-comments to "C-c C-;" and remove-balanced-comments to "C-c C-:". The third function uses font-lock to visually transform the word "lambda" to the Greek lambda character. Someone who wants to use this function would typically add it in for the specific mode. For example: (add-hook 'lisp-mode-hook (lambda () (slime-mode t) (pretty-lambdas))) Here are the 3 functions: (defun insert-balanced-comments (arg) "Insert a set of balanced comments around the s-expression containing the point. If this command is invoked repeatedly (without any other command occurring between invocations), the comment progressively moves outward over enclosing expressions. If invoked with a positive prefix argument, the s-expression arg expressions out is enclosed in a set of balanced comments." (interactive "*p") (save-excursion (when (eq last-command this-command) (when (search-backward "#|" nil t) (save-excursion (delete-char 2) (while (and (< (point) (point-max)) (not (looking-at " *|#"))) (forward-sexp)) (replace-match "")))) (while (> arg 0) (backward-char 1) (cond ((looking-at ")") (incf arg)) ((looking-at "(") (decf arg)))) (insert "#|") (forward-sexp) (insert "|#"))) (defun remove-balanced-comments () "Remove a set of balanced comments enclosing point." (interactive "*") (save-excursion (when (search-backward "#|" nil t) (delete-char 2) (while (and (< (point) (point-max)) (not (looking-at " *|#"))) (forward-sexp)) (replace-match "")))) (defun pretty-lambdas () (font-lock-add-keywords nil `(("(\\(lambda\\>\\)" (0 (progn (compose-region (match-beginning 1) (match-end 1) ,(make-char 'greek-iso8859-7 107)) nil))))))

3 3

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 10 Mar '04

10 Mar '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.285 slime/ChangeLog:1.289 --- slime/ChangeLog:1.285 Mon Mar 8 18:46:59 2004 +++ slime/ChangeLog Tue Mar 9 15:43:56 2004 @@ -1,5 +1,99 @@ 2004-03-09 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + * swank.lisp (frame-source-location-for-emacs): Export it. + Reported by Jouni K Seppanen + (test-print-arglist): Disable the tests until we know what's wrong + with print-arglist. Reported by Michael Livshin. + + * swank-source-path-parser.lisp, swank-gray.lisp (in-package): We + are in-package :swank-backend. Thanks to Raymond Wiker. + + Merge package-split branch into main trunk. + + * swank-clisp.lisp (find-fspec-location): Handle "No such file" + errors. + + * swank-openmcl.lisp (preferred-communication-style): Implemented. + (call-without-interrupts, getpid): Use defimplementation. + (arglist, swank-compile-file, swank-compile-string) + (swank-compile-system, backtrace): Renamed. + (print-frame): New function. + (frame-catch-tags): Don't exclude nil source location. + (format-restarts-for-emacs, debugger-info-for-emacs, + inspect-in-frame). deleted + (frame-arguments): Don't use to-string. + (find-source-locations, find-function-locations + (method-source-location): Deleted. + (canonicalize-location, find-definitions, + function-source-location, list-callers): Use + ccl::edit-definition-p and + ccl::get-source-files-with-types&classes. Makes things easier. + (return-from-frame): Take a sexp not a string. + (describe-definition): Describe more types. + + * swank-loader.lisp: Change load order. swank.lisp is now the last + file. + + * swank-allegro.lisp, swank-clisp.lisp, swank-cmucl.lisp, + swank-gray.lisp, swank-lispworks.lisp, swank-sbcl.lisp, + swank-source-path-parser.lisp: Implement changed backend interface + and remove references to frontend symbols. + + * swank-backend.lisp (:swank-backend): New package. + (definterface): Export the symbol. + (:location, :error, :position, :buffer): Define structure of + source locations here. + (preferred-communication-style, compute-backtrace, print-frame): + New functions. + (debugger-info-for-emacs): Deleted. + + Renaming: + + compile-file-for-emacs -> swank-compile-file + compile-string-for-emacs -> swank-compile-string + compile-system-for-emacs -> swank-compile-stystem + arglist-string -> arglist + backrace -> compute-backtrace + find-function-locations -> find-definitions + + * swank.lisp (:swank): Create the package here. + (*swank-in-background*): Call the backend function + preferred-communication-style to for the initial value. + (find-symbol-designator): Handle NIL properly. + (arglist-string): Renamed from format-arglist. Call backend + function directly. + (*sldb-restarts*, swank-debugger-hook, format-restarts-for-emacs) + (nth-restart, invoke-nth-restart, sldb-abort): Handle restarts in + the front end. + (frame-for-emacs): Renamed from print-with-frame-label. + (backtrace, debugger-info-for-emacs, pprint-eval-string-in-frame) + (set-default-directory): Now in the front end. + (frame-locals-for-emacs): Use print not princ for variable names. + (compile-file-for-emacs, compile-string-for-emacs): Small wrappers + around backend functions. + (describe-definition-for-emacs): Handle unknown symbols before + calling the backend. + (find-function-locations): Wrapper for new backend function + find-definitions. + (group-xrefs, partition, location-valid-p, xref-buffer, xref): + Updated for the new backend functions. + + * slime.el: + (slime-symbol-at-point, slime-symbol-name-at-point): + slime-symbol-at-point calls slime-symbol-name-at-point not the + other way around. This avoids the mess if the symbol at point is + NIL. + (slime-compile-file, slime-load-system, slime-compile-region) + (slime-call-describer, slime-who-calls, sldb-catch-tags): Updates + for renamed lisp functions. + (slime-list-callers, slime-list-callees): Unified with other xref + commands. + (sldb-show-frame-details): Catch tags no longer include the source + location. + (sldb-insert-locals): Simplified. + +2004-03-09 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + * swank-cmucl.lisp (read-into-simple-string): Use the correct fix. Reported by Håkon Alstadheim.

1 0

[slime-devel] Package split
by Helmut Eller 09 Mar '04

09 Mar '04

I just merged my package-split branch into the main trunk. We have now a new package SWANK-BACKEND. It is basically stand-alone and doesn't need the rest of SWANK. Of course, SWANK calls functions in the backend. I moved some functionality like handling of restarts and a lot symbol-to-string conversion to swank.lisp. The load order is now: swank-loader, swank-backend, swank-[cmucl,sbcl...], swank This means, we could define macros in the backend and use them in SWANK. I tested a bit with my usual implementations. I added the necessary changes for OpenMCL, but don't know if they actually work. Feedback welcome. Helmut.

4 7

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 09 Mar '04

09 Mar '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.284 slime/ChangeLog:1.285 --- slime/ChangeLog:1.284 Mon Mar 8 02:15:41 2004 +++ slime/ChangeLog Mon Mar 8 18:46:59 2004 @@ -1,7 +1,12 @@ +2004-03-09 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-cmucl.lisp (read-into-simple-string): Use the correct fix. + Reported by Håkon Alstadheim. + 2004-03-08 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * slime.el (slime-start-swank-server, slime-maybe-start-lisp): - Translate filenames. + Translate filenames. Reported by Dan Muller. 2004-03-08 Bill Clementson <Bill_Clementson(a)peoplesoft.com>

1 0

[slime-devel] Why is slime breaking READ-SEQUENCE in cmucl ?
by Håkon Alstadheim 08 Mar '04

08 Mar '04

swank-cmucl.lisp contains code which makes cmucl break w.r.t. the ansi cl standard; in that it makes READ-SEQUENCE insist on filling its target buffer. The hyperspec says, in 21.2 under READ-SEQUENCE: If the end of file for stream is reached before copying all elements of the subsequence, then the extra elements near the end of sequence are not updated. swank-cmucl installs its own READ-INTO-SIMPLE-STRING which calls SYSTEM:READ-N-BYTES with the EOF-ERRORP argument true. In addition to being wrong, it does not solve the problem I believe it is trying to solve. At the end of this mail is a patch to remove the buggy version of READ-INTO-SIMPLE-STRING. If this is trying to protect against truncated reads, I believe the solution is to run a loop (possibly with a timeout) until the needed bytes have been read from the socket. If I am mistaken, then the assertion that is already there should suffice, making SYSTEM:READ-N-BYTES throw an error gives us nothing extra. Something like the followint patch would make swank.lisp more robust against slow networks: Index: swank.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank.lisp,v retrieving revision 1.137 diff -u -r1.137 swank.lisp --- swank.lisp 5 Mar 2004 22:51:12 -0000 1.137 +++ swank.lisp 8 Mar 2004 17:44:53 -0000 @@ -572,7 +572,12 @@ (ash (next-byte) 8) (next-byte))) (string (make-string length)) - (pos (read-sequence string stream))) + (pos 0)) + ;; Keep reading in case the connection is slow + (loop for iteration = 1 then (1+ iteration) + do (incf pos (read-sequence string stream :start pos)) + until (or (= pos length) (< 10 iterations )) ;;until length or appx. 1 second + do (sleep 0.1)) ;; at least with cmucl this is multi-proc. friendly (assert (= pos length) () "Short read: length=~D pos=~D" length pos) (let ((form (read-form string))) Here is the patch to remove the bad code from swank-cmucl.lisp: Index: swank-cmucl.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-cmucl.lisp,v retrieving revision 1.78 diff -u -r1.78 swank-cmucl.lisp --- swank-cmucl.lisp 7 Mar 2004 16:41:11 -0000 1.78 +++ swank-cmucl.lisp 8 Mar 2004 17:46:15 -0000 @@ -4,39 +4,6 @@ (in-package :swank) -(in-package :lisp) - -;; Fix for read-sequence in 18e -#+cmu18e -(progn - (let ((s (find-symbol (string :*enable-package-locked-errors*) :lisp))) - (when s - (setf (symbol-value s) nil))) - - (defun read-into-simple-string (s stream start end) - (declare (type simple-string s)) - (declare (type stream stream)) - (declare (type index start end)) - (unless (subtypep (stream-element-type stream) 'character) - (error 'type-error - :datum (read-char stream nil #\Null) - :expected-type (stream-element-type stream) - :format-control "Trying to read characters from a binary stream.")) - ;; Let's go as low level as it seems reasonable. - (let* ((numbytes (- end start)) - (bytes-read (system:read-n-bytes stream s start numbytes t))) - (if (< bytes-read numbytes) - (+ start bytes-read) - end))) - - (let ((s (find-symbol (string :*enable-package-locked-errors*) :lisp))) - (when s - (setf (symbol-value s) t))) - - ) - -(in-package :swank) - ;;;; TCP server.

2 1

Jump to page:

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

slime-devel