November 2010 - slime-devel - mailman3.common-lisp.net

[slime-devel] additionnal option to slime-eval-print: prefix the result with "; ; --> "
by pjb＠informatimago.com 06 Nov '10

06 Nov '10

(progn (print "Hello World!") (values 1 2)) C-u C-x C-e inserts: "Hello World!" 1 2 With one more C-u: (progn (print "Hello World!") (values 1 2)) C-u C-u C-x C-e I'd want to get: "Hello World!" ;; --> 1 ;; 2 Hence this new version: (defun slime-eval-print (string) "Eval STRING in Lisp; insert any output and the result at point." (message "current-prefix-arg = %S" current-prefix-arg) (let ((commentp (and (listp current-prefix-arg) (integerp (first current-prefix-arg)) (< 4 (first current-prefix-arg))))) (slime-eval-async `(swank:eval-and-grab-output ,string) `(lambda (result) (destructuring-bind (output value) result (push-mark) (if ,commentp (progn (insert output) (let ((lines (split-string value "\n"))) (insert "\n;; --> " (first lines) "\n") (dolist (line (rest lines)) (insert ";; " line "\n")))) (insert output value))))))) (The ,commentp is icky, but it's emacs lisp). -- __Pascal Bourguignon__ http://www.informatimago.com/ A bad day in () is better than a good day in {}.

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 04 Nov '10

04 Nov '10

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2160 slime/ChangeLog:1.2161 --- slime/ChangeLog:1.2160 Tue Nov 2 08:32:10 2010 +++ slime/ChangeLog Wed Nov 3 07:00:40 2010 @@ -1,3 +1,8 @@ +2010-11-03 Stas Boukarev <stassats(a)gmail.com> + + * swank-loader.lisp (*architecture-features*): Add :arm for CCL + ARM port. + 2010-11-02 Martin Simmons <martin(a)lispworks.com> * swank-lispworks.lisp (list-callers-internal): Revert to previous

1 0

[slime-devel] Daily ChangeLog diff
by Helmut Eller 03 Nov '10

03 Nov '10

Index: slime/ChangeLog diff -u slime/ChangeLog:1.2159 slime/ChangeLog:1.2160 --- slime/ChangeLog:1.2159 Sat Oct 23 08:18:28 2010 +++ slime/ChangeLog Tue Nov 2 08:32:10 2010 @@ -1,3 +1,10 @@ +2010-11-02 Martin Simmons <martin(a)lispworks.com> + + * swank-lispworks.lisp (list-callers-internal): Revert to previous + low level implementation, fixed for LW6. + (list-callees-internal): Reimplement using low level instead of + the compiler's xref. + 2010-10-23 Stas Boukarev <stassats(a)gmail.com> * slime.el (slime-goto-location-position): In case of

1 0