slime-devel

slime-devel@common-lisp.net

4231 discussions

[slime-devel] edit-definition of *something*
by Alan Ruttenberg 29 Sep '04

29 Sep '04

Is it just me, or is it broken to edit definition on a symbol which has "*" at the end? It appears that the culprit is \> in the function-name regular expression in slime-goto-location-position. This is supposed to match a word break but according to M-x describe-syntax "*" is "symbol" as opposed to "word". I fixed it in my version by changing \\> to \\(\\>\\|\\s \\) but didn't want to put this into cvs before someone else commented. Should the syntax table be changed instead, or am I barking up the wrong tree? -Alan

2 1

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 28 Sep '04

28 Sep '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.540 slime/ChangeLog:1.541 --- slime/ChangeLog:1.540 Fri Sep 24 00:24:17 2004 +++ slime/ChangeLog Tue Sep 28 00:39:40 2004 @@ -1,3 +1,28 @@ +2004-09-27 Helmut Eller <heller(a)common-lisp.net> + + * slime.el (slime-process): New function intended to replace all + those references to the *inferior-lisp* buffer. + (slime-maybe-start-lisp): Split it up. + (slime-start-lisp): New function. + (slime-restart-inferior-lisp): Use the command from the existing + process to start the new process. + +2004-09-27 Christian Lynbech <christian(a)defun.dk> + + * slime.el (define-slime-dialect): New macro to make starting + Lisps with different command line options easier. + +2004-09-27 Rui Patrocínio <rui.patrocinio(a)netvisao.pt> + + * swank.lisp (mop, mop-helper): Support functions for the class + browser. + + * slime.el (slime-browse-classes, slime-browse-xrefs): New + commands to browse class hierarchies and xref graphs in a tree + widget. + + * tree-widget.el: New file. Only needed for older Emacsen. + 2004-09-23 Helmut Eller <heller(a)common-lisp.net> * slime.el (slime-start-and-load): Take arguments so that the

1 0

[slime-devel] 3 todo's
by Tiago Maduro-Dias 28 Sep '04

28 Sep '04

Hi! I've recently started using slime again and I was pleasantly surprised with the obvious evolution! There were a few things that caught my eye though: 1. In APROPOS, multi-line documentation strings don't show properly (only the first line is shown). 2. I really miss a function which would be able to restore the previous window state after using apropos and such. This is a bit more difficult to specify. I was hoping for something like: "whenever a certain type of buffer comes into play due to a function call (e.g., slime-apropos brings up the *SLIME Apropos* buffer), the window state is saved and is retrievable by a call to slime-recover-window-state (or something of the sort). While such class of buffers are shown, no window state is saved again." This is annoying because I spend some time organizing my buffers and then a call to apropos just messes everything up. 3. I'm using Allegro CL 6.2. One thing allegro does is provide a reference character near the place where a given error/warning occurred. Isn't it possible to use this information in the compilation notes buffer? So that one can access the place of the error via a single click as is possible with sbcl for instance? I hope my english was clear enough :). Thank you for your time, Tiago Maduro-Dias.

3 3

Re: [slime-devel] Emacs command for loading Slime and application
by Helmut Eller 28 Sep '04

28 Sep '04

Nicolas Neuss <Nicolas.Neuss(a)iwr.uni-heidelberg.de> writes: > 1. If Slime is not already running, the load command is not executed. > > 2. If Slime is already running, Femlisp is loaded, but the package is not > set. > > Can someone tell me how I can achieve my goal? Yes, this is bit more difficult because most of the commands work asynchronously. I changed slime-start-and-load a bit so that it should be usable for your needs. In general If you need commands of this sort, it's usually the easiest to write a small CL function for the job, so that Emacs can make a single RPC and doesn't need so much synchronization. > PS: Another problem is that executing (slime) apparently sets back some > variables, e.g. *READ-DEFAULT-FLOAT-FORMAT* which I have set to > DOUBLE-FLOAT when loading Femlisp. Why is that? Can't help you here without more details. Which Lisp are you using? Which communication style? Are threads involved? We don't set *READ-DEFAULT-FLOAT-FORMAT* explicit, but there's always the possibility for bug and that we used WITH-STANDARD-IO-SYNTAX in a wrong place. Helmut.

2 4

[slime-devel] Eval defun and compile defun failing on long functions
by Dan Pierson 28 Sep '04

28 Sep '04

Using a version of cmucl similar to 19a slime dies with the following in the *inferior lisp* buffer: ;; Connection to Emacs lost. ;; [Error in function LISP::ASSERT-ERROR: Short read: length=5467 pos=4093] Which looks rather like a packet lenth error of some sort -- 4093 seems suspicious to me. Does anyone have any ideas on how to look into this further? Dan Pierson

