slime-devel October 2006

slime-devel@common-lisp.net

41 participants
60 discussions

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 20 Oct '06

20 Oct '06

Index: slime/ChangeLog diff -u slime/ChangeLog:1.971 slime/ChangeLog:1.976 --- slime/ChangeLog:1.971 Tue Oct 17 06:49:07 2006 +++ slime/ChangeLog Thu Oct 19 20:13:34 2006 @@ -1,4 +1,68 @@ -2006-10-11 Attila Lendvai <attila.lendvai(a)gmail.com> +2006-10-20 Martin Simmons <martin(a)lispworks.com> + + * swank-backend.lisp (initialize-multiprocessing): New API to + support lisps where initialize-multiprocessing may not return (lispworks). + + * swank.lisp (start-server): initialize-multiprocessing's API has changed. + + * swank-lispworks.lisp (initialize-multiprocessing): Update for new API. + + * swank-cmucl.lisp (initialize-multiprocessing): Update for new API. + + * swank-allegro.lisp (initialize-multiprocessing): Update for new api. + +2006-10-20 Levente Mészáros <levente.meszaros(a)gmail.com> + + Added "in-place" fuzzy completion GUI. See + slime-fuzzy-completions-map and + slime-target-buffer-fuzzy-completions-map for details. + + * slime.el (slime-space-information-p): New variable. + (slime-target-buffer-fuzzy-completions-mode): New keymap for + in-place fuzzy completions. + (slime-fuzzy-target-buffer-completions-mode): New minor mode for + in-place fuzzy completions. + (slime-fuzzy-current-completion-overlay): New overlay for + highlighting currently selected completion. + (slime-fuzzy-completions-map): Added new fuzzy completon keys + (slime-fuzzy-indent-and-complete-symbol): New function. + (slime-fuzzy-complete-symbol): Use new in-place fuzzy completion. + (slime-fuzzy-choices-buffer): Support in-place completion editing. + (slime-fuzzy-fill-completions-buffer): Highlight completions, + don't automatically jump to completion buffer. + (slime-fuzzy-enable-target-buffer-completions-mode, + slime-fuzzy-disable-target-buffer-completions-mode): New modes for + moving in/out of in-place fuzzy completion mode + (slime-fuzzy-next, slime-fuzzy-prev): Don't assume point is in the + completion buffer. + (slime-fuzzy-dehighlight-current-completion, + slime-fuzzy-highlight-current-completion): Manage completion + selection highlighting. + (slime-fuzzy-select-or-update-completions): New function. + (slime-fuzzy-process-event-in-completions-buffer): New function. + (slime-fuzzy-select-and-process-event-in-target-buffer): New function. + (slime-fuzzy-done): Changed to deal with in-place completion. + +2006-10-19 Helmut Eller <heller(a)common-lisp.net> + + * swank-backend.lisp (ignored-xref-function-names): Deleted. + + * swank.lisp (guess-package-from-string): Remove special case for + "#.". parse-package will handle that just fine. + (find-definitions-for-emacs): Don't filter errors out. + (sanitize-xrefs): Moved to swank-sbcl. The backend is supposed to + return sane values. + + * swank-sbcl.lisp: See above. + + * slime.el (slime-find-buffer-package): Simplify. + +2006-10-17 Helmut Eller <heller(a)common-lisp.net> + + * slime.el (slime-accept-process-output): The timeout arg can be + nil. Handle that case. + +2006-10-17 Attila Lendvai <attila.lendvai(a)gmail.com> * slime.el (slime-find-buffer-package): Handle #. forms.

1 0

[slime-devel] Problems with SLIME and LispWorks 5
by Bill Atkins 20 Oct '06

20 Oct '06

