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

[slime-devel] cutting and pasting S-expressions from buffer to REPL
by Faheem Mitha 27 Dec '14

27 Dec '14

Hello everyone, I've recently started using SLIME with SBCl on Debian, where SLIME defaults to using SBCL, at least when it is installed. So far I am very impressed. I haven't been able to take off and fly yet, but I'm on the runway.:-) I'm particularly impressed by the underlining source which has compile errors, and doing a popup on mouseover feature. I don't know whose idea this was, but it is pretty damn cool. Does anyone know the history of this feature? So, I have a question about SLIME. When debugging, or indeed otherwise, I find it useful to copy and paste S-expressions from a buffer to the REPL. I've been using the mouse for this, which is decidedly sub-optimal. I hate using the mouse. I was thinking that it would be handy to have a command which would copy and paste S-expressions from a buffer to the REPL, while at the same time switching the buffer to the REPL. The S-expression would be chosen by having the cusor to the right of the closing expression. I'm not sure if this position has a name. I don't know if this command already exists. I could not find it in the manual. If it doesn't, could someone tell me what code would tell emacs to do this? My knowledge of Emacs programming is non-existent. Please CC me on any reply. Thanks. Regards, Faheem

6 14

[slime-devel] Daily ChangeLog diff
by Helmut Eller 21 Feb '13

21 Feb '13

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2393 slime/ChangeLog:1.2394 --- slime/ChangeLog:1.2393 Tue Feb 12 23:27:14 2013 +++ slime/ChangeLog Wed Feb 20 09:33:14 2013 @@ -1,3 +1,10 @@ +2013-02-20 Stas Boukarev <stassats(a)gmail.com> + + * slime.el (slime-attempt-connection): Don't run the timer with a + repeat argument, slime-attempt-connection will reinstantiate the + timer if needed, otherwise it can be a possible source of race + conditions. + 2013-02-13 Helmut Eller <heller(a)common-lisp.net> * swank-allegro.lisp (eval-in-frame): debugger:frame-var-name can

1 0

[slime-devel] ECL's (ext:system) not working
by Peter Münster 17 Feb '13

17 Feb '13

