February 2004 - slime-devel - mailman3.common-lisp.net

[slime-devel] Signal-driven IO in SBCL on non-Linux/x86
by Brian Mastenbrook 21 Feb '04

21 Feb '04

Hello, Have any of the SLIME developers tested the new signal-driven IO at all on non-linux/x86? It seems to be quite thoroughly-broken for me on both Darwin and Solaris: connecting will sometimes hang emacs, once connected messages sometimes need an extra newline to go through, and sending any input at all to the actual SBCL repl once connected causes a major SBCL hang. Is this expected? Will it improve? I never had any problems with the old fd-handler approach. Also, FWIW, it seems someone has changed slime.el such that slime-connect now attempts to connect to localhost no matter what host you supply. Brian -- Brian Mastenbrook bmastenb(a)cs.indiana.edu http://cs.indiana.edu/~bmastenb/

2 3

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 21 Feb '04

21 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.259 slime/ChangeLog:1.260 --- slime/ChangeLog:1.259 Wed Feb 18 14:46:01 2004 +++ slime/ChangeLog Sat Feb 21 02:37:36 2004 @@ -1,3 +1,20 @@ +2004-02-21 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank.lisp (process-available-input): Move auxiliary function to + toplevel. Test if the stream is open. + (install-sigio-handler): Handle the first request after installing + the signal handler. + + * slime.el (slime-keys): Bind C-c C-x t to slime-list-threads and + C-c C-x c to slime-list-connections. + (slime): Disconnect before reconnecting if the inferior-lisp + buffer wasn't renamed. + (slime-connect): Use the host argument and not "localhost". + (slime-compilation-finished): Undo last change. Switch to the + buffer to remove old annotations. + (slime-choose-overlay-region): Ignore errors in + slime-forward-sexp. + 2004-02-18 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * slime.el (slime): Just close the connection when called without

1 0

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 19 Feb '04

19 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.258 slime/ChangeLog:1.259 --- slime/ChangeLog:1.258 Wed Feb 18 02:35:17 2004 +++ slime/ChangeLog Wed Feb 18 14:46:01 2004 @@ -1,3 +1,23 @@ +2004-02-18 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * slime.el (slime): Just close the connection when called without + prefix-argument. Keeping the connection open doesn't make sense. + We could ask if the Lisp process should be killed, though. + (slime-maybe-close-old-connections): Delete unused function. + (slime-start-swank-server): Use comint-send-string instead of + comint-proc-query, 'cause I don't like Olin "100%" Shivers' code. + (slime-init-output-buffer): Show some animations. + (slime-repl-clear-output): Fixed. + (slime-compilation-finished): It's not necessary to switch to the + original buffer, because the buffer is encoded in the + source-locations. + (sldb-show-source): Don't raise an error if the source cannot be + located. Print a message instead, because errors in + process-filters cause a 1 second delay. + + * swank-cmucl.lisp (read-into-simple-string): Workaround for + read-sequence bug in 18e. + 2004-02-18 Peter Seibel <peter(a)javamonkey.com> * swank-loader.lisp: Place the fasl files of different

1 0

[slime-devel] slime choking on large output
by E. Tyurin 18 Feb '04

18 Feb '04