'm having trouble getting SLIME to start with LispWorks 5.0. I'm running the latest CVS of SLIME and I don't have any problems with CLISP or SBCL. I started Emacs without loading my configuration file ("emacs -q"), then loaded SLIME and evaluated (setq inferior-lisp-program "/usr/ local/bin/lispworks -tty") . Then I ran SLIME and watched some output scroll through *inferior-lisp*, only to stop at a CL-USER> prompt. The echo area informs me that SLIME is still polling the connection ("Polling "/tmp/slime.1257".. (Abort with `M-x slime- abort-connection'.)"). Clearing out old FASL's doesn't seem to make a difference. This is an Intel Mac, if that's relevant. The contents of inferior-lisp are below. Thanks, Bill ---------------- (load "/Users/batkins/emacs/slime/swank-loader.lisp" :verbose t) (swank:start-server "/tmp/slime.1254" :external-format :iso-latin-1- unix) LispWorks(R): The Common Lisp Programming Environment Copyright (C) 1987-2006 LispWorks Ltd. All rights reserved. Version 5.0.0 Saved by LispWorks as lispworks-5-0-0-x86-darwin, at 25 Jul 2006 13:57 User batkins on machamp-218.dynamic.rpi.edu ; Loading text file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ config/siteinit.lisp ; Loading text file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ private-patches/load.lisp ; Loading text file /Users/batkins/.lispworks ; Loading text file /Users/batkins/Code/Lisp/asdf.lisp ; loading system definition from ; /Users/batkins/.asdf-install-dir/systems/asdf-binary-locations.asd ; into #<The ASDF0 package, 0/16 internal, 0/16 external> ; Loading text file /Users/batkins/.asdf-install-dir/site/asdf- binary-locations/asdf-binary-locations.asd ; registering #<SYSTEM ASDF-BINARY-LOCATIONS 200B4ACF> as ; ASDF-BINARY-LOCATIONS ; Loading text file /Users/batkins/.asdf-install-dir/site/asdf- binary-locations/dev/main.lisp Warning: Overriding binding to #<EDITOR:COMMAND "Compile Defun" 20BBFF0B> with key-table. ; Loading text file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ translations/EDITOR-SRC.lisp ; loading system definition from ; /Users/batkins/.asdf-install-dir/systems/lw-add-ons.asd into ; #<The ASDF0 package, 0/16 internal, 0/16 external> ; Loading text file /Users/batkins/.asdf-install-dir/site/lw-add- ons-0.6.1/lw-add-ons.asd ; Loading /Applications/LispWorks 5.0/Library/lib/5-0-0-0/load-on- demand/web/lod-defsys.lisp on demand... ;; Creating system HQN-WEB-LOD ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/browser.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/darwin-browser.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/search.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/editor.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/utils.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/manuals.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/tools-lod.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/web/initialize.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ patches/hqn-web/0001/0001.xfasl ; Loaded public patch HQN-WEB 1.1 ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ patches/hqn-web/0001/0002.xfasl ; Loaded public patch HQN-WEB 1.2 ; registering #<SYSTEM :LW-ADD-ONS 200AF437> as LW-ADD-ONS ; loading system definition from ; /Users/batkins/.asdf-install-dir/systems/lw-doc.asd into ; #<The ASDF0 package, 0/16 internal, 0/16 external> ; Loading text file /Users/batkins/.asdf-install-dir/site/lw- doc-0.1.5/lw-doc.asd ; registering #<ASDF:SYSTEM #:LW-DOC 200C3EDF> as LW-DOC ; loading system definition from ; /Users/batkins/.asdf-install-dir/systems/cl-who.asd into ; #<The ASDF0 package, 0/16 internal, 0/16 external> ; Loading text file /Users/batkins/.asdf-install-dir/site/cl- who-0.6.1/cl-who.asd ; registering #<SYSTEM #:CL-WHO 215E7E77> as CL-WHO ; loading system definition from ; /Users/batkins/.asdf-install-dir/systems/cl-ppcre.asd into ; #<The ASDF0 package, 0/16 internal, 0/16 external> ; Loading text file /Users/batkins/.asdf-install-dir/site/cl- ppcre-1.2.16/cl-ppcre.asd ; registering #<ASDF:SYSTEM #:CL-PPCRE 215E9B1F> as CL-PPCRE ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-who-0.6.1/packages.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-who-0.6.1/who.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/packages.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/specials.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/util.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/errors.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/lexer.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/parser.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/regex-class.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/convert.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/optimize.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/closures.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/repetition- closures.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/scanner.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/cl-ppcre-1.2.16/api.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-doc-0.1.5/packages.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-doc-0.1.5/specials.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-doc-0.1.5/util.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-doc-0.1.5/parse.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-doc-0.1.5/pages.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/packages.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/specials.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/misc.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/ documentation.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/apropos.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/completions.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/systems.xfasl ;; Creating system COMMON-LISP-USER::CL-PPCRE ;; Creating system COMMON-LISP-USER::CL-WHO ;; Creating system COMMON-LISP-USER::LW-DOC ;; Creating system COMMON-LISP-USER::LW-ADD-ONS ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/editor.xfasl ; Loading fasl file /Users/batkins/.fasls/lispworks-5.0.0-macosx-x86/ Users/batkins/.asdf-install-dir/site/lw-add-ons-0.6.1/commands.xfasl CL-USER 1 > ; Loading text file /Users/batkins/Code/slime/swank- loader.lisp ; Loading fasl file /Users/batkins/.slime/fasl/2006-09-25/ lispworks-5.0.0-macosx-x86/swank-backend.xfasl ; Loading fasl file /Users/batkins/.slime/fasl/2006-09-25/ lispworks-5.0.0-macosx-x86/nregex.xfasl ; Loading fasl file /Users/batkins/.slime/fasl/2006-09-25/ lispworks-5.0.0-macosx-x86/swank-lispworks.xfasl ; Loading /Applications/LispWorks 5.0/Library/lib/5-0-0-0/load-on- demand/processes/comm-defsys.lisp on demand... ;; Creating system COMM ; Loading text file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/processes/comm-pkg.lisp ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/processes/sockets.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/processes/ssl-constants.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/processes/ssl-foreign-types.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/processes/ssl.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ load-on-demand/processes/ssl-certs.xfasl ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ patches/comm/0001/0001.xfasl ; Loaded public patch COMM 1.1 ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ patches/comm/0001/0002.xfasl ; Loaded public patch COMM 1.2 ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ patches/comm/0001/0003.xfasl ; Loaded public patch COMM 1.3 ; Loading fasl file /Applications/LispWorks 5.0/Library/lib/5-0-0-0/ patches/comm/0001/0004.xfasl ; Loaded public patch COMM 1.4 ; Loading fasl file /Users/batkins/.slime/fasl/2006-09-25/ lispworks-5.0.0-macosx-x86/swank-gray.xfasl ; Loading fasl file /Users/batkins/.slime/fasl/2006-09-25/ lispworks-5.0.0-macosx-x86/swank.xfasl Warning: These Swank interfaces are unimplemented: (ACTIVATE-STEPPING ADD-FD-HANDLER ADD-SIGIO-HANDLER DISASSEMBLE-FRAME LIST-CALLEES PROFILE PROFILE-PACKAGE PROFILE-REPORT PROFILE-RESET PROFILED-FUNCTIONS REMOVE-FD-HANDLERS REMOVE-SIGIO-HANDLERS SLDB- BREAK-AT-START SLDB-BREAK-ON-RETURN SLDB-STEP-INTO SLDB-STEP-NEXT SLDB-STEP-OUT UNPROFILE) #P"/Users/batkins/Code/slime/swank-loader.lisp" CL-USER 2 > CL-USER 3 >

