March 2009 - slime-devel - mailman3.common-lisp.net

Re: [slime-devel] random returning the same value
by Tobias C. Rittweiler 01 Dec '09

01 Dec '09

Patrick May <pjm(a)spe.com> writes: > Hi, > > I'm using Slime in Aquamacs with CCL. When I evaluate (random > 100) repeatedly in CCL started from a shell, I get a randomly > generated number between 0 and 99 inclusive. When I do the same with > C-x C-e within Slime, I get the same number every time. (random 100 > (make- > random-state)) gives the same behavior, but (random 100 (make-random- > state t)) works properly. > > Is Slime caching something or have I hosed up my environment? Sorry for the late response. CCL's swank backend uses threads by default, and threads inherit values from the global environment. *RANDOM-STATE* probably becomes thread-local automatically in CCL, resulting in the behaviour you described. It should work when you type in the form at the Slime REPL which evaluates all forms in the same thread. -T.

4 4

[slime-devel] Slime contrib for completion via company-mode
by Ole Arndt 03 May '09

03 May '09

Hello, here is a slime contrib I use for completion in slime via company-mode (see http://www.emacswiki.org/emacs/CompanyMode) It provides an automatic, timer based completion popup at point and scores high in the eye candy department. Ole -- Ole Arndt http://www.sugarshark.com ;;; slime-company.el --- slime completion backend for company mode ;; ;; Copyright (C) 2009 Ole Arndt ;; ;; Author: Ole Arndt <ole(a)sugarshark.com> ;; Keywords: convenience, lisp, abbrev ;; ;; This program is free software; you can redistribute it and/or modify ;; it under the terms of the GNU General Public License as published by ;; the Free Software Foundation, either version 3 of the License, or ;; (at your option) any later version. ;; ;; This program is distributed in the hope that it will be useful, ;; but WITHOUT ANY WARRANTY; without even the implied warranty of ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the ;; GNU General Public License for more details. ;; ;; You should have received a copy of the GNU General Public License ;; along with this program. If not, see <http://www.gnu.org/licenses/>. ;; ;;; Commentary: ;; ;; This is a backend implementation for the completion package ;; company-mode by Nikolaj Schumacher. More info about this package ;; is available at http://nschum.de/src/emacs/company-mode ;; Company-mode is also available at the ELPA http://tromey.com/elpa ;; ;; The backend is installed into the list of company-backends, but ;; you have to enable company-mode manually (or in lisp-mode-hook). ;; ;;; Installation: ;; ;; Add this to your .emacs: ;; ;; (add-to-list 'load-path "<directory-of-this-file>") ;; (add-hook 'slime-load-hook (lambda () (require 'slime-company))) ;; ;; or use: (slime-setup 'slime-fancy 'slime-company) ;; ;; I also have the following, IMO more convenient keybindings for ;; company mode in my .emacs: ;; ;; (define-key company-active-map (kbd "\C-n") 'company-select-next) ;; (define-key company-active-map (kbd "\C-p") 'company-select-previous) ;; (define-key company-active-map (kbd "\C-d") 'company-show-doc-buffer) ;; (define-key company-active-map (kbd "\C-v") 'company-show-location) ;; (define-key company-active-map (kbd "<tab>") 'company-complete) ;; (define-key company-active-map (kbd "\C-g") '(lambda () ;; (interactive) ;; (company-abort))) ;; ;;; Code: (require 'company) (defun slime-company-backend (command &optional arg &rest ignored) (case command ('prefix (and (eq (derived-mode-p 'lisp-mode) 'lisp-mode) (company-grab-lisp-symbol))) ('candidates (first (slime-simple-completions arg))) ('meta (let ((arglist (slime-eval `(swank:arglist-for-echo-area (quote ((,arg))))))) (when arglist (slime-fontify-string arglist)))) ('doc-buffer (let ((doc (slime-eval `(swank:describe-symbol ,arg)))) (with-current-buffer (company-doc-buffer) (insert doc) (goto-char (point-min)) (current-buffer)))) ('location nil) ('sorted nil))) (add-to-list 'company-backends 'slime-company-backend) (provide 'slime-company) ;;; slime-company.el ends here

2 1

[slime-devel] swank-compile-file
by Stas Boukarev 30 Apr '09

30 Apr '09

swank-compile-file on sbcl doesn't load compiled file if compile-file returns T for failure-p, i.e. if there is only one warning the whole file won't be loaded. I find this behaviour undesirable, especially during development. And C-c C-c does load piece of code with such warning. -- With best regards, Stas.

2 1

[slime-devel] patch for a glitch in swank-sbcl.lisp
by Philipp Matthias Schäfer 04 Apr '09

04 Apr '09

Hi, I slime-compile-and-load-file'ed a buffer which contains an expression (load (compile "otherfile.lisp")) and the compilation of the buffer itself worked flawlessly, about which the minibuffer informed me correctly. However since I had my slime-repl buffer not in the foreground I didn't notice that the compilation of otherfile.lisp actually failed. Looking at the source for my backend (sbcl) I noticed that the swank-compile-file function in swank-sbcl.lisp returns just nil in the event of a sb-c:fatal-compiler-error condition, whereas normally the function returns true as a third value in case the compilation did not succeed. This is a problem, since compile-file-for-emacs which calls swank-compile now gets the default value nil as a third return value, which is supposed to signify success. The following patch fixes the problem, that is, a buffer with the debugger is presented to me, which is the same behavior I get when calling slime-load-file after slime-compile-file. --- swank-sbcl.lisp 7 Mar 2009 19:08:03 -0000 1.237 +++ swank-sbcl.lisp 25 Mar 2009 21:02:23 -0000 @@ -512,7 +512,7 @@ (source-cache-get input-file (file-write-date input-file)) (not (load output-file)))))) - (sb-c:fatal-compiler-error () nil))) + (sb-c:fatal-compiler-error () (value nil nil t)))) ;;;; compile-string Regards. Philipp