2 2

[slime-devel] (no subject)
by Pascal J.Bourguignon 27 Sep '04

27 Sep '04

In a Macintosh Programmer Workshop window: echo Hello Command-RETURN inserts: Hello in the window at the current position. In a Smalltalk Workspace window: 1 + 2 . A-d inserts 3 in the Workspace window at the current position. In an emacs lisp source buffer: (insert "\nHello\n") C-u C-x C-e inserts: Hello nil in the current buffer at the point. In a Common-Lisp source buffer with ilisp: (format t "~&Hello") C-z C-e inserts: Hello NIL in the current buffer at the point. In a Common-Lisp source buffer with slime: (format t "~&Hello") C-x C-e inserts nothing. Hides the result as soon as I type or move the mouse (like for example try to copy-and-paste it from the mini buffer, and I have to manipulate buffers, to reduce the size of my source, to hide it entirely to show the whole output that has been sent in some other buffer. Why so much hatred? I want both the output and the result of the function to be inserted at the point! How can that be done with slime? -- __Pascal Bourguignon__ http://www.informatimago.com/ Our enemies are innovative and resourceful, and so are we. They never stop thinking about new ways to harm our country and our people, and neither do we.

2 2

[slime-devel] Error: Attempting to change the lambda list of swank-compile-string
by John M. Adams 27 Sep '04

27 Sep '04

Dear Friends, Using fresh 1.0 cvs with ACL 7.0 beta I observe: ; Fast loading ; /home/jmadams/.slime/fasl/allegro-7.0.beta/swank-backend.fasl ; ... Error: Attempting to change the lambda list of #<STANDARD-GENERIC-FUNCTION SWANK-COMPILE-STRING> to (STRING &KEY BUFFER POSITION DIRECTORY) results in a confict with method #<STANDARD-METHOD SWANK-COMPILE-STRING (T)> Restart actions (select using :continue): 0: Remove this method 1: retry the load of /home/jmadams/.slime/fasl/allegro-7.0.beta/swank-backend.fasl 2: skip loading /home/jmadams/.slime/fasl/allegro-7.0.beta/swank-backend.fasl 3: retry the load of /home/jmadams/w/slime/swank-loader.lisp 4: skip loading /home/jmadams/w/slime/swank-loader.lisp 5: recompile /home/jmadams/w/slime/swank-loader.lisp 6: Return to Top Level (an "abort" restart). 7: Abort entirely from this (lisp) process. I see that others have reported similar problems, but I have seen no confirmed explanation. Has anyone actually got around this problem? I saw a suggestion that this might be caused by inadvertantly mixing different versions of swank.lisp and slime.el but I don't think that is the problem. I also saw that Helmut couldn't reproduce the problem, but I don't know what ACL version was being referred to. Thanks a lot,

2 1

[slime-devel] Re: SLIME docs
by Dan Pierson 27 Sep '04

27 Sep '04

Christian Lynbech wrote: > I wondered if the docs should mention usefull hacks to set up > functions to start slime with specialised lisp binaries/arguments (for > instance a special core image). I used to use something like these and rather miss them. The problem is that I find ,restart-inferior-lisp too useful to give up and it ignores all of this. Any suggestions for how to fix that? Dan Pierson

3 3

[slime-devel] Common Lisp Browser
by Rui Patrocínio 27 Sep '04

27 Sep '04

Hello, I've attached an extensible browser that I hope is useful and simple enough. It uses a lazy mechanism to expand the information required, so that it can be used to explore large systems. Currently it permits to explore class hierarchies and some xref information. I've a big hack that permits to see trace output in a tree-like fashion, but it's very ugly and implementation dependent and so it hasn't been included. A small interface in swank.lisp is needed, using the new API to MOP in the swank-backend: (defun class-direct-classes (class-name fn) (let ((class (find-class class-name nil))) (when class (mapcar #'(lambda (x) (symbol-name (class-name x))) (funcall fn class))))) (defslimefun mop (type symbol-name) "Return info about classes using mop. When type is: :subclasses - return the list of subclasses of class. :superclasses - return the list of superclasses of class." (let ((symbol (parse-symbol-or-lose symbol-name *buffer-package*))) (ecase type (:subclasses (class-direct-classes symbol #'swank-mop:class-direct-subclasses)) (:superclasses (class-direct-classes symbol #'swank-mop:class-direct-superclasses))))) Rui Patrocínio

2 1

[slime-devel] save SLIME session (and more)
by slime＠pelissero.de 27 Sep '04

27 Sep '04

In SLIME I've been missing the possibility to save my hacking sessions. I turn off my PC every night (my PC's ACPI doesn't work reliably) and the next day I have to spend half an hour to reload everything and figure out what package/system dependency I've screwed up the day before. Educative exercise, but admittedly annoying. The following patch adds this feature. It implements the "save" (or "freeze") shortcut and can interact nicely with Emacs desktop.el. User can type ",save" or click "REPL->Save session" and get a lisp image saved in the ~/.slime directory. To recover a previously saved session just do "M-x slime-recover-session" instead of "M-x slime". If the customisable variable slime-part-of-desktop is true, the saving and recovering is done automatically upon exit/start of Emacs (provided you use desktop.el). It has been tested on SBCL and CMUCL. In CLISP there seem to be some communications problems during the recovery, that I haven't been able to track down. Those are probably due to the fact that CLISP uses a different communication style than CMUCL and SBCL; just a guess. Unfortunately the following patch contains an unrelated modification I wanted to propose to the mailing list some days ago. The message got bounced by the mailing list server (I wasn't subscribed). Just to clarify what is what, my message went more or less like this: > I personally find a bit annoying the fact that the "compiler notes" > window opens up always at half the frame height, even if the list > to display is very short. I'd really appreciate if the window > popped up to a more modest size and expand as necessary (toggling > the tree branches). > > Something like the following patch would keep the window at most half > the frame's height, although starting at much smaller size. > > Index: slime.el > =================================================================== > RCS file: /project/slime/cvsroot/slime/slime.el,v > retrieving revision 1.390 > diff -c -r1.390 slime.el > *** slime.el 13 Aug 2004 21:23:53 -0000 1.390 > --- slime.el 27 Aug 2004 22:59:40 -0000 > *************** > *** 3322,3328 **** > (slime-tree-insert tree "") > (insert "\n"))) > (setq buffer-read-only t) > ! (goto-char (point-min))))) > > (defun slime-alistify (list key test) > "Partition the elements of LIST into an alist. KEY extracts the key > --- 3322,3329 ---- > (slime-tree-insert tree "") > (insert "\n"))) > (setq buffer-read-only t) > ! (goto-char (point-min)) > ! (fit-window-to-buffer nil (window-height))))) > > (defun slime-alistify (list key test) > "Partition the elements of LIST into an alist. KEY extracts the key > *************** > *** 3536,3542 **** > (backward-char 1) > (slime-tree-insert tree prefix) > (delete-char 1) > ! (goto-char start-mark))) > > > ;;;;; Adding a single compiler note > --- 3537,3544 ---- > (backward-char 1) > (slime-tree-insert tree prefix) > (delete-char 1) > ! (goto-char start-mark) > ! (fit-window-to-buffer nil (/ (frame-height) 2) (window-height)))) > > > ;;;;; Adding a single compiler note > Here is the whole lot: Index: slime.el =================================================================== RCS file: /project/slime/cvsroot/slime/slime.el,v retrieving revision 1.390 diff -u -r1.390 slime.el --- slime.el 13 Aug 2004 21:23:53 -0000 1.390 +++ slime.el 27 Sep 2004 17:18:44 -0000 @@ -69,6 +69,8 @@ (defun* slime-setup (&key autodoc typeout-frame) "Setup Emacs so that lisp-mode buffers always use SLIME." (add-hook 'lisp-mode-hook 'slime-lisp-mode-hook) + (add-hook 'desktop-save-hook 'slime-desktop-save-hook) + (add-hook 'desktop-after-read-hook 'slime-desktop-after-read-hook) (when typeout-frame (add-hook 'slime-connected-hook 'slime-ensure-typeout-frame)) (setq slime-use-autodoc-mode autodoc)) @@ -130,6 +132,12 @@ :type 'boolean :group 'slime-ui) +(defcustom slime-part-of-desktop t + "If non-nil, SLIME sessions get saved and restored together +with Emacs desktop." + :type 'boolean + :group 'slime-ui) + ;;;;; slime-lisp (defgroup slime-lisp nil @@ -742,6 +750,7 @@ [ "Send Input" slime-repl-return ,C ] [ "Close and Send Input " slime-repl-closing-return ,C ] [ "Interrupt Lisp process" slime-interrupt ,C ] + [ "Save session" slime-save-session ,C ] "--" [ "Previous Input" slime-repl-previous-input t ] [ "Next Input" slime-repl-previous-input t ] @@ -1199,6 +1208,36 @@ (add-hook 'slime-connected-hook hook) (slime)))) +(defun slime-guess-image-switch (lisp-program-name) + (cdr (assoc (file-name-sans-extension (file-name-nondirectory lisp-program-name)) + '(("lisp" . "-noinit -core") + ("sbcl" . "-userinit /dev/null -sysinit /dev/null -core") + ("clisp" . "-norc -M"))))) + +(defun slime-session-image-name (lisp-program-name) + (expand-file-name (concat "~/.slime/" + (file-name-sans-extension (file-name-nondirectory lisp-program-name)) + ".core"))) + +(defun slime-restore-session () + "Restart Slime on a previously saved Lisp image. It's user's +responsability to make sure that the saved image contains a swank +that is compatible with the version of Slime she is running. +That is, do a rm ~/.slime/*.core after upgrading Slime." + (interactive) + (unless (get-buffer-process (get-buffer "*inferior-lisp*")) + (let ((image-name (slime-session-image-name inferior-lisp-program))) + (if (file-exists-p image-name) + (let ((inferior-lisp-program (format "%s %s %s" + inferior-lisp-program + (slime-guess-image-switch inferior-lisp-program) + image-name))) + (call-interactively 'inferior-lisp) + (set-process-query-on-exit-flag (inferior-lisp-proc) + (not slime-kill-without-query-p)) + (slime-inferior-connect)) + (error "No session has been saved for %S" inferior-lisp-program))))) + ;;;;; Start inferior lisp ;;; ;;; Here is the protocol for starting SLIME: @@ -2966,6 +3005,10 @@ (slime-kill-all-buffers))) (:one-liner "Quit the lisp and close all SLIME buffers.")) +(defslime-repl-shortcut slime-repl-save-session ("save" "freeze") + (:handler #'slime-save-session) + (:one-liner "Save Lisp image and quit closing all SLIME buffers.")) + (defslime-repl-shortcut slime-repl-defparameter ("defparameter" "!") (:handler (lambda (name value) (interactive (list (slime-read-symbol-name "Name (symbol): " t) @@ -3322,7 +3365,8 @@ (slime-tree-insert tree "") (insert "\n"))) (setq buffer-read-only t) - (goto-char (point-min))))) + (goto-char (point-min)) + (fit-window-to-buffer nil (window-height))))) (defun slime-alistify (list key test) "Partition the elements of LIST into an alist. KEY extracts the key @@ -3536,7 +3580,8 @@ (backward-char 1) (slime-tree-insert tree prefix) (delete-char 1) - (goto-char start-mark))) + (goto-char start-mark) + (fit-window-to-buffer nil (/ (frame-height) 2) (window-height)))) ;;;;; Adding a single compiler note @@ -7855,6 +7900,31 @@ (defun sldb-xemacs-post-command-hook () (when (get-text-property (point) 'point-entered) (funcall (get-text-property (point) 'point-entered)))) + +(defun slime-save-session () + "Save and kill the current Lisp hacking session. To restore +the session use slime-restore-session instead of just the slime +command." + (interactive) + (when (slime-connected-p) + (let ((process (inferior-lisp-proc))) + (slime-eval-async `(swank:save-session-image-and-die ,(slime-session-image-name inferior-lisp-program))) + ;; wait untill inferior lisp dies + (while (eq 'run (process-status process)) + (sleep-for 1)) + (slime-kill-all-buffers)))) + +(defun slime-desktop-save-hook () + "Run upon saving the Emacs desktop. See desktop-save-hook." + (when (and slime-part-of-desktop + (get-buffer-process (get-buffer "*inferior-lisp*"))) + (slime-save-session))) + +(defun slime-desktop-after-read-hook () + (when (and slime-part-of-desktop + (file-exists-p (slime-session-image-name inferior-lisp-program)) + (y-or-n-p "Restore SLIME session? ")) + (slime-restore-session))) ;;;; Finishing up Index: swank.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank.lisp,v retrieving revision 1.222 diff -u -r1.222 swank.lisp --- swank.lisp 13 Aug 2004 16:14:13 -0000 1.222 +++ swank.lisp 27 Sep 2004 17:19:26 -0000 @@ -2762,6 +2762,13 @@ (add-hook *pre-reply-hook* 'sync-indentation-to-emacs) +(defslimefun save-session-image-and-die (lisp-image) + "Save Lisp image in LISP-IMAGE file and die." + #+cmu (extensions:save-lisp lisp-image) + #+sbcl (sb-ext:save-lisp-and-die lisp-image) + #+clisp (ext:saveinitmem lisp-image) + #+clisp (ext:quit)) + ;;; Local Variables: ;;; eval: (font-lock-add-keywords 'lisp-mode '(("(\\(defslimefun\\)\\s +\\(\\(\\w\\|\\s_\\)+\\)" (1 font-lock-keyword-face) (2 font-lock-function-name-face)))) ;;; End: -- walter pelissero http://www.pelissero.de

1 0

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