Hi everyone, I have a simple situation where SLIME (under CMUCL) fails - when fed certain (large) input. Need: cl-csv package. Run cmucl from shell: gene@daBox:~$ lisp CMU Common Lisp CVS release-18e-branch + minimal debian patches, running on daBox With core: /usr/lib/cmucl/lisp.core Dumped on: Wed, 2004-02-18 11:30:01-05:00 on daBox For support see http://www.cons.org/cmucl/support.html Send bug reports to the debian BTS. or to pvaneynd(a)debian.org type (help) for help, (quit) to exit, and (demo) to see the demos Loaded subsystems: Python 1.1, target Intel x86 CLOS 18e (based on PCL September 16 92 PCL (f)) * (require 'csv) ; Loading #p"/usr/share/common-lisp/source/csv/csv.asd". ; Loading #p"/usr/lib/common-lisp/cmucl/csv/csv-src.x86f". T * (fare-csv:read-csv-line *terminal-io*) Date,/NGF0,/NGF0,/NGF0,/NGF0,/NGF0,/NGF0,/NGF0,/NGG0,/NGG0,/NGG0,/NGG0,/NGG0,/NGG0,/NGG0,/NGH0,/NGH0,/NGH0,/NGH0,/NGH0,/NGH0,/NGH0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGK0,/NGK0,/NGK0,/NGK0,/NGK0,/NGK0,/NGK0,/NGM0,/NGM0,/NGM0,/NGM0,/NGM0,/NGM0,/NGM0,/NGN0,/NGN0,/NGN0,/NGN0,/NGN0,/NGN0,/NGN0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGU0,/NGU0,/NGU0,/NGU0,/NGU0,/NGU0,/NGU0,/NGV0,/NGV0,/NGV0,/NGV0,/NGV0,/NGV0,/NGV0,/NGX0,/NGX0,/NGX0,/NGX0,/NGX0,/NGX0,/NGX0,/NGZ0,/NGZ0,/NGZ0,/NGZ0,/NGZ0,/NGZ0,/NGZ0 (:|Date| :/NGF0 :/NGF0 :/NGF0 :/NGF0 :/NGF0 :/NGF0 :/NGF0 :/NGG0 :/NGG0 :/NGG0 :/NGG0 :/NGG0 :/NGG0 :/NGG0 :/NGH0 :/NGH0 :/NGH0 :/NGH0 :/NGH0 :/NGH0 :/NGH0 :/NGJ0 :/NGJ0 :/NGJ0 :/NGJ0 :/NGJ0 :/NGJ0 :/NGJ0 :/NGK0 :/NGK0 :/NGK0 :/NGK0 :/NGK0 :/NGK0 :/NGK0 :/NGM0 :/NGM0 :/NGM0 :/NGM0 :/NGM0 :/NGM0 :/NGM0 :/NGN0 :/NGN0 :/NGN0 :/NGN0 :/NGN0 :/NGN0 :/NGN0 :/NGQ0 :/NGQ0 :/NGQ0 :/NGQ0 :/NGQ0 :/NGQ0 :/NGQ0 :/NGU0 :/NGU0 :/NGU0 :/NGU0 :/NGU0 :/NGU0 :/NGU0 :/NGV0 :/NGV0 :/NGV0 :/NGV0 :/NGV0 :/NGV0 :/NGV0 :/NGX0 :/NGX0 :/NGX0 :/NGX0 :/NGX0 :/NGX0 :/NGX0 :/NGZ0 :/NGZ0 :/NGZ0 :/NGZ0 :/NGZ0 :/NGZ0 :/NGZ0) * (quit) As you can see, the function call is completed without any problem. Now, try the same from SLIME: ; CMU Common Lisp Port: (33203 . localhost) Pid: 6518 CL-USER> (require 'csv) ; Loading #p"/usr/share/common-lisp/source/csv/csv.asd". ; Loading #p"/usr/lib/common-lisp/cmucl/csv/csv-src.x86f". T CL-USER> (fare-csv:read-csv-line *terminal-io*) Date,/NGF0,/NGF0,/NGF0,/NGF0,/NGF0,/NGF0,/NGF0,/NGG0,/NGG0,/NGG0,/NGG0,/NGG0,/NGG0,/NGG0,/NGH0,/NGH0,/NGH0,/NGH0,/NGH0,/NGH0,/NGH0,\ /NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGJ0,/NGK0,/NGK0,/NGK0,/NGK0,/NGK0,/NGK0,/NGK0,/NGM0,/NGM0,/NGM0,/NGM0,/NGM0,/NGM0,/NGM0,/NGN0\ ,/NGN0,/NGN0,/NGN0,/NGN0,/NGN0,/NGN0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGQ0,/NGU0,/NGU0,/NGU0,/NGU0,/NGU0,/NGU0,/NGU0,/NGV0,/NGV\ 0,/NGV0,/NGV0,/NGV0,/NGV0,/NGV0,/NGX0,/NGX0,/NGX0,/NGX0,/NGX0,/NGX0,/NGX0,/NGZ0,/NGZ0,/NGZ0,/NGZ0,/NGZ0,/NGZ0,/NGZ0 ; Evaluation aborted CL-USER> And this message shows up in the *inferior-lisp* buffer: * ;; Connection to Emacs lost. ;; [ ; [GC threshold exceeded with 12,319,528 bytes in use. Commencing GC.] ; [GC completed with 1,037,136 bytes retained and 11,282,392 bytes freed.] ; [GC will next occur when at least 13,037,136 bytes are in use.] Error in function COMMON-LISP::ASSERT-ERROR: Short read: length=5910572 pos=28] Any suggestions?? --ET.

2 1

[slime-devel] Missing metering.lisp for CLISP?
by Peter Seibel 18 Feb '04

18 Feb '04

According to the .asd file CLISP needs a file metering.lisp which doesn't seem to exist. Per the ChangeLog this seems to be a third-party library. Are folks supposed to go get in themselves or is it supposed to be included with SLIME? -Peter -- Peter Seibel peter(a)javamonkey.com Lisp is the red pill. -- John Fraser, comp.lang.lisp

3 3

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 18 Feb '04

18 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.256 slime/ChangeLog:1.258 --- slime/ChangeLog:1.256 Mon Feb 16 17:07:39 2004 +++ slime/ChangeLog Wed Feb 18 02:35:17 2004 @@ -1,3 +1,33 @@ +2004-02-18 Peter Seibel <peter(a)javamonkey.com> + + * swank-loader.lisp: Place the fasl files of different + implementations in different directories. + +2004-02-18 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-clisp.lisp: Update comments about metering package. + + * metering.lisp: Imported from CLOCC. Suggested by Peter Seibel. + +2004-02-17 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank.lisp, slime.el (make-compiler-note): Don't send the + short-message across the wire if the slot is nil. + + * swank-cmucl.lisp (clear-xref-info): Compare the truenames with + equalp instead of the unix-truenames. The old version was very + inefficient (clearing the tables with about 1000 entries required + serveral seconds). + (xref-context-derived-from-p, pathname=): Delete unused functions. + + * swank-clisp.lisp (remove-input-handlers): + socket:socket-stream-handle is not available on Windows. + Reported by Alan Shutko. + + * slime.el (slime-length>): New function. + (slime-compiler-notes-to-tree): Don't collapse if there is only + one kind of notes. + 2004-02-16 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * swank.lisp (make-compiler-note): Include short-message.

1 0

[slime-devel] Concurrent multiple slimes with different lisps
by Peter Seibel 18 Feb '04

18 Feb '04