Hi, What could I do please to make (ext:system) work with slime? No problem with CLISP's (ext:shell). No problem with ECL's (ext:system) outside of slime. But when evaluating `(ext:system "ls")' in slime, I get this error: --8<---------------cut here---------------start------------->8--- :INPUT argument to RUN-PROGRAM does not have a file handle: #<a SWANK-BACKEND::SLIME-INPUT-STREAM> [Condition of type SIMPLE-ERROR] Restarts: 0: [RETRY] Retry SLIME interactive evaluation request. 1: [*PROCESS-INPUT] Continue reading input. 2: [ABORT] Return to SLIME's top level. 3: [CLOSE-CONNECTION] Close SLIME connection. 4: [RESTART-TOPLEVEL] Go back to Top-Level REPL. Backtrace: 0: DEBUG-IN-EMACS 1: INVOKE-SLIME-DEBUGGER 2: G954 3: CALL-WITH-DEBUGGER-HOOK 4: SWANK-DEBUGGER-HOOK 5: #<bytecompiled-function BYTECODES> 6: EVAL-REGION 7: G830 8: CALL-WITH-RETRY-RESTART 9: G829 10: CALL-WITH-BUFFER-SYNTAX 11: INTERACTIVE-EVAL-REGION 12: #<bytecompiled-function BYTECODES> 13: EVAL-FOR-EMACS 14: PROCESS-REQUESTS 15: G348 16: HANDLE-REQUESTS 17: G621 18: CALL-WITH-BINDINGS 19: REPL-INPUT-STREAM-READ 20: G613 21: G227 22: CALL-WITH-LOCK-HELD 23: G226 24: SIMPLE-REPL 25: G570 26: G561 27: CALL-WITH-USER-BREAK-HANDLER 28: G558 29: CALL-WITH-DEBUGGER-HOOK 30: G602 31: CALL-WITH-BINDINGS 32: SIMPLE-SERVE-REQUESTS 33: SERVE-REQUESTS 34: ACCEPT-CONNECTIONS 35: SERVE 36: SERVE-LOOP 37: SETUP-SERVER 38: START-SERVER 39: #<bytecompiled-function BYTECODES> 40: #<bytecompiled-function BYTECODES> 41: NIL --8<---------------cut here---------------end--------------->8--- Using latest cvs slime and latest git ecl. TIA for any help, -- Peter

3 2

[slime-devel] Problem with swank-arglists
by Robert Goldman 13 Feb '13

13 Feb '13

I was trying to start up a newly-pulled (from git) slime, and it crashed on both SBCL and ACL. The problem was that the slime-arglists contrib was trying to initialize itself before swank-repl was loaded, and it was calling swank:create-repl. When I added (swank-require :swank-repl) to the head of swank-arglists.lisp, that fixed the problem. Cheers, r

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 13 Feb '13

13 Feb '13

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2392 slime/ChangeLog:1.2393 --- slime/ChangeLog:1.2392 Fri Feb 8 06:11:34 2013 +++ slime/ChangeLog Tue Feb 12 23:27:14 2013 @@ -1,3 +1,12 @@ +2013-02-13 Helmut Eller <heller(a)common-lisp.net> + + * swank-allegro.lisp (eval-in-frame): debugger:frame-var-name can + return nil; ignore those vars. + + * slime.el (sldb-setup): Allegro somehow managed to enter sldb at + the same level twice. Add an assertion that checks that the + condition is the same if sldb-level is the same as last time. + 2013-02-08 Helmut Eller <heller(a)common-lisp.net> * swank-lispworks.lisp (frame-package): Implemented. Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.571 slime/contrib/ChangeLog:1.572 --- slime/contrib/ChangeLog:1.571 Sun Feb 10 11:29:30 2013 +++ slime/contrib/ChangeLog Tue Feb 12 23:45:03 2013 @@ -1,3 +1,12 @@ +2013-02-13 Helmut Eller <heller(a)common-lisp.net> + + * swank-kawa.scm (listener-loop): Use close-port instead of + close-output-port. close-output-port startet to signal errors in + recent versions. + (listener): Stop taking stack-snapshots on caught exceptions as + it's too slow. It was always expensive and in Java7 it's + unbearably slow. + 2013-02-10 Stas Boukarev <stassats(a)gmail.com> * slime-repl.el (slime-open-stream-to-lisp): Use current

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 11 Feb '13

11 Feb '13

Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.570 slime/contrib/ChangeLog:1.571 --- slime/contrib/ChangeLog:1.570 Sun Feb 3 04:13:42 2013 +++ slime/contrib/ChangeLog Sun Feb 10 11:29:30 2013 @@ -1,3 +1,8 @@ +2013-02-10 Stas Boukarev <stassats(a)gmail.com> + + * slime-repl.el (slime-open-stream-to-lisp): Use current + connection host instead of slime-lisp-host. + 2013-02-03 Stas Boukarev <stassats(a)gmail.com> * swank-sprof.lisp (pretty-name): Better frame names.

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 09 Feb '13

09 Feb '13

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2390 slime/ChangeLog:1.2392 --- slime/ChangeLog:1.2390 Sat Feb 2 02:11:16 2013 +++ slime/ChangeLog Fri Feb 8 06:11:34 2013 @@ -1,3 +1,16 @@ +2013-02-08 Helmut Eller <heller(a)common-lisp.net> + + * swank-lispworks.lisp (frame-package): Implemented. + (function-name-package): New. + +2013-02-08 Helmut Eller <heller(a)common-lisp.net> + + * swank-allegro.lisp (handle-compiler-warning): Ignore "Closure + will be stack allocated" notes. Those are harmless and there are + too many of them. + (pc-source-location, ldb-code-to-src-loc): Handle case when + excl::ldb-code-pc returns nil. + 2013-02-02 Stas Boukarev <stassats(a)gmail.com> * swank-backend.lisp (type-specifier-p): New.

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 04 Feb '13

04 Feb '13

Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.569 slime/contrib/ChangeLog:1.570 --- slime/contrib/ChangeLog:1.569 Sat Feb 2 02:11:17 2013 +++ slime/contrib/ChangeLog Sun Feb 3 04:13:42 2013 @@ -1,3 +1,7 @@ +2013-02-03 Stas Boukarev <stassats(a)gmail.com> + + * swank-sprof.lisp (pretty-name): Better frame names. + 2013-02-02 Stas Boukarev <stassats(a)gmail.com> * swank-util.lisp (symbol-classification-string): Use

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 02 Feb '13

02 Feb '13

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2389 slime/ChangeLog:1.2390 --- slime/ChangeLog:1.2389 Sat Jan 12 04:32:20 2013 +++ slime/ChangeLog Sat Feb 2 02:11:16 2013 @@ -1,3 +1,8 @@ +2013-02-02 Stas Boukarev <stassats(a)gmail.com> + + * swank-backend.lisp (type-specifier-p): New. + Implement it for ACL, ECL, CCL, Clisp, SBCL, LW. + 2013-01-12 Stas Boukarev <stassats(a)gmail.com> * swank-backend.lisp: Add a couple of ignore declarations. Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.566 slime/contrib/ChangeLog:1.569 --- slime/contrib/ChangeLog:1.566 Fri Feb 1 02:03:41 2013 +++ slime/contrib/ChangeLog Sat Feb 2 02:11:17 2013 @@ -1,5 +1,17 @@ +2013-02-02 Stas Boukarev <stassats(a)gmail.com> + + * swank-util.lisp (symbol-classification-string): Use + type-specifier-p. + + * swank-fuzzy.lisp: Allow NIL to be completed, don't confuse with + it package: + 2013-02-01 Stas Boukarev <stassats(a)gmail.com> + * slime-asdf.el (slime-determine-asdf-system): Don't call + slime-to-lisp-filename on NIL. + Reported by Tamas Papp. + * swank-asdf.lisp (asdf-determine-system): Return the name of a system. Reported by Tamas Papp.

1 0

[slime-devel] slime-rgrep-system leads to invalid packet
by Tamas Papp 01 Feb '13

01 Feb '13

Hi, I am using the latest slime (from cvs), sbcl 1.1.4 (but the same thing happens with 1.1.3), GNU Emacs 24.2.1 (x86_64-pc-linux-gnu, GTK+ Version 3.4.2) of 2013-01-20 on trouble, modified by Debian. When I call slime-rgrep-system, I get an error message that looks like this: Invalid read syntax: "#" in packet: (:return (:ok #<asdf:system "array-operations">) 367) Then I am offered the choice of skipping the packet or entering the debugger. The latter gives: Debugger entered--Lisp error: (invalid-read-syntax "#") (progn (debug (quote error) error)) (if (y-or-n-p "Enter debugger instead? ") (progn (debug (quote error) error))) (when (y-or-n-p "Enter debugger instead? ") (debug (quote error) error)) (cond ((y-or-n-p "Skip this packet? ") (\` (:emacs-skipped-packet (\, packet)))) (t (when (y-or-n-p "Enter debugger instead? ") (debug (quote error) error)) (signal (car error) (cdr error)))) (let ((packet (buffer-string))) (slime-with-popup-buffer ((slime-buffer-name :error)) (princ (format "%s\nin packet:\n%s" (error-message-string error) packet)) (goto-char (point-min))) (cond ((y-or-n-p "Skip this packet? ") (\` (:emacs-skipped-packet (\, packet)))) (t (when (y-or-n-p "Enter debugger instead? ") (debug (quote error) error)) (signal (car error) (cdr error))))) slime-handle-net-read-error((invalid-read-syntax "#")) slime-net-read() (condition-case error (slime-net-read) (error (slime-net-close process t) (error "net-read error: %S" error))) slime-net-read-or-lose(#<process SLIME Lisp>) slime-process-available-input(#<process SLIME Lisp>) slime-net-filter(#<process SLIME Lisp> "000035(:return (:ok #<asdf:system \"array-operations\">) 367)") accept-process-output(nil 0.01) (cond (slime-accept-process-output-supports-floats (accept-process-output process timeout)) (t (accept-process-output process (if timeout (truncate timeout)) (if timeout (truncate (* timeout 1000000)))))) slime-accept-process-output(nil 0.01) (while t (unless (eq (process-status conn) (quote open)) (error "Lisp connection closed unexpectedly")) (slime-accept-process-output nil 0.01)) (let ((debug-on-quit t) (inhibit-quit nil) (conn (slime-connection))) (while t (unless (eq (process-status conn) (quote open)) (error "Lisp connection closed unexpectedly")) (slime-accept-process-output nil 0.01))) (catch tag (slime-rex (tag sexp) (sexp package) ((:ok value) (unless (member tag slime-stack-eval-tags) (error "Reply to canceled synchronous eval request tag=%S sexp=%S" tag sexp)) (throw tag (list (function identity) value))) ((:abort _condition) (throw tag (list (function error) "Synchronous Lisp Evaluation aborted")))) (let ((debug-on-quit t) (inhibit-quit nil) (conn (slime-connection))) (while t (unless (eq (process-status conn) (quote open)) (error "Lisp connection closed unexpectedly")) (slime-accept-process-output nil 0.01)))) (apply (function funcall) (catch tag (slime-rex (tag sexp) (sexp package) ((:ok value) (unless (member tag slime-stack-eval-tags) (error "Reply to canceled synchronous eval request tag=%S sexp=%S" tag sexp)) (throw tag (list (function identity) value))) ((:abort _condition) (throw tag (list (function error) "Synchronous Lisp Evaluation aborted")))) (let ((debug-on-quit t) (inhibit-quit nil) (conn (slime-connection))) (while t (unless (eq (process-status conn) (quote open)) (error "Lisp connection closed unexpectedly")) (slime-accept-process-output nil 0.01))))) (let* ((tag (gensym (format "slime-result-%d-" (1+ (slime-continuation-counter))))) (slime-stack-eval-tags (cons tag slime-stack-eval-tags))) (apply (function funcall) (catch tag (slime-rex (tag sexp) (sexp package) ((:ok value) (unless (member tag slime-stack-eval-tags) (error "Reply to canceled synchronous eval request tag=%S sexp=%S" tag sexp)) (throw tag (list (function identity) value))) ((:abort _condition) (throw tag (list (function error) "Synchronous Lisp Evaluation aborted")))) (let ((debug-on-quit t) (inhibit-quit nil) (conn (slime-connection))) (while t (unless (eq (process-status conn) (quote open)) (error "Lisp connection closed unexpectedly")) (slime-accept-process-output nil 0.01)))))) slime-eval((swank:asdf-determine-system "/home/tamas/src/lisp/array-operations/src/transformations.lisp" "#:array-operations")) slime-determine-asdf-system("/home/tamas/src/lisp/array-operations/src/transformations.lisp" "#:array-operations") (if determine-default-accurately (slime-determine-asdf-system (buffer-file-name) (slime-current-package)) (slime-find-asd-file (or default-directory (buffer-file-name)) system-names)) (or default-value (if determine-default-accurately (slime-determine-asdf-system (buffer-file-name) (slime-current-package)) (slime-find-asd-file (or default-directory (buffer-file-name)) system-names))) (let* ((completion-ignore-case nil) (prompt (or prompt "System")) (system-names (slime-eval (\` (swank:list-asdf-systems)))) (default-value (or default-value (if determine-default-accurately (slime-determine-asdf-system (buffer-file-name) (slime-current-package)) (slime-find-asd-file (or default-directory (buffer-file-name)) system-names)))) (prompt (concat prompt (if default-value (format " (default `%s'): " default-value) ": ")))) (completing-read prompt (slime-bogus-completion-alist system-names) nil nil nil (quote slime-system-history) default-value)) slime-read-system-name(nil nil t) (list (slime-read-system-name nil nil t) (grep-read-regexp)) (progn (grep-compute-defaults) (list (slime-read-system-name nil nil t) (grep-read-regexp))) call-interactively(slime-rgrep-system t nil) execute-extended-command(nil) call-interactively(execute-extended-command nil nil) Please let me know if I can provide any other useful information. Best, Tamas

2 3