2 1

[slime-devel] slime-inspector-copy-down
by Chaitanya Gupta 04 Apr '09

04 Apr '09

Hello, The function slime-inspector-copy-down (bound to M-RET in the inspector) in slime.el has been commented out in cvs for some time. Is it going to be "uncommented" and brought back to life? Or is there an alternative function to do the same thing? Chaitanya

2 1

[slime-devel] slime+sbcl+emacs on windows
by Andrey P. 31 Mar '09

31 Mar '09

I have problem with repl on emacs: after run slime, before restarting repl on condition, all output prints on emacs buffer *inferior-lisp*. Example: *slime-repl* ; SLIME - ChangeLog file not found CL-USER> (format t "df") NIL CL-USER> *inferior-lisp* ;; Swank started at port: 1556. CL-USER> df Then in repl I activated condition: *slime-repl* CL-USER> df *sldb* The variable DF is unbound. [Condition of type UNBOUND-VARIABLE] Restarts: 0: [RETRY] Retry SLIME REPL evaluation request. 1: [ABORT] Return to SLIME's top level. 2: [ABORT] Abort 3: [CLOSE-CONNECTION] Close SLIME connection 4: [ABORT] Exit debugger, returning to top level. Backtrace: 0: (SB-INT:SIMPLE-EVAL-IN-LEXENV DF #<NULL-LEXENV>) --more-- only after choosing restart 2 repl acquire desired behaviour: *slime-repl* CL-USER> df ; Evaluation aborted. CL-USER> (format t "df") df NIL CL-USER> used soft: Win XP GNU Emacs 22.2.1 SBCL 1.0.22 slime cvs snapshot on 27.03.2009

1 0

[slime-devel] Slime + mit-scheme + MacOS
by Nunez Steve 31 Mar '09

31 Mar '09

