slime-devel

slime-devel@common-lisp.net

4231 discussions

[slime-devel] swank-compilation-result
by Helmut Eller 13 Sep '08

13 Sep '08

Currently swank-compilation-result is declared as: (defstruct (:swank-compilation-result (:type list) :named (:conc-name swank-compilation-result.) (:constructor make-swank-compilation-result ())) notes ; results ; one result is of type (MEMBER T NIL :COMPLAINED) durations ; ) All the slots are lists. Can we change that, so that one compilation-result contains only one element of those lists? If a command runs multiple compilations it could return a list of those simpler compilation-results. Helmut.

1 0

[slime-devel] slime-autodoc fails on `(flet ((, nil ())) (cond (, nil)))
by John Pallister 13 Sep '08

13 Sep '08

Hello list, I have noticed a bug when using slime-autodoc. I've duplicated it on GNU Emacs 23.0 with Lispworks 5.1.1 on Windows, and GNU Emacs 21.4 with SBCL 1.0.15 on Linux. If I enter the form (either in the REPL or in a buffer): `(flet ((,nil ())) (cond (,nil))) ^----^ then when I move the point into the indicated sexp, I get a "comma not inside a backquote" error from the Lisp. The following forms don't trigger the error: `(flet ((nil ())) (cond (,nil))) `(flet ((,nil ())) ,nil (cond (,nil))) The offending event is: (:emacs-rex (swank:format-arglist-for-echo-area ",nil" :operator nil :highlight nil :print-right-margin 1000 :print-lines 1) "COMMON-LISP-USER" :repl-thread 156) I had a bit of a look with the debugger and got as far as SLIME-AUTODOC-LOCAL-ARGLIST calling SLIME-FIND-BOUND-FUNCTIONS before giving up. Hopefully these clues will help someone more familiar with SLIME's internal workings. Cheers, John :^P -- John Pallister john(a)synchromesh.com

2 1

[slime-devel] [RfC] Marking frames restartable in SLDB
by Tobias C. Rittweiler 12 Sep '08

12 Sep '08

I'd like to mark restartable frames specially within a SLDB backtrace. One way would be to use the first column, and use "*" or "R" if a frame is restartable. Another way would be to place "Restartable" in the details section if one toggles a frame. Or perhaps both, or something else entirely. Thoughts? -T.

2 2

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 11 Sep '08

11 Sep '08

Index: slime/ChangeLog diff -u slime/ChangeLog:1.1498 slime/ChangeLog:1.1501 --- slime/ChangeLog:1.1498 Wed Sep 10 19:18:36 2008 +++ slime/ChangeLog Thu Sep 11 08:32:01 2008 @@ -1,3 +1,26 @@ +2008-09-11 Helmut Eller <heller(a)common-lisp.net> + + * doc/slime-refcard.tex: Fix typos. + +2008-09-11 Gary King <gwking(a)metabang.com> + + * swank-allegro.lisp (fspec-definition-locations): add declare + ignores to prevent warnings + + (emacs-inspect): remove first definition on function since it + was being overwritten by the next one. Wrap the method on t with + a excl:without-redefinition-warnings to prevent warning. + +2008-09-11 Helmut Eller <heller(a)common-lisp.net> + + * swank-cmucl.lisp (slime-output-stream): Remove last-flush-time + slot. + (sos/flush): Renamed from sos/misc-force-output. Don't try to be + clever: no timestamps and no line buffering. + (sos/write-char, sos/write-string): Renamed from sos/out + resp. sos/sout. Call output-fn outside without-interrupts. + (sos/reset-buffer): New function. + 2008-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> * slime.el (slime-compilation-unit): Renamed to

1 0

[slime-devel] identifying 64-bit lisps in the lisp-version-string
by Gary King 11 Sep '08

11 Sep '08

