September 2004 - slime-devel - mailman3.common-lisp.net

[slime-devel] read strangeness in SLIME 2004-09-17/OpenMCL
by mikel 21 Sep '04

21 Sep '04

A user of the OS X version of Lisp-in-a-Box sent me mail about a problem running Peter Seibel's CD database example: y-or-n-p has a little trouble in SLIME and OpenMCL (the effect is easy to see if you try using the CD example: SLIME seems to feed extra line-ends to OpenMCL). The effect occurs with OpenMCL and SLIME, whether in Lisp-in-a-Box or in my regular Emacs installation, but not using the same SLIME and, say, CMUCL or SBCL. Any suggestions where to look to track down the source of the problem?

2 1

[slime-devel] *slime-scratch*
by marco 20 Sep '04

20 Sep '04

would anybody have problems with associating the slime-scratch buffer with the file ~/.slime/slime-scratch.lisp? -- -Marco Ring the bells that still can ring. Forget your perfect offering. There is a crack in everything. That's how the light gets in. -Leonard Cohen

4 4

[slime-devel] xref
by Andras Simon 20 Sep '04

20 Sep '04

ABCL doesn't yet know about the long form of defsetf, used in xref.lisp. Do clispers (the only users of xref in slime) have anything against the patch below? It seems to work in clisp, but I'm no defsetf expert, so I'd rather ask before committing. Andras =================================================================== RCS file: /project/slime/cvsroot/slime/xref.lisp,v retrieving revision 1.2 diff -u -r1.2 xref.lisp --- xref.lisp 17 May 2004 00:25:24 -0000 1.2 +++ xref.lisp 17 Sep 2004 20:40:15 -0000 @@ -736,14 +736,14 @@ (:callers (gethash name *callers-database*)) (:readers (gethash name *readers-database*)) (:setters (gethash name *setters-database*)))) -(defsetf callers-list (name &optional (database :callers)) (caller) - `(setf (gethash ,name (case ,database - (:file *file-callers-database*) - (:callees *callees-database*) - (:callers *callers-database*) - (:readers *readers-database*) - (:setters *setters-database*))) - ,caller)) + +(defun (setf callers-list) (val name &optional (database :callers)) + (setf (gethash name (case database + (:file *file-callers-database*) + (:callees *callees-database*) + (:callers *callers-database*) + (:readers *readers-database*) + (:setters *setters-database*))) val)) (defun list-callers (symbol) "Lists all functions which call SYMBOL as a function (function invocation)." @@ -788,9 +788,10 @@ (defun source-file (symbol) "Lists the names of files in which SYMBOL is defined/used." (gethash symbol *source-file*)) -(defsetf source-file (name) (value) - `(setf (gethash ,name *source-file*) ,value)) +(defun (setf source-file) (value name) + (setf (gethash name *source-file*) value)) + (defun clear-tables () (clrhash *file-callers-database*) (clrhash *callers-database*) @@ -807,9 +808,10 @@ (defvar *pattern-caller-type* (make-hash-table :test #'equal)) (defun pattern-caller-type (name) (gethash name *pattern-caller-type*)) -(defsetf pattern-caller-type (name) (value) - `(setf (gethash ,name *pattern-caller-type*) ,value)) +(defun (setf pattern-caller-type) (value name) + (setf (gethash name *pattern-caller-type*) value)) + ;;; Pattern Substitutions (defvar *pattern-substitution-table* (make-hash-table :test #'equal) "Stores general patterns for function destructuring.") @@ -1267,6 +1269,7 @@ database. (For large systems it can take a long time to crunch through the code, so this can save some time.)" (with-open-file (stream filename :direction :output) + (format stream "~&(in-package :pxref)") (format stream "~&(clear-tables)") (maphash #'(lambda (x y) (format stream "~&(setf (source-file '~S) '~S)"

3 4

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 19 Sep '04

19 Sep '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.537 slime/ChangeLog:1.538 --- slime/ChangeLog:1.537 Fri Sep 17 15:01:19 2004 +++ slime/ChangeLog Sun Sep 19 10:04:57 2004 @@ -1,3 +1,42 @@ +2004-09-19 Helmut Eller <e9626484(a)stud3.tuwien.ac.at> + + * swank-gray.lisp (stream-read-char): Treat empty strings as + end-of-file. + + * swank-cmucl.lisp (sis/in): Treat empty strings as end-of-file. + (map-allocated-code-components): Inhibit efficiency notes. + (arglist)[symbol] Delete unreachable code. + (sldb-break-on-return, sldb-break-at-start): Implement it + (sldb-step): Some cleanups. + + * swank.lisp (thread-for-evaluation): Restart the listener thread + if it was dead for some reason. + (debugger-condition-for-emacs): Include "extra" stuff. Currenlty + only used to pop up the source buffer at breakpoints. + (sldb-break): New function. + (interrupt-worker-thread): Interrupt the repl thread if there is + no other active thread. + + * swank-backend.lisp (import-swank-mop-symbols): New + function. Useful if the implementation has most of the mop symbols + in the same package. + (sldb-break-on-return, sldb-break-at-start, condition-extras): New + functions. + + * slime.el (sldb-break-on-return, sldb-break): New commands. + (slime-repl-return-string): Allow empty strings. That's our way + to send end-of-file. + (sldb-insert-condition): Add "extra" slot for random thing that + don't fit nicely somewhere else. + (sldb-dispatch-extras): New function. + (sldb-show-frame-source): New non-interactive version of + sldb-show-source. + (sldb-show-source): Use it. + (slime-beginning-of-symbol, slime-end-of-symbol): New functions + which don't include the character after a hash '#'. + (slime-symbol-name-at-point): Use them. + (slime-symbol-start-pos, slime-symbol-end-pos): Ditto. + 2004-09-17 Marco Baringer <mb(a)bese.it> * swank.lisp: Don't print "Documentation:" if none is available;

1 0

[slime-devel] cygwin custom hooks
by Reini Urban 17 Sep '04

17 Sep '04

Maybe you want this for your docs: To get Xemacs (native) working with cygwin clisp you'll need something like this: (for the dummies) cd slime clisp swank-loader (compiles the lisp backend) start xemacs Edit In File (.emacs) add something like this to your end: ;; SLIME (if (eq system-type 'windows-nt) (add-to-list 'load-path (concat invocation-directory "..\\..\\site-packages\\lisp\\slime")) (add-to-list 'load-path "/usr/share/xemacs/site-packages/lisp/slime")) (require 'easy-mmode) (defalias 'define-minor-mode 'easy-mmode-define-minor-mode) (if (require 'slime) (slime-setup)) (if (eq system-type 'windows-nt) (setq inferior-lisp-program "n:/bin/clisp.exe") (setq inferior-lisp-program "/usr/local/bin/clisp-base")) (defun myslime-cygwin-filename (filename) (if (eq system-type 'windows-nt) ; and lisp is cygwin (replace-in-string filename "\\\\" "/") filename)) M-x customize slime Open [Lisp] Change Translate To Lisp Filename Function: identity to myslime-cygwin-filename Same with Translate From Lisp Filename Function: [Save] M-x slime This will work with any windows and unix lisp, just add custom logic for different paths. You might want to use different conversion functions for from-lisp and to-lisp on unusual path mappings. PS: What I don't like is that inferior-lisp-program must be an EXE, bash scripts are not enough. Or am I wrong? -- Reini Urban http://xarch.tu-graz.ac.at/home/rurban/

1 0

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 17 Sep '04

17 Sep '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.536 slime/ChangeLog:1.537 --- slime/ChangeLog:1.536 Thu Sep 16 17:58:52 2004 +++ slime/ChangeLog Fri Sep 17 15:01:19 2004 @@ -1,3 +1,35 @@ +2004-09-17 Marco Baringer <mb(a)bese.it> + + * swank.lisp: Don't print "Documentation:" if none is available; + add support for classes specializer-direct-methods; deal with + eql-specializers in methods. + (inspector-princ): New function. + (method-specializers-for-inspect): New function. + (method-for-inspect-value): New function. + (inspect-for-emacs): Use inspector-princ instead of + princ-to-string. + + * swank-backend.lisp (swank-mop): Require eql-specializer, + eql-specializer-object and specializer-direct-methods in swank-mop + package. + + * swank-allegro.lisp, swank-clisp.lisp, swank-cmucl.lisp, + swank-openmcl.lisp, swank-sbcl.lisp (swank-mop): Export + eql-specializer, eql-specializer-object and + specializer-direct-methods from swank-mop. + + * swank-cmucl.lisp (inspect-for-emacs): Thinko fix. + + * swank-lispworks.lisp (swank-mop): Export + specializer-direct-methods. + (eql-specializer): Implement. + (eql-specializer-object): Implement. + + * swank-sbcl.lisp (inspect-for-emacs): Fix broken ignore + declaration. + + * doc/slime.texi: Update inspector documentation. + 2004-09-16 Marco Baringer <mb(a)bese.it> * swank-clisp.lisp (swank-mop, inspect-for-emacs): Only define the

1 0

[slime-devel] Is there an easy way to open an output stream in lisp that goes to a slime buffer?
by Peter Seibel 17 Sep '04

17 Sep '04

Clearly there's some machinery in SLIME for creating streams that are actually connected to sockets that communicate with emacs. My question is there an easy way to, on the Common Lisp side, open a stream such that a new buffer is created in emacs and all data sent to the stream will end up in that buffer? I.e. I'm hoping to be able to do something like this: (format (make-slime-stream) "hello, world!~%") and have "hello, world!" appear in a new emacs buffer. (Actually what I'm really hoping to do is redirect the log of AllegroServe to a slime buffer so it's easy to get at without it cluttering up either the SLIME REPL or *inferior-lisp*. -Peter -- Peter Seibel peter(a)javamonkey.com Lisp is the red pill. -- John Fraser, comp.lang.lisp

2 1

[slime-devel] more inspector updates (possible breakage)
by marco 17 Sep '04

17 Sep '04

the inspector now shows the specializer-direct-methods of a class and can deal with eql-specializers in methods. as usual i commited changes for lispworks and allegro without testing, if someone would mind updating to the latest slime and telling me if things break. thanks. p.s. - i'm done with the inspector (except for bug fixes) if someone is looking for a small slime project integrating the inspector and xref would be pretty cool. hint. hint. hint. -- -Marco Ring the bells that still can ring. Forget your perfect offering. There is a crack in everything. That's how the light gets in. -Leonard Cohen

2 1

[slime-devel] inspector for clisp
by marco 17 Sep '04

17 Sep '04

i just commited an implementation of the inspector for clisp. however it only runs on the CVS version of clisp (the one which has a complete MOP). how important is it that slime runs on clisp 2.33? -- -Marco Ring the bells that still can ring. Forget your perfect offering. There is a crack in everything. That's how the light gets in. -Leonard Cohen

4 9

[slime-devel] Daily ChangeLog diff
by Luke Gorrie 16 Sep '04

16 Sep '04

Index: slime/ChangeLog diff -u slime/ChangeLog:1.533 slime/ChangeLog:1.536 --- slime/ChangeLog:1.533 Wed Sep 15 21:00:15 2004 +++ slime/ChangeLog Thu Sep 16 17:58:52 2004 @@ -1,3 +1,16 @@ +2004-09-16 Marco Baringer <mb(a)bese.it> + + * swank-clisp.lisp (swank-mop, inspect-for-emacs): Only define the + CLOS parts of the inspector if the underlying lisp provides the + required functionality. If not enough MOP is present to implement + the inspector then we define some very simple replacement methods. + +2004-09-16 Marco Baringer <mb(a)bese.it> + + * swank-clisp.lisp (swank-mop): Implement the MOP compatability + package. + (inspect-for-emacs): Update for new inspection API. + 2004-09-15 Alan Ruttenberg <alanr-l(a)mumble.net> * swank-openmcl: typo in who-references. Fix frame-var-value

1 0