G'Day All, Does anyone here know of any pointers to getting Slime working with MIT scheme on the Mac? I've followed most all of the instructions in swank-mit-scheme.scm, however have run into a few issues and suggestions for improvements: 1. The author states 'You also need the `netcat' program to create sockets. MIT Scheme has some socket functions built-in, but I couldn't figure out how to access the locat port number of a server socket. We shell out to netcat to get us started.' Fine, but he doesn't state which version of netcat is required. The version on Mac OS, and on many other systems is named 'nc'. Other versions, such as the GNU NetCat, don't have a '-q' option. 2. Even after trying various combinations of 'nc', 'netcat' and experimenting with various netcat options, the system hangs at: ' 1 ]=> ;Loading "format.com"... done ;Loading "load.scm"... ; Loading "sos-unx.pkd"... done ; Loading "slot.com"... done ; Loading "class.com"... done ; Loading "instance.com"... done ; Loading "method.com"... done ; Loading "printer.com"... done ; Loading "macros.com"... done ;... done ;Loading "/Development/Applications/slime/contrib/swank-mit-scheme.scm"... done Both within emacs and from the command line. I've looked high and low for any how-to's or tutorials for slime+mit-scheme, but most everything I can easily locate are questions asking how not to use emacs! I'm not an emacs beginner, but am to scheme. Does anyone have any helpful cheat-sheets on getting this working? Or, is this a case of slime/swank development moving ahead without anyone (else) using it on mit-scheme? I notice that the MIT course 6.001 now uses PLT Scheme and it's IDE, so I imagine the number of users of this combination has gone down significantly. Cheers, - SteveN

2 1

[slime-devel] Error from gcc compiling 1.0.26.21 on win32
by Matthew D. Swank 30 Mar '09

30 Mar '09

This can't be good: gcc -g -o sbcl.exe alloc.o backtrace.o breakpoint.o coreparse.o dynbind.o funcal l.o gc-common.o globals.o interr.o interrupt.o largefile.o monitor.o os-common.o parse.o print.o purify.o pthread-futex.o pthread-lutex.o regnames.o run-program .o runtime.o save.o search.o thread.o time.o util.o validate.o vars.o wrap.o x86 -arch.o win32-os.o x86-win32-os.o gencgc.o x86-assem.o -mno-cygwin -lm interrupt.o: In function `deferrables_blocked_p': /usr/local/src/sbcl-dev/sbcl-build/src/runtime/interrupt.c:256: undefined refere nce to `_deferrable_sigset' /usr/local/src/sbcl-dev/sbcl-build/src/runtime/interrupt.c:256: undefined refere nce to `_all_signals_blocked_p' interrupt.o: In function `blockables_blocked_p': /usr/local/src/sbcl-dev/sbcl-build/src/runtime/interrupt.c:280: undefined refere nce to `_blockable_sigset' /usr/local/src/sbcl-dev/sbcl-build/src/runtime/interrupt.c:280: undefined refere nce to `_all_signals_blocked_p' interrupt.o: In function `gc_signals_blocked_p': /usr/local/src/sbcl-dev/sbcl-build/src/runtime/interrupt.c:304: undefined refere nce to `_gc_sigset' /usr/local/src/sbcl-dev/sbcl-build/src/runtime/interrupt.c:304: undefined refere nce to `_all_signals_blocked_p' collect2: ld returned 1 exit status make: *** [sbcl.exe] Error 1 make: Leaving directory `/usr/local/src/sbcl-dev/sbcl-build/src/runtime' -- "You do not really understand something unless you can explain it to your grandmother." -- Albert Einstein.

1 0

None
by Volkan YAZICI 18 Mar '09

18 Mar '09

X-OriginalArrivalTime

1 0

[slime-devel] Fwd: sbcl run-program output
by Robert Brown 14 Mar '09

14 Mar '09