Since I constantly have to move between different Lisp impls to test things out, I'm interested in running multiple SLIME at the same time talking to different implementations. Anyway, as a first step toward making this a bit more sane, here's a patch that changes the way SLIME builds itself so each impl gets its own directory for its fasl files. Or is there some other way I should be doing this? -Peter Index: swank-loader.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-loader.lisp,v retrieving revision 1.16 diff -u -r1.16 swank-loader.lisp --- swank-loader.lisp 5 Feb 2004 05:57:04 -0000 1.16 +++ swank-loader.lisp 17 Feb 2004 22:46:50 -0000 @@ -35,12 +35,27 @@ #+clisp '("xref" "metering" "swank-clisp" "swank-gray") )) +(defparameter *lisp-name* + #+cmu "cmu" + #+sbcl "sbcl" + #+openmcl "openmcl" + #+lispworks "lispworks" + #+allegro "allegro" + #+clisp "clisp") + + (defparameter *swank-pathname* (make-swank-pathname "swank")) (defun file-newer-p (new-file old-file) "Returns true if NEW-FILE is newer than OLD-FILE." (> (file-write-date new-file) (file-write-date old-file))) +(defun binary-pathname (source-pathname) + (merge-pathnames + (make-pathname :directory `(:relative "fasl" ,*lisp-name*)) + (merge-pathnames (compile-file-pathname source-pathname)))) + + (defun compile-files-if-needed-serially (files) "Compile each file in FILES if the source is newer than its corresponding binary, or the file preceding it was @@ -48,14 +63,15 @@ (with-compilation-unit () (let ((needs-recompile nil)) (dolist (source-pathname files) - (let ((binary-pathname (compile-file-pathname source-pathname))) + (let ((binary-pathname (binary-pathname source-pathname))) (handler-case (progn (when (or needs-recompile (not (probe-file binary-pathname)) (file-newer-p source-pathname binary-pathname)) (format t "~&;; Compiling ~A...~%" source-pathname) - (compile-file source-pathname) + (ensure-directories-exist binary-pathname) + (compile-file source-pathname :output-file binary-pathname) (setq needs-recompile t)) (load binary-pathname)) #+(or) -- Peter Seibel peter(a)javamonkey.com Lisp is the red pill. -- John Fraser, comp.lang.lisp

3 3

[slime-devel] CLISP and W32: socket:socket-stream-handle
by Alan Shutko 17 Feb '04

17 Feb '04

Trying the latest CVS slime on W32 with clisp 2.32, I was getting an error that socket:socket-stream-handle wasn't defined. Seems it's not exported on Windows for some reason. Conditionalizing remove-input-handlers made it work for me.... --- swank-clisp.lisp.~1.18.~ 2004-02-16 15:40:55.000000000 -0600 +++ swank-clisp.lisp 2004-02-16 17:45:43.000000000 -0600 @@ -117,6 +117,7 @@ (push (cons fd fn) *sigio-handlers*))) ) +#-win32 (defimplementation remove-input-handlers (socket) (let ((fd (socket:socket-stream-handle socket))) (remove-sigio-handler fd) -- Alan Shutko <ats(a)acm.org> - I am the rocks. Measure with micrometer, mark with chalk, cut with axe

2 1

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 17 Feb '04

17 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.255 slime/ChangeLog:1.256 --- slime/ChangeLog:1.255 Sun Feb 8 15:13:36 2004 +++ slime/ChangeLog Mon Feb 16 17:07:39 2004 @@ -1,3 +1,35 @@ +2004-02-16 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank.lisp (make-compiler-note): Include short-message. + + * swank-sbcl.lisp (signal-compiler-condition): Initialize + short-message slot. + (long-compiler-message-for-emacs): New function. + + * swank-cmucl.lisp (handle-notification-condition): Don't use the + context of the previous message. + (signal-compiler-condition): Set short message slot. + (long-compiler-message-for-emacs): New function. + (sigio-handler): Ignore arguments. + + * swank-clisp.lisp (set-sigio-handler, add-input-handler): + Conditionalize for linux. + + * swank-backend.lisp (compile-system-for-emacs): Add default + implementation. + (compiler-condition): New slot short-message. + + * slime.el (slime-compilation-finished): Display compiler notes + grouped by severity in a separate buffer. + (slime-compilation-finished-continuation, slime-compile-file) + (slime-load-system, slime-compile-string): Update callers. + (slime-list-compiler-notes, slime-alistify, slime-tree-for-note) + (slime-tree-for-severity, slime-compiler-notes-to-tree) + (slime-compiler-notes-mode, slime-compiler-notes-quit): New + functions. + (with-struct, slime-tree): New code for pseudo tree widget. + (slime-init-connection-state): Set slime-state-name to "". + 2004-02-08 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * swank-cmucl.lisp (create-socket): Fix last fix. Use the proper

1 0

[slime-devel] Compiler notes list
by Helmut Eller 16 Feb '04

16 Feb '04

Hi, I added some code to display the compiler messages in a separate buffer. The messages are grouped by severity and displayed in a pseudo tree widget like this: -+ All (7) |-+ Notes (4) | |-- Doing unsigned word to integer coercion (cost 20) from x86::size. | |-- Doing SAP to pointer coercion (cost 20) from x86::current. | |-- Doing unsigned word to integer coercion (cost 20) from x86::size. | `-- Doing SAP to pointer coercion (cost 20) from x86::current. `[+] Warnings (3) This list is currently only displayed when there are 2 or more compiler messages. It's also possible to pop up the list with M-x slime-list-compiler-notes. Maybe we should unify/reuse this list with the xref buffer. Helmut.

1 0