4 9

[slime-devel] error on slime-disconnect
by Kamen TOMOV 19 Oct '06

19 Oct '06

Hi, I successfully slime-connect to a CMUCL server from Emacs on another (Windows) machine, but when I do slime-disconnect Emacs crashes with "Error 109 - unable to read from stdin" and I got the following in the server's log: ... DISPATCHING: (:EMACS-REX (SWANK:LISTENER-EVAL "1 ") "COMMON-LISP-USER" :REPL-THREAD 2) DISPATCHING: (:RETURN #<Process Initial {5800486D}> (:OK (:PRESENT (("1" . 1)))) 2) WRITE: (:return (:ok (:present (("1" . 1)))) 2) ;; Event history end. ;; Connection to Emacs lost. [ ;; condition: End-of-File on #<Stream for descriptor 7> ;; type: SWANK::SLIME-PROTOCOL-ERROR ;; encoding: :ISO-LATIN-1-UNIX style: :SIGIO dedicated: NIL] If I try to debug I got this info about the error: AppName: emacs.exe AppVer: 22.0.50.0 ModName: ntdll.dll ModVer: 5.1.2600.2180 Offset: 00001230 The same happens with Xemacs - although it doesn't crash I got the same error in the server's log. On the server: cmucl 19c + slime 2.0.0.20060805 On the client: win32 + Emacs + slime 2.0 Thanks! -- Kamen TOMOV