When I use SBCL's run-program function to run a Unix command from the Slime REPL and the command produces a lot of output, I get a run time error. A sample acktrace is included below. Examples are: (sb-ext:run-program "/bin/cat" '("/etc/bash_completion") :output *terminal-io* :search t :wait t) or (sb-ext:run-program "/bin/cat" '("/etc/bash_completion") :output *standard-output* :search t :wait t) If I collect the output into a string and then print the string, everything works fine: (progn (princ (with-output-to-string (out) (sb-ext:run-program "/bin/cat" '("/etc/bash_completion") :output out :search t :wait t)) *terminal-io*) nil) My goal is to see the command's output as it's generated. Does anyone know how to do this? bob ==================== non-empty buffer when EOF reached while reading from child: #(99 117 114 32 41 32 41 10 9 9 ...) [Condition of type SIMPLE-ERROR] Restarts: 0: [ABORT] Abort sending output to Emacs. 1: [RETRY] Retry SLIME REPL evaluation request. 2: [ABORT] Return to SLIME's top level. 3: [ABORT] Exit debugger, returning to top level. Backtrace: 0: ((LAMBDA (SB-IMPL::FD)) #<unavailable argument>) 1: (SB-IMPL::SUB-SUB-SERVE-EVENT 0 200000) 2: (SB-IMPL::SUB-SERVE-EVENT 0 200000 NIL) 3: ((LAMBDA (SWANK-BACKEND::STREAMS &OPTIONAL SWANK-BACKEND::TIMEOUT)) (#<SB-SYS:FD-STREAM for "a socket" {B36B031}>) NIL) 4: (SWANK::WAIT-FOR-EVENT/EVENT-LOOP (:EMACS-PONG 16) NIL) 5: (SWANK::WAIT-FOR-EVENT (:EMACS-PONG 16) NIL) 6: (SWANK::SEND-USER-OUTPUT ..) 7: ((LAMBDA ())) 8: ((LAMBDA ())) 9: ((SB-PCL::FAST-METHOD STREAM-FINISH-OUTPUT (SWANK-BACKEND::SLIME-OUTPUT-STREAM)) #(3 NIL 2 NIL 5 NIL ...) #<unavailable\ argument> #<SWANK-BACKEND::SLIME-OUTPUT-STREAM {AAB0BF1}>) 10: ((LAMBDA ())) 11: ((SB-PCL::FAST-METHOD STREAM-WRITE-STRING (SWANK-BACKEND::SLIME-OUTPUT-STREAM T)) ..) 12: (SB-IMPL::%WRITE-STRING ..) 13: ((LAMBDA (SB-IMPL::FD)) #<unavailable argument>) 14: (SB-IMPL::SUB-SUB-SERVE-EVENT 1 0) 15: (SB-IMPL::SUB-SERVE-EVENT 1 0 NIL) 16: (SB-SYS:SERVE-ALL-EVENTS 1) 17: (PROCESS-WAIT #<SB-IMPL::PROCESS 9630 :SIGNALED> NIL) 18: (RUN-PROGRAM "/bin/cat" ("/etc/bash_completion"))[:EXTERNAL] 19: (SB-INT:SIMPLE-EVAL-IN-LEXENV (RUN-PROGRAM "/bin/cat" '("/etc/bash_completion") :OUTPUT *STANDARD-OUTPUT* :SEARCH ...) \ #<NULL-LEXENV>) 20: (SWANK::EVAL-REGION "(sb-ext:run-program \"/bin/cat\" '(\"/etc/bash_completion\") :output *standard-output* :search t :\ wait t)\n") 21: ((LAMBDA ())) 22: (SWANK::TRACK-PACKAGE #<CLOSURE (LAMBDA #) {B05A8AD}>) 23: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation request." #<CLOSURE (LAMBDA #) {B05A83D}>) 24: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<CLOSURE (LAMBDA #) {B05A825}>) 25: (SWANK::REPL-EVAL "(sb-ext:run-program \"/bin/cat\" '(\"/etc/bash_completion\") :output *standard-output* :search t :wa\ it t)\n")

2 1