January 2005 - slime-devel - mailman3.common-lisp.net

[slime-devel] Inspecting return value at breakpoints (patch included)
by Utz-Uwe Haus 19 Jan '05

19 Jan '05

Hi, I found that when I stop on a breakpoint set with sldb-break-on-return, I am often interested in inspecting the return value. That is printed in the sldb buffer, but not inspectable. Currently I am using the following modifications to signal-breakpoint in the CMUCL case, which make en entry in the breakpoint condition. Then, inspecting the condition yields the information I'm interested in. This is not very beautiful, and it only works with CMUCL, but in case someone can make use of it... later, Utz ----- Index: swank-cmucl.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-cmucl.lisp,v retrieving revision 1.136 diff -u -r1.136 swank-cmucl.lisp --- swank-cmucl.lisp 13 Jan 2005 23:17:02 -0000 1.136 +++ swank-cmucl.lisp 18 Jan 2005 12:29:19 -0000 @@ -1727,7 +1727,8 @@ (c::compiled-debug-function-returns cdfun))) (define-condition breakpoint (simple-condition) - ((message :initarg :message :reader breakpoint.message)) + ((message :initarg :message :reader breakpoint.message) + (values :initarg :values :reader breakpoint.values)) (:report (lambda (c stream) (princ (breakpoint.message c) stream)))) (defimplementation condition-extras ((c breakpoint)) @@ -1740,13 +1741,18 @@ (flet ((brk (fstring &rest args) (let ((msg (apply #'format nil fstring args)) (debug:*stack-top-hint* frame)) - (break 'breakpoint :message msg)))) + (break 'breakpoint :message msg))) + (brk-with-values (values fstring &rest args) + (let ((msg (apply #'format nil fstring args)) + (debug:*stack-top-hint* frame)) + (break 'breakpoint :values values :message msg))) ) (with-struct (di::breakpoint- kind what) breakpoint (case kind (:code-location (case (di:code-location-kind what) ((:single-value-return :known-return :unknown-return) - (brk "Return value: ~{~S ~}" (breakpoint-values breakpoint))) + (brk-with-values (breakpoint-values breakpoint) + "Return value: ~{~S ~}" (breakpoint-values breakpoint))) (t (brk "Breakpoint: ~S ~S" (di:code-location-kind what) ----- -- Utz-Uwe Haus haus(a)mail.math.uni-magdeburg.de Inst. f. Mathemat. Optim. utz(a)uuhaus.de Uni Magdeburg PGP keys 1024/6AD23BE1 and 2048/5D0B72A1 GERMANY available via keyservers or email request

2 1

[slime-devel] SBCL 0.8.18 with SLIME
by frodeaux 19 Jan '05

19 Jan '05

I'm new to SLIME. Installing with the latest SBCL seems to go ok with the "Meta-x slime" until I get the following Connected. Hack and be merry! error in process filter: slime-process-available-input: Wrong type argument: listp, \223 error in process filter: Wrong type argument: listp, \223 Can anyone suggest how to deal with this? Thanks

2 1

[slime-devel] Problem with reading from *QUERY-IO*
by Peter Seibel 19 Jan '05

19 Jan '05

In a just synced SLIME running against a just synced CVS Emacs an GNU/Linux with Allegro 7.0 I seem to be having some trouble reading from *QUERY-IO*. One call works fine but two calls in a row drop me in a debugger, perhaps because there's some extra characters on the stream that are being considered as constituent chars. Here's a simple test case: CL-USER> (progn (read *query-io*) (read *query-io*)) :foo :bar ; Evaluation aborted The error in the debugger was this: Package "^@" not found. [Condition of type READER-ERROR] Restarts: 0: [ABORT] Abort handling SLIME request. 1: [ABORT] Abort entirely from this (lisp) process. Backtrace: 0: (SWANK::DEBUG-IN-EMACS #<READER-ERROR @ #x72144cd2>) 1: ((FLET SWANK:SWANK-DEBUGGER-HOOK SWANK::DEBUG-IT)) 2: (SWANK:SWANK-DEBUGGER-HOOK #<READER-ERROR @ #x72144cd2> #<Function SWANK-DEBUGGER-HOOK>) 3: (ERROR READER-ERROR :STREAM #<TWO-WAY-STREAM "" @ #x71345fd2> :FORMAT-CONTROL "~?~@[ [file position = ~d]~]" :FORMAT-ARGUMENTS ("Package ~S not found." ("") NIL)) 4: (READ #<TWO-WAY-STREAM "" @ #x71345fd2>) 5: (EVAL (PROGN (READ *QUERY-IO*) (READ *QUERY-IO*))) ... As far as I can tell the ^@ is a null (char-code #\^@) ==> 0 -Peter -- Peter Seibel peter(a)javamonkey.com Lisp is the red pill. -- John Fraser, comp.lang.lisp

3 2

[slime-devel] Small patch for disabling the Emacs 21 header line
by Lars Magne Ingebrigtsen 19 Jan '05

19 Jan '05

I really like using all the lines in my buffers, so here's a patch to allow people to switch the header line off: *** slime.el.~1.448.~ Mon Jan 17 15:50:47 2005 --- slime.el Wed Jan 19 11:08:17 2005 *************** *** 2273,2278 **** --- 2273,2283 ---- ;;;; Stream output + (defcustom slime-header-line-p t + "If non-nil, display a header line in Slime buffers." + :type 'boolean + :group 'slime-repl) + (make-variable-buffer-local (defvar slime-output-start nil "Marker for the start of the output for the evaluation.")) *************** *** 2311,2317 **** (slime-connection-port (slime-connection)) (slime-pid))) ;; Emacs21 has the fancy persistent header-line. ! (use-header-p (boundp 'header-line-format)) ;; and dancing text (animantep (and (fboundp 'animate-string) slime-startup-animation --- 2316,2323 ---- (slime-connection-port (slime-connection)) (slime-pid))) ;; Emacs21 has the fancy persistent header-line. ! (use-header-p (and slime-header-line-p ! (boundp 'header-line-format))) ;; and dancing text (animantep (and (fboundp 'animate-string) slime-startup-animation -- (domestic pets only, the antidote for overdose, milk.) larsi(a)gnus.org * Lars Magne Ingebrigtsen

2 1

[slime-devel] Daily ChangeLog diff
by lgorrie＠common-lisp.net 18 Jan '05

18 Jan '05

Index: slime/ChangeLog diff -u slime/ChangeLog:1.599 slime/ChangeLog:1.600 --- slime/ChangeLog:1.599 Fri Jan 14 09:08:49 2005 +++ slime/ChangeLog Tue Jan 18 08:03:16 2005 @@ -1,3 +1,11 @@ +2005-01-18 Luke Gorrie <luke(a)synap.se> + + * slime.el (slime-complete-symbol*-fancy): New variable to enable + extra bells and whistles with slime-complete-symbol*. Currently + controls whether to use arglists semantically. + (slime-complete-symbol*): Avoid displaying an arglist when the + minibuffer is active. + 2005-01-14 Luke Gorrie <luke(a)synap.se> * slime.el (slime-repl-send-input): Make old input read-only using

1 0

[slime-devel] More completion shortcuts
by Edi Weitz 18 Jan '05

18 Jan '05

OK, here's another little completion shortcut that I think would be nice to have. YMMV, of course. Good night, Edi.

3 4

[slime-devel] *read-default-float-format* with C-c C-k, , load-system, etc.
by Dirk Gerrits 17 Jan '05

17 Jan '05

Hi, I'm not 100% sure this is a SLIME question, an ASDF question, or a Common Lisp question, but I'll ask it here anyway. In my program I'd like to have *read-default-float-format* be long-float instead of the default single-float. To accomplish this, I added (eval-when (:compile-toplevel :load-toplevel :execute) (setq *read-default-float-format* 'long-float)) to package.lisp, which should be the first file to be compiled/loaded by ASDF. Now if I do a ,load-system in the SLIME REPL, everything is fine: *read-default-float-format* evaluates to long-float during compilation and also does in the REPL. However, if I open one of my files, and add (defun foo () 50.0), do a C-M-x to compile it, and then call (foo) in the REPL, I get 50.0f0 instead of 50.0d0. C-c C-k doesn't help either, and C-x C-e on the 50.0 also produces a single-float. If I then save the file and do another ,load-system, then (foo) in the REPL /will/ return 50.0d0, as expected. How can I get C-M-x, C-c C-k and C-x C-e to use long-floats too? Am I doing something wrong that causes them to behave differently from ,load-system? I'm using SLIME and Emacs from CVS, and have set inferior-lisp-program and slime-multiprocessing to "sbcl" and t, respectively. Kind regards, Dirk Gerrits

4 13

[slime-devel] Indent problem
by Lars Rune Nøstdal 15 Jan '05

15 Jan '05

Hi, I'm new here .. :) I'm using slime-cvs on Gentoo: (defun test () <tab> ..indent works ok, but doing this: (defun test () <tab>" (" <tab> <-- no indent here! Hope this makes sense! -- mvh, Lars Rune Nøstdal http://nostdal.org/~lars/

2 2

[slime-devel] Daily ChangeLog diff
by lgorrie＠common-lisp.net 14 Jan '05

14 Jan '05

Index: slime/ChangeLog diff -u slime/ChangeLog:1.596 slime/ChangeLog:1.599 --- slime/ChangeLog:1.596 Wed Jan 12 18:10:44 2005 +++ slime/ChangeLog Fri Jan 14 18:08:49 2005 @@ -1,3 +1,24 @@ +2005-01-14 Luke Gorrie <luke(a)synap.se> + + * slime.el (slime-repl-send-input): Make old input read-only using + an overlay instead of a text property. This way if you copy&paste + the input elsewhere it will become editable (overlay is associated + with the buffer region and not the text). + +2005-01-14 Edi Weitz <edi(a)agharta.de> + + * slime.el (slime-complete-symbol*): Maybe insert closing + parenthesis or space (depending on arglist) after symbol + completion has finished. Optionally also show arglist. + +2005-01-13 Helmut Eller <heller(a)common-lisp.net> + + * swank-cmucl.lisp (create-socket): The byte-order of the :host + argument for CREATE-INET-LISTENER was changed in the Jan 2005 + snapshot. Test whether the symbol 'ext:socket-error exists to + decide if we are in a older version. + (resolve-hostname): Return the address in host byte-order. + 2005-01-12 Robert Lehr <bozzio(a)the-lehrs.com> * slime.el (slime-changelog-date): Return nil if the ChangLog file

1 0

[slime-devel] Daily ChangeLog diff
by lgorrie＠common-lisp.net 12 Jan '05

12 Jan '05

Index: slime/ChangeLog diff -u slime/ChangeLog:1.595 slime/ChangeLog:1.596 --- slime/ChangeLog:1.595 Mon Jan 10 20:35:07 2005 +++ slime/ChangeLog Wed Jan 12 18:10:44 2005 @@ -1,3 +1,26 @@ +2005-01-12 Robert Lehr <bozzio(a)the-lehrs.com> + + * slime.el (slime-changelog-date): Return nil if the ChangLog file + doesn't exits. + (slime-repl-update-banner): Write "ChangeLog file not found" if + the ChangeLog doesn't exist. + +2005-01-12 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> + + * slime.el (slime-inspector-operate-on-click): New command for + inspecting the value value at the clicked-at position or invoking + an inspector action. + (slime-inspector-mode-map): Bind it to mouse-2. + (slime-inspector-insert-ispec): Add mouse-face properties for + clickable values and action buttons. + +2005-01-12 Helmut Eller <heller(a)common-lisp.net> + + * swank.lisp (*default-worker-thread-bindings*): New variable to + initialize dynamic variables in worker threads. + (spawn-worker-thread, call-with-bindings): New helper functions. + (thread-for-evaluation): Use them. + 2005-01-10 Utz-Uwe Haus <haus+slime(a)merkur.math.uni-magdeburg.de> * swank-sbcl.lisp (profile-package): Add implementation for SBCL.

1 0

[slime-devel] patch - ChangeLog fault
by Robert Lehr 12 Jan '05

12 Jan '05

slime-connect in v1.0 faults during initialization if the ChangeLog is not in the expected place. This patch prevents that by verifying the file's existence before attempting to read it. -- Robert

2 1

Re: [slime-devel] Patch: slime-inspector-previous-inspectable-object
by Helmut Eller 12 Jan '05

12 Jan '05

Matthias Koeppe <mkoeppe(a)merkur.math.uni-magdeburg.de> writes: > Helmut Eller <e9626484(a)stud3.tuwien.ac.at> writes: > >> I installed the patch. > > Thanks, Helmut. I am sending below another patch that improves the > inspector. Applied. I note though, that it doesn't work in XEmacs. The mouse-2 event is called button2[up] and the functions posn-point and event-end are named differently or don't exist in XEmacs. Helmut.

1 0

[slime-devel] def* indent
by Travis Cross 11 Jan '05

11 Jan '05

I have a macro I use quite frequently that has a definition: (defmacro defpage (name title url &body body) ...) Even when I set lisp-prefix-match-indentation to nil (*see below), slime/emacs insists on indenting a call to defpage as (defpage test-page "Test Page" "/url/to" (div (div "the rest of the forms"))) If I rename defpage to something else, like 'mkpage', the indenting works as expected: (mkpage test-page "Test Page "/url/to" (div (div "the rest of the forms"))) I poked around in the slime source code, but I really wasn't able to make heads or tails of what is causing this unexpected (for me) behavior. If what I'm noticing is a 'feature,' what's the easiest way for me to work around this? Much appreciated, -- Travis (SBCL 0.8.15 / Slime CVS / GNU Emacs 21.3.1 / Gentoo) * though interestingly, when I use other test macros, it is evident that turning off lisp-prefix-match-indentation does have some effect. The macro (defmacro deftest (x y z) ...) will be indented: (deftest x y z) with lisp-prefix-match-indent on, but (deftest x y z) with the switch off. It seems that with lisp-prefix-match-indentation set to nil, slime/emacs completely ignores &body clues in the definition. If I redefine deftest as: (defmacro deftest (x y &body z) ...) it will still be indented incorrectly (as far as I can tell).

4 4

[slime-devel] Patch: slime-inspector-previous-inspectable-object
by Matthias Koeppe 11 Jan '05

11 Jan '05

The patch below adds a command `slime-inspector-previous-inspectable-object' and binds it to S-TAB in slime-inspector-mode. Moreover, the command `slime-inspector-next-inspectable-object' now accepts a prefix argument. The patch also makes wrapping around more reliable. I have adapted the code from the Emacs function `widget-move', which is used for similar functionality in Emacs Customize buffers. Index: slime.el =================================================================== RCS file: /project/slime/cvsroot/slime/slime.el,v retrieving revision 1.443 diff -u -p -u -r1.443 slime.el --- slime.el 16 Dec 2004 22:24:41 -0000 1.443 +++ slime.el 21 Dec 2004 14:55:34 -0000 @@ -6882,18 +6892,58 @@ Optionally set point to POINT." (set-window-configuration slime-saved-window-config) (kill-buffer (current-buffer))) -(defun slime-inspector-next-inspectable-object () - "sets the point to the next inspectable object" - (interactive) - (let ((pos (if (get-text-property (point) 'slime-part-number) - ;; we're in a part - (next-single-property-change - (or (next-single-property-change (point) 'slime-part-number) (point-min)) - 'slime-part-number) - ;; go to the next part or wrap around - (or (next-single-property-change (point) 'slime-part-number) - (next-single-property-change (point-min) 'slime-part-number))))) - (when pos (goto-char pos)))) +(defun slime-inspector-next-inspectable-object (arg) + "Move point to the next inspectable object. +With optional ARG, move across that many objects. +If ARG is negative, move backwards." + (interactive "p") + (or (bobp) (> arg 0) (backward-char)) + (let ((wrapped 0) + (number arg) + (old (get-text-property (point) 'slime-part-number)) + new) + ;; Forward. + (while (> arg 0) + (cond ((eobp) + (goto-char (point-min)) + (setq wrapped (1+ wrapped))) + (t + (goto-char (or (next-single-property-change (point) 'slime-part-number) + (point-max))))) + (and (= wrapped 2) + (eq arg number) + (error "No inspectable objects")) + (let ((new (get-text-property (point) 'slime-part-number))) + (when new + (unless (eq new old) + (setq arg (1- arg)) + (setq old new))))) + ;; Backward. + (while (< arg 0) + (cond ((bobp) + (goto-char (point-max)) + (setq wrapped (1+ wrapped))) + (t + (goto-char (or (previous-single-property-change (point) 'slime-part-number) + (point-min))))) + (and (= wrapped 2) + (eq arg number) + (error "No inspectable objects")) + (let ((new (get-text-property (point) 'slime-part-number))) + (when new + (unless (eq new old) + (setq arg (1+ arg)))))) + (let ((new (get-text-property (point) 'slime-part-number))) + (while (eq (get-text-property (point) 'slime-part-number) new) + (backward-char))) + (forward-char))) + +(defun slime-inspector-previous-inspectable-object (arg) + "Move point to the previous inspectable object. +With optional ARG, move across that many objects. +If ARG is negative, move forwards." + (interactive "p") + (slime-inspector-next-inspectable-object (- arg))) (defun slime-inspector-describe () (interactive) @@ -6909,6 +6959,7 @@ Optionally set point to POINT." ("d" 'slime-inspector-describe) ("q" 'slime-inspector-quit) ("\C-i" 'slime-inspector-next-inspectable-object) + ([(shift tab)] 'slime-inspector-previous-inspectable-object) ("\M-." 'slime-edit-definition)) -- Matthias Koeppe -- http://www.math.uni-magdeburg.de/~mkoeppe

2 2

[slime-devel] Avoid low apply limit
by Eduardo Muñoz 11 Jan '05

11 Jan '05

LispWorks has a low args limit for apply. The following patch (inlined below) avoids landing on sldb when inspecting long lists. I think that its safe to #'nconc (nreverse ... but there isnt a noticeable change of speed or consing so it may be more conservative to just use reduce. Index: swank.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank.lisp,v retrieving revision 1.272 diff -u -r1.272 swank.lisp --- swank.lisp 16 Dec 2004 21:16:50 -0000 1.272 +++ swank.lisp 22 Dec 2004 21:56:41 -0000 @@ -2631,7 +2631,7 @@ (let ((a (if (null l) a (cons (label-value-line :tail l) a)))) - (apply #'append (reverse a))))))) + (reduce #'nconc (nreverse a))))))) (values title (append '("Elements:" (:newline)) lines))))) (cond ((not length) ; circular -- Eduardo Muñoz | (prog () 10 (print "Hello world!") http://213.97.131.125/ | 20 (go 10))

5 6

[slime-devel] Daily ChangeLog diff
by lgorrie＠common-lisp.net 10 Jan '05

10 Jan '05

Index: slime/ChangeLog diff -u slime/ChangeLog:1.594 slime/ChangeLog:1.595 --- slime/ChangeLog:1.594 Tue Dec 21 14:48:40 2004 +++ slime/ChangeLog Mon Jan 10 20:35:07 2005 @@ -1,3 +1,25 @@ +2005-01-10 Utz-Uwe Haus <haus+slime(a)merkur.math.uni-magdeburg.de> + + * swank-sbcl.lisp (profile-package): Add implementation for SBCL. + +2005-01-10 Eduardo Muñoz <emufer(a)terra.es> + + * swank.lisp (inspect-for-emacs-list): LispWorks has a low args + limit for apply: use reduce instead of apply. + +2005-01-10 Helmut Eller <heller(a)common-lisp.net> + + * slime.el (slime-conservative-indentation): The default is now + nil. Suggested by Travis Cross. + +2005-01-10 Matthias Koeppe <mkoeppe+slime(a)merkur.math.uni-magdeburg.de> + + * slime.el (slime-inspector-next-inspectable-object): Accept a + prefix argument and make wrapping around more reliable. The code + is adapted from `widget-move'. + (slime-inspector-previous-inspectable-object): New command. + (slime-inspector-mode-map): Bind to S-TAB. + 2004-12-16 Martin Simmons <martin(a)xanalys.com> * swank-lispworks.lisp (create-socket): Work around bug in

1 0

[slime-devel] unix domain sockets
by Marcus Breiing 10 Jan '05

10 Jan '05

About two weeks ago I asked on IRC whether there was support for using SLIME via unix domains sockets. Someone answererd in the negative, citing lack of unix domain socket support on Emacs as the reason. I later realized that this doesn't really matter, because we should be able to use an arbitrary process object with a suitable external command. I tried it, and it's working very nicely so far, using unixclient path-to-socket ucspi-proxy as a command in a process object on the Emacs side ("unixclient" and "ucspi-proxy" are available in Debian in the ucspi-unix and ucspi-proxy packages.) (A side effect is that we can easily add other components into the communications pipeline. Things I tried successfully: recordio 2>/tmp/slime-io unixclient path-to-socket ucspi-proxy to record communications, and ssh remote-host unixclient path-to-socket ucspi-proxy to use it from a remote machine.) Below is what I hacked into swank.lisp in order to make unix domain sockets work. Instead of adding specific code to create unix domain sockets, I changed setup-server to accept a pre-established socket object. This is a simple change that should allow anyone on a Lisp that supports it to use unix domain sockets without much change to the swank proper. For the Emacs side, I don't have anything resembling useable patches (being a total slime newbie, really). Something along the lines of the above would probably be simplest, i.e. passing an established process object for slime to use. Some necessary changes identified so far seem to be: * changing (eq (process-status conn) 'open) to (memq (process-status conn) '(run open)) in a few places * Avoid trying to get the "port" of a non-network process object. I need to set (setf swank:*use-dedicated-output-stream* nil) to make things work properly. Interaction looks to be fast enough, though. Marcus diff -u slime-1.0-original/swank.lisp slime-1.0/swank.lisp --- slime-1.0-original/swank.lisp Sat Sep 4 18:19:52 2004 +++ slime-1.0/swank.lisp Sat Dec 18 14:09:36 2004 @@ -277,8 +277,10 @@ dont-close) "Start the server and write the listen port number to PORT-FILE. This is the entry point for Emacs." - (setup-server 0 (lambda (port) (announce-server-port port-file port)) - style dont-close)) + (create-swank-server 0 style + (lambda (port) + (announce-server-port port-file port)) + dont-close)) (defun create-server (&key (port default-server-port) (style *communication-style*) @@ -286,37 +288,37 @@ "Start a SWANK server on PORT running in STYLE. If DONT-CLOSE is true then the listen socket will accept multiple connections, otherwise it will be closed after the first." - (setup-server port #'simple-announce-function style dont-close)) + (create-swank-server port style #'simple-announce-function dont-close)) (defun create-swank-server (&optional (port default-server-port) (style *communication-style*) (announce-fn #'simple-announce-function) dont-close) - (setup-server port announce-fn style dont-close)) - -(defparameter *loopback-interface* "127.0.0.1") - -(defun setup-server (port announce-fn style dont-close) - (declare (type function announce-fn)) (let* ((socket (create-socket *loopback-interface* port)) (port (local-port socket))) (funcall announce-fn port) - (ecase style - (:spawn - (spawn (lambda () - (loop do (serve-connection socket :spawn dont-close) - while dont-close)) - :name "Swank")) - ((:fd-handler :sigio) - (add-fd-handler socket - (lambda () - (serve-connection socket style dont-close)))) - ((nil) - (unwind-protect - (loop do (serve-connection socket style dont-close) - while dont-close) - (close-socket socket)))) + (setup-server socket style dont-close) port)) + +(defparameter *loopback-interface* "127.0.0.1") + +(defun setup-server (socket style dont-close) + (declare (type function announce-fn)) + (ecase style + (:spawn + (spawn (lambda () + (loop do (serve-connection socket :spawn dont-close) + while dont-close)) + :name "Swank")) + ((:fd-handler :sigio) + (add-fd-handler socket + (lambda () + (serve-connection socket style dont-close)))) + ((nil) + (unwind-protect + (loop do (serve-connection socket style dont-close) + while dont-close) + (close-socket socket))))) (defun serve-connection (socket style dont-close) (let ((client (accept-connection socket)))

3 3

[slime-devel] Slime (CVS) stopped working with (CVS) Emacs
by R. Mattes 10 Jan '05

10 Jan '05

Hello list, as the subject line already says, my CVS version of slime stopped working with my CVS version of GNU/Emacs. When i invoke slime everything seems to run ok - slime.el gets loaded and the lisp image starts and loads swank. The last thing that happens is that emacs reports the following: ;; Swank started at port: 35154. ; Adding fd handler: 5 Inspecting the open network connections and processes reveals that a lisp image _is_ in fact running and a network connection is open between the image and emacs. But unfortunately when i try to switch to the slime repl emacs reports a 'Not connected'. This happens both with sbcl-0.18 and OpenMCL-0.14.2p. My emacs version is: GNU Emacs 21.3.50.38 (powerpc-unknown-linux-gnu, GTK+ Version 2.4.10) of 2004-12-29 on hobbes Any ideas? I did remove all fasl files. TIA Ralf Mattes

2 2

[slime-devel] profile-package implementation for sbcl [patch included]
by Utz-Uwe Haus 10 Jan '05

10 Jan '05

Hi, I found that the current swank-sbcl.el is missing an implementation for the profile-package functionality. The following code works for me. Later Utz (unfortunately c&p, so please ignore any whitespace troubles in the patch) diff -u -r1.115 swank-sbcl.lisp --- swank-sbcl.lisp 29 Nov 2004 17:35:03 -0000 1.115 +++ swank-sbcl.lisp 7 Jan 2005 09:04:58 -0000 @@ -647,6 +647,11 @@ (defimplementation profiled-functions () (sb-profile:profile)) +(defimplementation profile-package (package callers methods) + (declare (ignore callers methods)) + (eval `(sb-profile:profile ,(package-name (find-package + package))))) + + ;;;; Inspector -- Utz-Uwe Haus haus(a)mail.math.uni-magdeburg.de Inst. f. Mathemat. Optim. utz(a)uuhaus.de Uni Magdeburg PGP keys 1024/6AD23BE1 and 2048/5D0B72A1 GERMANY available via keyservers or email request

2 1

[slime-devel] Minor colourisation problem.
by P.L.Hayes 10 Jan '05

10 Jan '05

Sorry if this is already known - I did look through the list down through last August - only the "for" in "format" is highlighted in a different colour in slime-mode. Happy new year, Paul.

2 1