1 0

[slime-devel] setup
by Jason Thompson 18 Oct '06

18 Oct '06

Having used Peter Seibel's LispBox, I finally decided to consolidate my programming environment and use Slime under my primary Emacs. I'm using Clisp 2.41 on a Windows XP machine and followed instructions on Bill Clementson's blog for the setup. However, when I attempt to start Slime with M-x slime, I get the error: Spawning child process: invalid argument. Is the problem obvious to anyone? if i try M-x slime-connect RET RET RET, the connection is refused. .emacs is as follows: (add-to-list 'load-path "C:/jat/site/slime") (require 'slime) (add-hook 'lisp-mode-hook (lambda () (slime-mode t))) (add-hook 'inferior-lisp-mode-hook (lambda () (inferior-slime-mode t))) ;; Optionally, specify the lisp program you are using. Default is "lisp" (setq inferior-lisp-program "clisp") .slime.lisp is just: (load "C:/jat/site/slime/swank-loader.lisp") (swank::create-swank-server 4005)

2 1

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 18 Oct '06

18 Oct '06

Index: slime/ChangeLog diff -u slime/ChangeLog:1.970 slime/ChangeLog:1.971 --- slime/ChangeLog:1.970 Mon Oct 16 16:43:00 2006 +++ slime/ChangeLog Tue Oct 17 06:49:07 2006 @@ -1,3 +1,14 @@ +2006-10-11 Attila Lendvai <attila.lendvai(a)gmail.com> + + * slime.el (slime-find-buffer-package): Handle #. forms. + + * swank.lisp (guess-package-from-string): Handle #. forms. + (inspect-for-emacs standard-class): Handle non-string + :documentation slot contents. + + * swank-sbcl.lisp (inspect-for-emacs weak-pointer ...): Added + method. + 2006-10-16 Helmut Eller <heller(a)common-lisp.net> * slime.el (sldb-activate): Get debug-info from the correct

1 0

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 17 Oct '06

17 Oct '06

Index: slime/ChangeLog diff -u slime/ChangeLog:1.965 slime/ChangeLog:1.970 --- slime/ChangeLog:1.965 Wed Oct 11 08:00:04 2006 +++ slime/ChangeLog Mon Oct 16 16:43:00 2006 @@ -1,3 +1,33 @@ +2006-10-16 Helmut Eller <heller(a)common-lisp.net> + + * slime.el (sldb-activate): Get debug-info from the correct + thread. Fixes bug reported by Dan Weinreb <dlw(a)itasoftware.com>. + (unwind-to-previous-sldb-level): New test. + (slime-init-command): Send a single form. + (slime-insert-presentation): Honor slime-repl-enable-presentations. + Presentations kill SLDB and the inspector in Emacs 20 (besides + being troublesome GC-wise). + + * swank.lisp: Clean up global IO redirection. + (setup-stream-indirection): Turn macro into a + function and delay initialization after user init files are + loaded, so that we do nothing if *globally-redirect-io* is nil. + (*after-init-hook*, run-after-init-hook) + (init-global-stream-redirection): New. + + (parse-symbol-or-lose): Lose loudly and early (instead of failing + silently). + + * swank-loader.lisp: Abort on compile-time or load-time errors. + Don't try to load the source-file if COMPILE-FILE's 3rd return + value is true (it's true even for warnings). + (handle-loadtime-error): New function. + + Run the after-init-hook. + + * swank-cmucl.lisp (inspect-for-emacs): Don't break for + simple-strings. + 2006-10-11 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> * slime.el (slime-presentation-syntax-table): New.

1 0

[slime-devel] a patch
by Attila Lendvai 15 Oct '06

15 Oct '06

hi! the included patch contains the following: - support for (in-package #.foo-system:*foo-package*) that i needed for metacopy to be able to load the same files with contextl and without contextl into two different packages - fix inspecting non-string documentation - added inspector support for weak pointers on sbcl let me know if they need any further work, -- - attila "- The truth is that I've been too considerate, and so became unintentionally cruel... - I understand. - No, you don't understand! We don't speak the same language!" (Ingmar Bergman - Smultronstället)

1 0

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 12 Oct '06

12 Oct '06

Index: slime/ChangeLog diff -u slime/ChangeLog:1.964 slime/ChangeLog:1.965 --- slime/ChangeLog:1.964 Mon Oct 9 09:22:35 2006 +++ slime/ChangeLog Wed Oct 11 08:00:04 2006 @@ -1,3 +1,12 @@ +2006-10-11 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> + + * slime.el (slime-presentation-syntax-table): New. + (slime-add-presentation-properties): Install it in a syntax-table + text property, so that #<...> is balanced in a presentation. + (slime-remove-presentation-properties): Remove the text property. + (slime-repl-mode): Respect the syntax text properties of + presentations in REPL buffers. + 2006-10-09 Matthias Koeppe <mkoeppe(a)mail.math.uni-magdeburg.de> * swank.lisp (completions-for-keyword): Look up the operator names

1 0

[slime-devel] those two slime patches
by Gary King 11 Oct '06

11 Oct '06

I don't have write access to the slime repo; can someone else add those patches (and/or can I have access? I promise to be good <smile>) -- Gary Warren King, metabang.com Cell: (413) 885 9127 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM

1 0

[slime-devel] patch to disappear some allegro warnings
by Gary King 10 Oct '06

10 Oct '06

Putative changelog entry 2006-10-09 Gary King <gwking(a)metabang.com> * swank-allegro.lisp: Wrapped many things in excl:without- redefinition-warnings so as to compile, well, without redefinition warnings. The diff RCS file: /project/slime/cvsroot/slime/swank-allegro.lisp,v retrieving revision 1.90 diff -u -w -r1.90 swank-allegro.lisp --- swank-allegro.lisp 10 Aug 2006 18:55:51 -0000 1.90 +++ swank-allegro.lisp 9 Oct 2006 23:36:42 -0000 @@ -28,8 +28,9 @@ ;;;; TCP Server +(excl:without-redefinition-warnings (defimplementation preferred-communication-style () - :spawn) + :spawn)) (defimplementation create-socket (host port) (socket:make-socket :connect :passive :local-port port @@ -64,40 +65,48 @@ (setf (stream-external-format stream) (find-external-format external-format))) +(excl:without-redefinition-warnings (defimplementation format-sldb-condition (c) - (princ-to-string c)) + (princ-to-string c))) +(excl:without-redefinition-warnings (defimplementation condition-references (c) (declare (ignore c)) - '()) + '())) +(excl:without-redefinition-warnings (defimplementation call-with-syntax-hooks (fn) - (funcall fn)) + (funcall fn))) ;;;; Unix signals +(excl:without-redefinition-warnings (defimplementation call-without-interrupts (fn) - (excl:without-interrupts (funcall fn))) + (excl:without-interrupts (funcall fn)))) (defimplementation getpid () (excl::getpid)) +(excl:without-redefinition-warnings (defimplementation lisp-implementation-type-name () - "allegro") + "allegro")) +(excl:without-redefinition-warnings (defimplementation set-default-directory (directory) (let* ((dir (namestring (truename (merge-pathnames directory))))) (setf *default-pathname-defaults* (pathname (excl:chdir dir))) - dir)) + dir))) +(excl:without-redefinition-warnings (defimplementation default-directory () - (namestring (excl:current-directory))) + (namestring (excl:current-directory)))) ;;;; Misc +(excl:without-redefinition-warnings (defimplementation arglist (symbol) (handler-case (excl:arglist symbol) - (simple-error () :not-available))) + (simple-error () :not-available)))) (defimplementation macroexpand-all (form) (excl::walk form)) @@ -129,8 +138,9 @@ (:class (describe (find-class symbol))))) +(excl:without-redefinition-warnings (defimplementation make-stream-interactive (stream) - (setf (interactive-stream-p stream) t)) + (setf (interactive-stream-p stream) t))) ;;;; Debugger @@ -581,14 +591,15 @@ (when doc `("Documentation:" (:newline) ,doc)))))) -(defmethod inspect-for-emacs ((o t) (inspector acl-inspector)) - inspector - (values "A value." (allegro-inspect o))) - +#+(or) (defmethod inspect-for-emacs ((o function) (inspector acl-inspector)) inspector (values "A function." (allegro-inspect o))) +(defmethod inspect-for-emacs ((o t) (inspector acl-inspector)) + inspector + (values "A value." (allegro-inspect o))) + (defmethod inspect-for-emacs ((o standard-object) (inspector acl- inspector)) inspector (values (format nil "~A is a standard-object." o) (allegro- inspect o))) @@ -616,8 +627,9 @@ ;;;; Multithreading +(excl:without-redefinition-warnings (defimplementation initialize-multiprocessing () - (mp:start-scheduler)) + (mp:start-scheduler))) (defimplementation spawn (fn &key name) (mp:process-run-function name fn)) @@ -635,21 +647,26 @@ (find id mp:*all-processes* :key (lambda (p) (getf (mp:process-property-list p) 'id)))) +(excl:without-redefinition-warnings (defimplementation thread-name (thread) - (mp:process-name thread)) + (mp:process-name thread))) +(excl:without-redefinition-warnings (defimplementation thread-status (thread) (format nil "~A ~D" (mp:process-whostate thread) - (mp:process-priority thread))) + (mp:process-priority thread)))) +(excl:without-redefinition-warnings (defimplementation make-lock (&key name) - (mp:make-process-lock :name name)) + (mp:make-process-lock :name name))) +(excl:without-redefinition-warnings (defimplementation call-with-lock-held (lock function) - (mp:with-process-lock (lock) (funcall function))) + (mp:with-process-lock (lock) (funcall function)))) +(excl:without-redefinition-warnings (defimplementation current-thread () - mp:*current-process*) + mp:*current-process*)) (defimplementation all-threads () (copy-list mp:*all-processes*)) @@ -657,8 +674,9 @@ (defimplementation interrupt-thread (thread fn) (mp:process-interrupt thread fn)) +(excl:without-redefinition-warnings (defimplementation kill-thread (thread) - (mp:process-kill thread)) + (mp:process-kill thread))) (defvar *mailbox-lock* (mp:make-process-lock :name "mailbox lock")) @@ -754,8 +772,10 @@ ;;;; Weak hashtables +(excl:without-redefinition-warnings (defimplementation make-weak-key-hash-table (&rest args) - (apply #'make-hash-table :weak-keys t args)) + (apply #'make-hash-table :weak-keys t args))) +(excl:without-redefinition-warnings (defimplementation make-weak-value-hash-table (&rest args) - (apply #'make-hash-table :values :weak args)) + (apply #'make-hash-table :values :weak args))) -- Gary Warren King, metabang.com Cell: (413) 885 9127 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM

2 1

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

slime-devel October 2006