[slime-devel] function CREATE-SWANK-SERVER is undefined
by Geoffrey Knauth 12 Feb '04

12 Feb '04

I'm new to slime. I tried using it with this in my .emacs: (setq inferior-lisp-program "/sw/bin/clisp") ; Platform is Mac OS X (Panther). CLisp is 2.29-13. (add-to-list 'load-path (concat homedir "/el/slime")) (require 'slime) (add-hook 'lisp-mode-hook (lambda () (slime-mode t))) (add-hook 'inferior-lisp-mode-hook (lambda () (inferior-slime-mode t))) M-x slime RET produces: Compiling file /Users/gknauth/el/slime/swank.lisp ... WARNING in function SYMBOL-EXTERNAL-P in lines 701..707 : Binding variable _ can cause side effects despite of IGNORE declaration since it is declared SPECIAL. ;; Loading file /Users/gknauth/el/slime/swank.lisp ... *** - DEFSTRUCT: invalid syntax for name and options: (:LOCATION (:TYPE LIST) :NAMED (:CONSTRUCTOR MAKE-LOCATION (BUFFER POSITION))) 1. Break SWANK[2]> *** - EVAL: the function CREATE-SWANK-SERVER is undefined Am I doing something wrong? Geoffrey -- Geoffrey S. Knauth | http://knauth.org/gsk

2 2

[slime-devel] Why is Slime trying to open port 0?
by Dirk Gerrits 10 Feb '04

10 Feb '04

I don't know exactly when the symptoms started, since I haven't been using SLIME for a while, but a CVS update doesn't make them go away. When I start Emacs and do M-x slime RET it fails trying to connect to port 0 of localhost. I don't understand, since a problem of this magnitude (can't use SLIME at all) would certainly be noticed by others, and I saw no previous posts about this. Presumably it is something peculiar about my configuration. I'm using Debian GNU/Linux 3.0 + 2.6.2 kernel + GNU Emacs 21.3.50.9. If you need more info, just ask. The output is included below. Regards, Dirk Gerrits CMU Common Lisp CVS release-18e-branch + minimal debian patches, running on willow With core: /usr/lib/cmucl/lisp.core Dumped on: Sat, 2004-02-07 00:05:30+01:00 on willow For support see http://www.cons.org/cmucl/support.html Send bug reports to the debian BTS. or to pvaneynd(a)debian.org type (help) for help, (quit) to exit, and (demo) to see the demos Loaded subsystems: Python 1.1, target Intel x86 CLOS 18e (based on PCL September 16 92 PCL (f)) * ; Loading #p"/home/dirk/slime/swank-loader.lisp". ;; Loading #p"/home/dirk/slime/swank-backend.x86f". ;; Loading #p"/home/dirk/slime/swank.x86f". ;; Loading #p"/home/dirk/slime/swank-source-path-parser.x86f". ;; Loading #p"/home/dirk/slime/swank-cmucl.x86f". Warning: DEFIMPLEMENTATION of undefined interface (DESCRIBE-PRIMITIVE-TYPE) Warning: DEFIMPLEMENTATION of undefined interface (INSPECTED-PARTS) Warning: These Swank interfaces are unimplemented: (RESTART-FRAME RETURN-FROM-FRAME THREAD-ALIVE-P WHO-MACROEXPANDS WHO-SPECIALIZES) T * Error in function CREATE-INET-LISTENER: Error binding socket to port 0: Cannot assign requested address Restarts: 0: [ABORT] Return to Top-Level. Debug (type H for help) (CREATE-INET-LISTENER 0 :STREAM :HOST 16777343 ...) Source: ; File: target:code/internet.lisp (ERROR "Error binding socket to port ~a: ~a" PORT (UNIX:GET-UNIX-ERROR-MSG)) 0] :backtrace 0: (CREATE-INET-LISTENER 0 :STREAM :HOST 16777343 ...) 1: ("DEFIMPLEMENTATION CREATE-SOCKET" #<unused-arg> #<unused-arg> 0) 2: (SWANK::SETUP-SERVER 0 #<Closure Over Function "DEFUN START-SERVER" {484ED931}> :SIGIO) 3: (INTERACTIVE-EVAL (SWANK:START-SERVER "/tmp/slime.2936")) 4: (COMMON-LISP::%TOP-LEVEL) 5: (COMMON-LISP::RESTART-LISP) 0]

4 6

Re: [slime-devel] slime/clisp freezes a fresh xemacs
by Helmut Eller 09 Feb '04

09 Feb '04

"<s.perrot(a)voila.fr>" <s.perrot(a)voila.fr> writes: > Does this setting prevent some feature(s) from SLIME to work ? Yes. The dedicated output stream is a performance optimization. It uses a separate socket for raw output. This can be quite a faster than sending output encoded over the control channel. But I remember that I too had some trouble to get it to work with CLISP. Not sure what happened, but the problems magically disappeared for me. There seem to be some oddities in CLISP's streams. Helmut.

1 0

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 08 Feb '04

08 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.247 slime/ChangeLog:1.252 --- slime/ChangeLog:1.247 Thu Feb 5 18:21:12 2004 +++ slime/ChangeLog Sat Feb 7 17:33:02 2004 @@ -1,3 +1,57 @@ +2004-02-07 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-cmucl.lisp (send, receive, interrupt-thread): Implement + more threading functions. + + * swank-sbcl.lisp (inspected-parts): Implemented. + + * slime.el (slime-rex): Mention thread argument in docstring. + (sldb-break-with-default-debugger): Use slime-rex and don't switch + to the output buffer (happens automatically). + (slime-list-threads): Renamed from slime-thread-control-panel. + (slime-thread-insert): Use slightly different layout. + (slime-give-goahead, slime-waiting-threads) + (slime-popup-thread-control-panel, slime-register-waiting-thread) + (slime-thread-goahead): Deleted. + (slime-maybe-start-multiprocessing): Call + swank:startup-multiprocessing. Reported by Paolo Amoroso. + + * swank.lisp (dispatch-event): :debug, :debug-condition, + :debug-activate events were all encoded as :debug events, which + means the debugger never worked! Fix it. I guess no one uses + SLIME with a multithreaded Lisp. + (read-user-input-from-emacs): Flush the output before reading. + (sldb-loop): Add a sldb-enter-default-debugger tag, so we can + enter the default debugger by throwing to it. + (sldb-break-with-default-debugger): Throw to + sldb-enter-default-debugger. + (*thread-list*): New variable. + (list-threads): New function. + + * swank-backend.lisp (thread-name): Take a thread object as + argument. + (thread-status, all-threads, thread-alive-p): New function. + (thread-id): Deleted. + + * swank-allegro.lisp, swank-cmucl.lisp, swank-lispworks.lisp, + swank-openmcl.lisp, swank-sbcl.lisp: Update for modified thread + interface. + + * swank-sbcl.lisp (enable-sigio-on-fd): New function. Use + fallback if sb-posix:fcntl isn't fbound. + + * swank-cmucl.lisp (gf-definition-location): Return an error when + pathname for the GF is nil (this happens if the GF is not compiled + from a file). + + * swank.lisp (undefine-function): New function. + (print-with-frame-label, print-part-to-string): Bind + *print-circle* to t, to avoid unbound recursion when printing + cyclic data structures. + + * slime.el (slime-undefine-function): New command. Bound to C-c + C-u. + 2004-02-06 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * slime.el (sldb-setup): Offer to enter a recursive edit if there

1 0

[slime-devel] Missing STARTUP-MULTIPROCESSING-FOR-EMACS
by Paolo Amoroso 07 Feb '04

07 Feb '04

I have just updated my CVS sources of SLIME after a a dozen days of so. After starting SLIME (GNU Emacs 20.7.2 with CMUCL 18e under Debian Woody), it stops with this error: ; Loading #p"/home/paolo/src/slime/swank-loader.lisp". ;; Loading #p"/home/paolo/src/slime/swank-backend.x86f". ;; Loading #p"/home/paolo/src/slime/swank.x86f". ;; Loading #p"/home/paolo/src/slime/swank-source-path-parser.x86f". ;; Loading #p"/home/paolo/src/slime/swank-cmucl.x86f". Warning: These Swank interfaces are unimplemented: (INTERRUPT-THREAD RECEIVE RESTART-FRAME RETURN-FROM-FRAME SEND THREAD-ALIVE-P WHO-MACROEXPANDS WHO-SPECIALIZES) T * ; ; Warning: This function is undefined: ; SWANK:STARTUP-MULTIPROCESSING-FOR-EMACS Error in KERNEL:%COERCE-TO-FUNCTION: the function SWANK:STARTUP-MULTIPROCESSING-FOR-EMACS is undefined. Restarts: 0: [ABORT] Return to Top-Level. Debug (type H for help) (KERNEL:%COERCE-TO-FUNCTION SWANK:STARTUP-MULTIPROCESSING-FOR-EMACS) Source: Error finding source: Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM: Source file no longer exists: target:code/fdefinition.lisp. 0] SWANK:STARTUP-MULTIPROCESSING-FOR-EMACS does not seem to be defined. What am I missing? Do I have to provide the function or customize SLIME in some way? Paolo -- Why Lisp? http://alu.cliki.net/RtL%20Highlight%20Film

2 1

[slime-devel] slime/clisp freezes a fresh xemacs
by <s.perrot＠voila.fr> 07 Feb '04

07 Feb '04

Hi all, Following recent advices on c.l.l, I just tried a recently downloaded (02/04/04) version of SLIME. I am using it with XEmacs 21.4.12 and clisp 2.32, and I'm getting the following strange behaviour : The first invocation of M-x slime RET in a just started XEmacs freezes it the following sequences of evaluated forms freeze it as weel : (slime-maybe-start-lisp) (slime-read-port-and-connect) or (slime-maybe-start-lisp) (slime-start-swank-server) ;; eval only once ! (setq port (slime-read-swank-port)) (slime-connect "localhost" port) but NOT the following (slime-maybe-start-lisp) (slime-start-swank-server) (setq *proc* (slime-net-connect "localhost" port)) (slime-init-connection *proc*) which works fine (i.e. after evaluating a few more forms I get a fully functional SLIME) In all cases, the lisp is started ok, as is the swank server. The problem seems to me to be located somewhere in the slime-init-connection/slime-net-connect interaction. I tried to put a conditional in slime-connect do process to slime-init-connection only if (slime-net-connect "localhost" port) returns, and to increase the delay between each run-with-timer (the swank server gets started after a good 3-4 seconds) but it didn't seem to help. The XEmacs stack dump I get when killing it is the following : Lisp backtrace follows: # (unwind-protect ...) accept-process-output(nil 0 10000) (while t (accept-process-output nil 0 10000) (when nil (recursive-edit) (error "Evaluation aborted."))) # bind (inhibit-quit debug-on-quit) (let ((debug-on-quit t) (inhibit-quit nil)) (while t (accept-process-output nil 0 10000) (when nil ... ...))) # (catch slime-result-66523 ...) (catch tag (slime-rex (tag sexp) (sexp package) (... ... ...) (... ...)) (let (... ...) (while t ... ...))) # (unwind-protect ...) (unwind-protect (catch tag (slime-rex ... ... ... ...) (let ... ...))) # bind (slime-stack-eval-tags tag) (let* ((tag ...) (slime-stack-eval-tags ...)) (unwind-protect (catch tag ... ...))) # bind (package sexp) slime-eval((swank:getpid)) (let ((--store--66522 ...)) (slime-with-connection-buffer nil (setq slime-pid:connlocal --store--66522) --stor e--66522)) (setf (slime-pid) (slime-eval (quote ...))) # bind (proc) slime-init-connection-state(#<network connection "SLIME Lisp" (1219 . "localhost") state:exit>) # bind (slime-dispatching-connection) (let ((slime-dispatching-connection proc)) (slime-init-connection-state proc) (slime-select-connection proc) p roc) # bind (proc) slime-init-connection(#<network connection "SLIME Lisp" (1219 . "localhost") state:exit>) (progn (message "slime-net-connect succeeded...") (slime-init-connection proc)) (if proc (progn (message "slime-net-connect succeeded...") (slime-init-connection proc))) (when proc (message "slime-net-connect succeeded...") (slime-init-connection proc)) # bind (proc) (let ((proc ...)) (when proc (message "slime-net-connect succeeded...") (slime-init-connection proc))) (when-let (proc (slime-net-connect "localhost" port)) (message "slime-net-connect succeeded...") (slime-init-c onnection proc)) # bind (kill-old-p port host) slime-connect("localhost" 1219) # bind (port) (let ((port ...)) (message "srpac: port read in file: %d" port) (slime-connect "localhost" port)) (cond ((file-exists-p ...) (let ... ... ...)) ((and ... ...) (message "Failed to connect to Swank.")) (t (if . .. ...) (setq slime-connect-retry-timer ...))) # bind (G66513 G66512 G66511) (lambda (G66511 G66512 G66513) (if (active-minibuffer-window) nil (message "Polling %S.. (Abort with `M-x slim e-connection-abort'.)" ...)) (setq slime-state-name (format "[polling:%S]" ...)) (if slime-connect-retry-timer ( cancel-timer slime-connect-retry-timer)) (setq slime-connect-retry-timer nil) (cond (... ...) (... ...) (t ... . ..)))(--G66505-- --attempt-- --retries--) apply((lambda (G66511 G66512 G66513) (if (active-minibuffer-window) nil (message "Polling %S.. (Abort with `M- x slime-connection-abort'.)" ...)) (setq slime-state-name (format "[polling:%S]" ...)) (if slime-connect-retry-t imer (cancel-timer slime-connect-retry-timer)) (setq slime-connect-retry-timer nil) (cond (... ...) (... ...) (t ... ...))) --G66505-- --attempt-- --retries-- nil) # bind (--cl-rest--) (lambda (&rest --cl-rest--) "\nCommon Lisp lambda list:\n (cl-none . NIL)\n\n" (apply (quote ...) (quote --G6 6505--) (quote --attempt--) (quote --retries--) --cl-rest--))() apply((lambda (&rest --cl-rest--) "\nCommon Lisp lambda list:\n (cl-none . NIL)\n\n" (apply (quote ...) (quot e --G66505--) (quote --attempt--) (quote --retries--) --cl-rest--)) nil) # bind (time-elapsed itimers itimer next-wakeup last-event-time this-command inhibit-quit quit-flag current-it imer) # (unwind-protect ...) # bind (match-data) byte-code("..." [this-command inhibit-quit quit-flag match-data itimer current-itimer match-data ((store-match -data match-data)) nil itimer-uses-arguments apply itimer-function itimer-function-arguments last-event-time nex t-wakeup itimers time-elapsed] 5) # (condition-case ... . ((error (byte-code "ÂÃÄ !!#" ... 5)) (quit (byte-code "ÁÂ!\"" ... 4)))) # (unwind-protect ...) # bind (itimers itimer next-wakeup idle-time last-event-time recorded-run-time inhibit-quit time-elapsed) itimer-run-expired-timers(3.000095) # bind (sleep elapsed now itimer-inside-driver inhibit-quit ignored) itimer-timer-driver(nil) # (condition-case ... . error) # (catch top-level ...) The detailed versions involved : > xemacs -V XEmacs 21.4 (patch 12) "Portable Code" [Lucid] (i686-pc-linux) of Tue Oct 21 2003 on titan > clisp --version GNU CLISP 2.32 (2003-12-29) (built 3285056062) (memory 3285056598) Software: GNU C 3.2.3 20030422 (Gentoo Linux 1.4 3.2.3-r1, propolice) Programme en ANSI C Features: (ASDF MK-DEFSYSTEM COMMON-LISP-CONTROLLER CLX-ANSI-COMMON-LISP CLX SYSCALLS CLOS LOOP COMPILER CLISP ANSI-CL COMMON-LISP LISP=CL INTERPRETER SOCKETS GENERIC-STREAMS LOGICAL-PATHNAMES SCREEN FFI GETTEXT UNICODE BASE-CHAR=CHARACTER PC386 UNIX) Installation directory: /usr/lib/clisp/ User language: ENGLISH Machine: I686(I686)titan.si.c-s.fr [172.17.90.32] (build 2.32-r1 from gentoo) System: IBM T20 (PIII 700), gentoo 1.4 Tanks in advance for any help, and for this otherwise already very functional piece of work. Stephane Perrot ------------------------------------------ Faites un voeu et puis Voila ! www.voila.fr

3 3

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 06 Feb '04

06 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.246 slime/ChangeLog:1.247 --- slime/ChangeLog:1.246 Thu Feb 5 02:03:29 2004 +++ slime/ChangeLog Thu Feb 5 18:21:12 2004 @@ -1,3 +1,10 @@ +2004-02-06 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * slime.el (sldb-setup): Offer to enter a recursive edit if there + are pending continuations. + (slime-eval): Unwind the stack, thereby exititing recursive edits, + before signaling the error. + 2004-02-05 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * swank-openmcl.lisp (compile-system-for-emacs): Remove compile

1 0

[slime-devel] OpenMCL and OS X
by David Magda 06 Feb '04

06 Feb '04

[ I'm posting through GMAME (for now), so please CC me. Hopefully SLIME will just work after this so I won't have to bother you again. :> ] I'm having trouble getting SLIME to work with a 'M-x slime'. I get the following error: Welcome to OpenMCL Version (Alpha: Darwin) 0.14-031220! ? ;; Compiling /Users/dmagda/Code/lisp/slime/swank-openmcl.lisp... ; Warning: Interface file #4P"ccl:darwin-headers;libc;functions.cdb" does not exist. ; While executing: CCL::CDB-OPEN Read error between positions 6215 and 6330 in /Users/dmagda/Code/lisp/slime/swank-openmcl.lisp. > Error in process listener(1): Foreign function not found: OS::|tmpnam| > While executing: CCL::LOAD-EXTERNAL-FUNCTION > Type :POP to abort. Type :? for other options. I've download the "jaguar-interfaces" (assuming it will work under Panther (10.3.2)). I've put everything in "/Users/dmagda/Code/ccl". Here's the directory listing: gandalf:~/Code/ccl> ls LGPL ccl/ doc/ dppccl.image LICENSE darwin-headers/ dppccl* scripts/ The "CCL_DEFA..." directory is set as: CCL_DEFAULT_DIRECTORY=/Users/dmagda/Code/ccl Any suggestions?

2 4

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 05 Feb '04

05 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.243 slime/ChangeLog:1.246 --- slime/ChangeLog:1.243 Mon Feb 2 02:31:29 2004 +++ slime/ChangeLog Thu Feb 5 02:03:29 2004 @@ -1,3 +1,40 @@ +2004-02-05 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-openmcl.lisp (compile-system-for-emacs): Remove compile + time dependency on ASDF. + +2004-02-05 Wolfgang Jenkner <wjenkner(a)inode.at> + + * swank-clisp.lisp, swank-loader.lisp: Add profiling support via + Kantrowitz's metering package. Reporting needs to be + refined (profile-package currently ignores callers-p and methods). + +2004-02-04 Bryan O'Connor <bryan-slime(a)lunch.org> + + * swank-openmcl.lisp (mailbox): Use a semaphore instead of + process-wait. Works better with native threads. + +2004-02-04 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-backend.lisp (debugger-info-for-emacs): Export it. + + * swank-sbcl.lisp (add-input-handler): Use fcntl from the sb-posix + package. + + * swank.lisp (sldb-loop, dispatch-event, send-to-socket-io): Send + a :debug-activate event instead of a :debug event (to avoid + sending a potentially long backtrace each time). + (handle-sldb-condition): Include the thread-id in the message. + + * slime.el (slime-path): Use load-file-name as fallback. + Suggested by Lawrence Mitchell. + (slime-dispatch-event): Add support for :debug-activate event. + (sldb-activate): New function. + (sldb-mode): make-local-hook doesn't seem to work in Emacs 20. + Use a buffer local variable instead. + (slime-list-connections): Don't print Lisp's state. + (slime-short-state-name): Deleted. + 2004-02-02 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> * slime.el (slime-debugger): The customization group is called

1 0

[slime-devel] patch for openmcl backend
by bryan o'connor 04 Feb '04

04 Feb '04

the openmcl backend was using ccl:process-wait for the control thread which would spike cpu usage while idling. (and more annoyingly cause the fans on my powerbook to spin up) i added a semaphore and use that instead to signal new data to be received. ...bryan Index: swank-openmcl.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-openmcl.lisp,v retrieving revision 1.58 diff -u -r1.58 swank-openmcl.lisp --- swank-openmcl.lisp 31 Jan 2004 15:07:35 -0000 1.58 +++ swank-openmcl.lisp 4 Feb 2004 21:38:13 -0000 @@ -590,6 +590,7 @@ (defstruct (mailbox (:conc-name mailbox.)) (mutex (ccl:make-lock "thread mailbox")) + (semaphore (ccl:make-semaphore)) (queue '() :type list)) (defimplementation spawn (fn &key name) @@ -640,11 +641,12 @@ (mutex (mailbox.mutex mbox))) (ccl:with-lock-grabbed (mutex) (setf (mailbox.queue mbox) - (nconc (mailbox.queue mbox) (list message)))))) + (nconc (mailbox.queue mbox) (list message))) + (ccl:signal-semaphore (mailbox.semaphore mbox))))) (defimplementation receive () (let* ((mbox (mailbox ccl:*current-process*)) (mutex (mailbox.mutex mbox))) - (ccl:process-wait "receive" #'mailbox.queue mbox) + (ccl:wait-on-semaphore (mailbox.semaphore mbox)) (ccl:with-lock-grabbed (mutex) (pop (mailbox.queue mbox)))))

2 1

[slime-devel] Problem with Slime and packages
by Gary King 02 Feb '04

02 Feb '04

Is there a way to change packages in the SLIME REPL. If I do: CL-USER> (in-package eksl-builder) #<Package "EKSL-BUILDER"> CL-USER> *package* #<Package "COMMON-LISP-USER"> CL-USER> (This is using either SBCL or OpenMCL). Thanks, -- Gary Warren King, Lab Manager EKSL East, University of Massachusetts * 413 577 0176 All are equal before the law and are entitled without any discrimination to equal protection of the law. All are entitled to equal protection against any discrimination in violation of this Declaration and against any incitement to such discrimination. -- Universal Declaration of Human Rights, Article 7

2 1

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 02 Feb '04

02 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.242 slime/ChangeLog:1.243 --- slime/ChangeLog:1.242 Sat Jan 31 15:23:57 2004 +++ slime/ChangeLog Mon Feb 2 02:31:29 2004 @@ -1,3 +1,11 @@ +2004-02-02 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * slime.el (slime-debugger): The customization group is called + 'slime-debugger', fix referrers. Reported by Jouni K Seppanen. + + * swank.lisp (simple-break): Bind *debugger-hook* before invoking + the debugger. Reported by Michael Livshin. + 2004-01-31 Robert E. Brown <bbrown(a)speakeasy.net> * swank-sbcl.lisp, swank.lisp: Add more type declarations and @@ -7,7 +15,6 @@ * slime.el (slime-path): Placed inside an eval-and-compile. Works around some problems when byte-compiling slime-changelog-date. - (slime-swank-connection-retries): 2004-01-31 Marco Baringer <mb(a)bese.it> @@ -26,7 +33,7 @@ 2004-01-31 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> - * Merge stateless-emacs branch into main trunk. We use now signal + Merge stateless-emacs branch into main trunk. We use now signal driven IO for CMUCL and one thread per request for multithreaded Lisps.

1 0

[slime-devel] eval-string bug?
by Alan Ruttenberg 02 Feb '04

02 Feb '04

Looks like macroexpand and other uses of eval-string don't read in the right package. BTW, I've run into a limitation of the current multiprocessing scheme. E.g. if you have a single repl that is busy then you can't meta-point or macroexpand. Was the creation of a dedicated control stream considered and rejected? It would be useful to have a guaranteed connection from emacs to the lisp - another use would be to have the control stream use process-interrupt instead of relying on sigint getting to the correct thread. -Alan

4 19

[slime-devel] Slime customization groups
by Jouni K Seppanen 02 Feb '04

02 Feb '04

In slime.el, two customization groups are defined: | (defgroup slime nil | "Interfaction with the Superior Lisp Environment." | :prefix "slime-" | :group 'applications) | (defgroup slime-debugger nil | "Backtrace options and fontification." | :prefix "sldb-" | :group 'slime) However, all debugger-related options belong to group sldb, not slime-debugger, e.g.: | (defcustom sldb-enable-styled-backtrace t "Enable faces in slime backtrace" | :type '(choice | (const :tag "Enable" t) | (const :tag "Disable" nil)) | :group 'sldb) The result is that the slime group has a link to the slime-debugger group, which is empty, and to customize the debugger options one has to invoke (customize-group 'sldb) directly. It seems to me that either the group on all these options should be changed to slime-debugger, or the group slime-debugger should be renamed to sldb. -- Jouni K Seppänen

2 1

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 01 Feb '04

01 Feb '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.237 slime/ChangeLog:1.242 --- slime/ChangeLog:1.237 Thu Jan 29 03:42:36 2004 +++ slime/ChangeLog Sat Jan 31 15:23:57 2004 @@ -1,3 +1,41 @@ +2004-01-31 Robert E. Brown <bbrown(a)speakeasy.net> + + * swank-sbcl.lisp, swank.lisp: Add more type declarations and + detect missing initargs for the connection struct. + +2004-01-31 Jouni K Seppanen <jks(a)iki.fi> + + * slime.el (slime-path): Placed inside an eval-and-compile. Works + around some problems when byte-compiling slime-changelog-date. + (slime-swank-connection-retries): + +2004-01-31 Marco Baringer <mb(a)bese.it> + + * swank-openmcl.lisp: remove defslimefun-unimplemented forms. + (call-with-compilation-hooks, compile-system-for-emacs): Implement + them. + (compile-file-for-emacs, compile-string-for-emacs): Use + with-compilation-hooks. + (list-callers): Define with defimplementation and not defslimefun. + + * swank-backend.lisp (compile-system-for-emacs): Declare method + as part of the interface. + + * slime.el (slime-find-asd): Handle files whose directory does + not contain an asdf system definition. + +2004-01-31 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * Merge stateless-emacs branch into main trunk. We use now signal + driven IO for CMUCL and one thread per request for multithreaded + Lisps. + +2004-01-31 Robert E. Brown <bbrown(a)speakeasy.net> + + * swank-backend.lisp, swank-sbcl.lisp, + swank-source-path-parser.lisp, swank.lisp: Add type declarations + to keep SBCL quiet. + 2004-01-29 Michael Weber <michaelw+slime(a)foldr.org> * slime.el, swank-backend.lisp, swank-cmucl.lisp, swank-sbcl.lisp,

1 0