[slime-cvs] CVS slime/contrib

[CVS User trittweiler]

Update of /project/slime/cvsroot/slime/contrib
In directory cl-net:/tmp/cvs-serv5261/contrib

Modified Files:
	swank-sbcl-exts.lisp slime-sbcl-exts.el ChangeLog 
Log Message:

	* swank-sbcl-exts.lisp: Wrap file in a big #+sbcl (PROGN ...), so
	users can use the `slime-sbcl-exts' contrib in their .emacs
	nevermind what implementation they actually use.
	(Reported by Stas Boukarev)


--- /project/slime/cvsroot/slime/contrib/swank-sbcl-exts.lisp	2008/12/30 17:17:07	1.1
+++ /project/slime/cvsroot/slime/contrib/swank-sbcl-exts.lisp	2008/12/31 12:31:31	1.2
@@ -6,7 +6,14 @@
 ;;
 
 (in-package :swank)
-
+
+(swank-require :swank-arglists)
+
+;; We need to do this so users can place `slime-sbcl-exts' into their
+;; ~/.emacs, and still use any implementation they want.
+#+sbcl
+(progn
+  
 ;;; Display arglist of instructions.
 ;;;
 (defmethod compute-enriched-decoded-arglist ((operator-form (eql 'sb-assem:inst))
@@ -31,4 +38,6 @@
                           t))))))))
 
 
+) ; PROGN
+
 (provide :swank-sbcl-exts)
--- /project/slime/cvsroot/slime/contrib/slime-sbcl-exts.el	2008/12/30 17:17:08	1.1
+++ /project/slime/cvsroot/slime/contrib/slime-sbcl-exts.el	2008/12/31 12:31:32	1.2
@@ -8,8 +8,12 @@
 (require 'slime-autodoc)
 (require 'slime-references)
 
-(push '("INST" . (slime-make-extended-operator-parser/look-ahead 1))
-      slime-extended-operator-name-parser-alist)
+(defun slime-enable-autodoc-for-sb-assem:inst ()
+  (push '("INST" . (slime-make-extended-operator-parser/look-ahead 1))
+        slime-extended-operator-name-parser-alist))
+
+(defun slime-sbcl-exts-init ()
+  (slime-enable-autodoc-for-sb-assem:inst))
 
 (slime-require :swank-sbcl-exts)
 
--- /project/slime/cvsroot/slime/contrib/ChangeLog	2008/12/31 11:25:46	1.158
+++ /project/slime/cvsroot/slime/contrib/ChangeLog	2008/12/31 12:31:32	1.159
@@ -1,3 +1,10 @@
+2008-12-31  Tobias C. Rittweiler  <tcr at freebits.de>
+
+	* swank-sbcl-exts.lisp: Wrap file in a big #+sbcl (PROGN ...), so
+	users can use the `slime-sbcl-exts' contrib in their .emacs
+	nevermind what implementation they actually use.
+	(Reported by Stas Boukarev)
+
 2008-12-31  Helmut Eller  <heller at common-lisp.net>
 
 	* inferior-slime.el (inferior-slime-change-directory): New