I don't follow OpenMCL / CCL or Lispworks closely so maybe their is no longer a need to differentiate between 64-bit and non-64-bit fasls. If there is, then shouldn't the definition of lisp-version-string look more like the one below? thanks (diff -u this time! <smile>) Index: swank-loader.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-loader.lisp,v retrieving revision 1.88 diff -u -w -r1.88 swank-loader.lisp --- swank-loader.lisp 17 Aug 2008 08:31:17 -0000 1.88 +++ swank-loader.lisp 11 Sep 2008 13:18:52 -0000 @@ -58,10 +58,16 @@ :sparc64 :sparc :hppa64 :hppa)) (defun lisp-version-string () - #+(or openmcl cmu) (substitute-if #\_ (lambda (x) (find x " /")) + #+cmu (substitute-if #\_ (lambda (x) (find x " /")) (lisp-implementation-version)) - #+(or cormanlisp scl sbcl ecl) (lisp-implementation-version) - #+lispworks (lisp-implementation-version) + #+openmcl (format nil "~a~a" + (substitute-if #\_ (lambda (x) (find x " /")) + (lisp-implementation-version)) + #+ppc64-target "-64bit" + #-ppc64-target "") + #+lispworks (format nil "~A~@[~A~]" + (lisp-implementation-version) + (when (member :lispworks-64bit *features*) "-64bit")) #+allegro (format nil "~A~A~A" excl::*common-lisp-version-number* @@ -69,7 +75,9 @@ (if (member :64bit *features*) "-64bit" "")) #+clisp (let ((s (lisp-implementation-version))) (subseq s 0 (position #\space s))) - #+armedbear (lisp-implementation-version)) + #+(or armedbear cormanlisp ecl scl sbcl) + (lisp-implementation-version) + ) (defun unique-dir-name () "Return a name that can be used as a directory name that is -- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM

2 1

[slime-devel] just upgrading and am looking for previous behavior of command navigation
by Gary King 11 Sep '08

11 Sep '08

My apologies if this is a FAQ. Until yesterday, I was using a very old version of SLIME. I've upgraded and am missing a few things. The first is that I used to be able to type a little bit in the REPL and then use m-p and m-n to navigate to other commands that started with the same characters as what I had typed. E.g., if I typed > (in- [m-p] SLIME would find > (in-package cl-graph) This now longer is the default behavior. I expect that there is a way to turn it back on but my emacs foo is still very weak. Any help would be appreciated, -- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM

2 2

[slime-devel] patch to prevent warning running under Allegro Common Lisp
by Gary King 11 Sep '08

11 Sep '08

Here is a diff -c; let me know if there is a better way to send this and/or a right person to send it to. thanks, Index: ChangeLog =================================================================== RCS file: /project/slime/cvsroot/slime/ChangeLog,v retrieving revision 1.1495 diff -c -r1.1495 ChangeLog *** ChangeLog 9 Sep 2008 23:29:44 -0000 1.1495 --- ChangeLog 10 Sep 2008 12:34:23 -0000 *************** *** 1,5 **** --- 1,14 ---- 2008-09-10 Tobias C. Rittweiler <tcr(a)freebits.de> + * ChangeLog (fspec-definition-locations): add declare ignores + to prevent warnings + + (emacs-inspect): remove first definition on function since it + was being overwritten by the next one. Wrap the method on t with + a excl:without-redefinition-warnings to prevent warning. + + 2008-09-10 Tobias C. Rittweiler <tcr(a)freebits.de> + * swank-backend.lisp (*gray-stream-symbols*): Comment out STREAM-FILE-POSITION. Index: swank-allegro.lisp =================================================================== RCS file: /project/slime/cvsroot/slime/swank-allegro.lisp,v retrieving revision 1.110 diff -c -r1.110 swank-allegro.lisp *** swank-allegro.lisp 11 Aug 2008 07:40:23 -0000 1.110 --- swank-allegro.lisp 10 Sep 2008 12:34:26 -0000 *************** *** 402,413 **** --- 402,415 ---- ((and (listp fspec) (eql (car fspec) :top-level-form)) (destructuring-bind (top-level-form file &optional position) fspec + (declare (ignore top-level-form)) (list (list (list nil fspec) (make-location (list :buffer file) (list :position position t)))))) ((and (listp fspec) (eq (car fspec) :internal)) (destructuring-bind (_internal next _n) fspec + (declare (ignore _internal _n)) (fspec-definition-locations next))) (t (let ((defs (excl::find-source-file fspec))) *************** *** 570,575 **** --- 572,580 ---- ;;;; Inspecting + #+no + ;; use the one below that calls allegro-inspect instead + ;;?? remove (defmethod emacs-inspect ((f function)) (append (label-value-line "Name" (function-name f)) *************** *** 578,585 **** (when doc `("Documentation:" (:newline) ,doc))))) (defmethod emacs-inspect ((o t)) ! (allegro-inspect o)) (defmethod emacs-inspect ((o function)) (allegro-inspect o)) --- 583,591 ---- (when doc `("Documentation:" (:newline) ,doc))))) + (excl:without-redefinition-warnings (defmethod emacs-inspect ((o t)) ! (allegro-inspect o))) (defmethod emacs-inspect ((o function)) (allegro-inspect o)) -- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM

2 1

[slime-devel] slime-refcard
by NANRI 11 Sep '08

11 Sep '08

Hi I found some typos in slime-refcard. And, I have a question about it. I don't understand "<key> l what starts with <key>" in the "Getting help in Emacs" section. Would you tell me its elisp function name? -- NANRI

2 1

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 10 Sep '08

10 Sep '08

Index: slime/ChangeLog diff -u slime/ChangeLog:1.1495 slime/ChangeLog:1.1498 --- slime/ChangeLog:1.1495 Tue Sep 9 19:29:44 2008 +++ slime/ChangeLog Wed Sep 10 19:18:36 2008 @@ -1,3 +1,42 @@ +2008-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> + + * slime.el (slime-compilation-unit): Renamed to + `slime-compilation-result'. + (slime-last-compilation-unit): Renamed to + `slime-last-compilation-result'. + (slime-compiler-notes, slime-compiler-results): Adapted accordingly. + (slime-compilation-finished): Ditto. + +2008-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> + + * slime.el (slime-popup-buffer-restore-snapshot): Make sure that + the buffer-local variable containing the popup buffer's snapshot + is set to nil in the right buffer. + +2008-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> + + Reimplement recompilation support. The previous implementation + involving specials was subtly broken with the :fd-handler + communcation-style, because of serve-event's polite interplay with + specials. (Cf. my slime-devel post "Per event bindings" on 2008-08-17.) + + * swank.lisp (with-swank-compilation-unit): Removed. + (record-note-for-condition): Removed. + (defstruct swank-compilation-unit): Renamed to + `swank-compilation-result'. + (swank-compilation-unit-for-emacs): Renamed to + `swank-compilation-result-for-emacs'. + (swank-compiler): Takes additional argument, the + swank-compilation-result where caught notes should be accumulated + into. + (defslimefun compile-file-for-emacs): Adapted accordingly. + (defslimefun compile-string-for-emacs): Ditto. + (defslimefun compile-multiple-strings-for-emacs): New RPC call. + + * slime.el (slime-make-compile-expression-for-swank): Removed. + (slime-compile-string): Don't use above function anymore. Adapted. + (slime-recompile-locations): Rewritten to use new RPC call above. + 2008-09-10 Tobias C. Rittweiler <tcr(a)freebits.de> * swank-backend.lisp (*gray-stream-symbols*): Comment out Index: slime/contrib/ChangeLog diff -u slime/contrib/ChangeLog:1.128 slime/contrib/ChangeLog:1.129 --- slime/contrib/ChangeLog:1.128 Sun Sep 7 08:44:11 2008 +++ slime/contrib/ChangeLog Wed Sep 10 19:51:17 2008 @@ -1,3 +1,8 @@ +2008-09-11 Tobias C. Rittweiler <tcr(a)freebits.de> + + * swank-asdf.lisp (operate-on-system-for-emacs): Adapted to recent + changes wrt. swank-compilation-unit. + 2008-09-07 Tobias C. Rittweiler <tcr(a)freebits.de> * slime-autodoc.el (slime-make-autodoc-swank-form): Do not

1 0

[slime-devel] Daily ChangeLog diff
by mbaringer＠common-lisp.net 09 Sep '08

09 Sep '08

Index: slime/ChangeLog diff -u slime/ChangeLog:1.1492 slime/ChangeLog:1.1495 --- slime/ChangeLog:1.1492 Mon Sep 8 18:35:58 2008 +++ slime/ChangeLog Tue Sep 9 19:29:44 2008 @@ -1,3 +1,41 @@ +2008-09-10 Tobias C. Rittweiler <tcr(a)freebits.de> + + * swank-backend.lisp (*gray-stream-symbols*): Comment out + STREAM-FILE-POSITION. + +2008-09-10 Tobias C. Rittweiler <tcr(a)freebits.de> + + * swank.lisp (eval-for-emacs): Remove WITH-RETRY-RESTART again for + simplicity reasons. + + (interactive-eval): Add WITH-RETRY-RESTART. + (eval-and-grab-output): Ditto. + (interactive-eval-region): Ditto. + (re-evaluate-defvar): Ditto. + (pprint-eval): Ditto. + (repl-eval): Ditto. + (eval-string-in-frame): Ditto. + (pprint-eval-string-in-frame): Ditto. + (init-inspector): Ditto. + (inspect-in-frame): Ditto. + +2008-09-09 Tobias C. Rittweiler <tcr(a)freebits.de> + + A RETRY restart is provided for all Slime evaluation requests. + + The rationale is that restarting from a frame is mostly only + possible for functions compiled with high debug settings; most + functions aren't, however. + + [Alternatively, we could make EVAL-FOR-EMACS be compiled with a + high debug level, so it'll become restartable. That would be + non-obvious to the user, though, and would only work on those + implementations that implement SWANK-BACKEND:RESTART-FRAME.] + + * swank.lisp (call-with-retry-restart): New function. + (with-retry-restart): New macro. + (eval-for-emacs): Use WITH-RETRY-RESTART. + 2008-09-09 Tobias C. Rittweiler <tcr(a)freebits.de> A package "Foo.Bar.1.0" was truncated to "0>" as REPL

1 0

Jump to page:

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

slime-devel