New upstream version; Resolves Bug #137050.

(Portage version: 2.1)

7 files changed, 195 insertions, 1 deletions

diff --git a/app-emacs/slime/ChangeLog b/app-emacs/slime/ChangeLog
index 35f08ed0ea12..578b426c3fd7 100644
--- a/app-emacs/slime/ChangeLog
+++ b/app-emacs/slime/ChangeLog
@@ -1,6 +1,14 @@
 # ChangeLog for app-emacs/slime
 # Copyright 2000-2006 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/app-emacs/slime/ChangeLog,v 1.25 2006/04/12 16:46:13 mkennedy Exp $
+# $Header: /var/cvsroot/gentoo-x86/app-emacs/slime/ChangeLog,v 1.26 2006/06/18 04:42:06 mkennedy Exp $
+
+*slime-2.0.0.20060617 (18 Jun 2006)
+
+  18 Jun 2006; Matthew Kennedy <mkennedy@gentoo.org>
+  +files/2.0.0.20060617/70slime-gentoo.el,
+  +files/2.0.0.20060617/README.Gentoo, +files/2.0.0.20060617/swank.asd,
+  +files/2.0.0.20060617/swank-loader.lisp, +slime-2.0.0.20060617.ebuild:
+  New upstream version; Resolves Bug #137050.
 
   12 Apr 2006; Matthew Kennedy <mkennedy@gentoo.org>
   files/1.2.1.20060205/70slime-gentoo.el:
diff --git a/app-emacs/slime/files/2.0.0.20060617/70slime-gentoo.el b/app-emacs/slime/files/2.0.0.20060617/70slime-gentoo.el
new file mode 100644
index 000000000000..2687bb5c4f14
--- /dev/null
+++ b/app-emacs/slime/files/2.0.0.20060617/70slime-gentoo.el
@@ -0,0 +1,13 @@
+
+;;; site-lisp configuration for slime-cvs
+
+(add-to-list 'load-path "@SITELISP@")
+(require 'slime)
+(slime-setup)
+
+;; this prevents us from requiring the user get dev-lisp/hyperspec
+;; (which is non-free) as a hard dependency
+
+(if (file-exists-p "/usr/share/doc/hyperspec/HyperSpec")
+    (setq common-lisp-hyperspec-root "file:///usr/share/doc/hyperspec/HyperSpec/")
+  (setq common-lisp-hyperspec-root "http://www.lispworks.com/reference/HyperSpec/"))
diff --git a/app-emacs/slime/files/2.0.0.20060617/README.Gentoo b/app-emacs/slime/files/2.0.0.20060617/README.Gentoo
new file mode 100644
index 000000000000..99353ee7aa29
--- /dev/null
+++ b/app-emacs/slime/files/2.0.0.20060617/README.Gentoo
@@ -0,0 +1,12 @@
+SLIME notes for Gentoo
+----------------------
+
+If you're interested in hacking this ebuild, Gentoo uses its own
+swank.asd system definition file and swank-loader.lisp.
+
+As always with CVS ebuilds, DO NOT report problems to upstream.
+Always report problems to the Gentoo Bugzilla at
+http://bugs.gentoo.org/.
+
+Matthew Kennedy <mkennedy@gentoo.org>
+
diff --git a/app-emacs/slime/files/2.0.0.20060617/swank-loader.lisp b/app-emacs/slime/files/2.0.0.20060617/swank-loader.lisp
new file mode 100644
index 000000000000..4d9b157312e6
--- /dev/null
+++ b/app-emacs/slime/files/2.0.0.20060617/swank-loader.lisp
@@ -0,0 +1,4 @@
+
+;; This file is NOT part of SLIME
+
+(asdf:oos 'asdf:load-op :swank)
diff --git a/app-emacs/slime/files/2.0.0.20060617/swank.asd b/app-emacs/slime/files/2.0.0.20060617/swank.asd
new file mode 100644
index 000000000000..48b9335c5679
--- /dev/null
+++ b/app-emacs/slime/files/2.0.0.20060617/swank.asd
@@ -0,0 +1,92 @@
+;;; -*- mode: lisp; syntax: common-lisp; package: common-lisp -*-
+
+(defpackage #:swank-system
+  (:use #:common-lisp
+        #:asdf))
+
+(defpackage #:swank-loader
+  (:use #:common-lisp)
+  (:export #:*source-directory*
+	   #:load-swank))
+
+(in-package #:swank-system)
+
+;; http://www.caddr.com/macho/archives/sbcl-devel/2004-3/3014.html
+
+(defclass unsafe-file (cl-source-file) ())
+
+(defmethod perform :around ((op compile-op) (c unsafe-file))
+  (setf (operation-on-warnings op) :ignore
+        (operation-on-failure op) :warn) ; adjust to taste
+  (call-next-method))
+
+(defmacro define-swank-system (&rest sysdep-components)
+  `(defsystem swank
+       :name "Swank is the Common Lips back-end to SLIME"
+       :serial t
+       :components ((:file "swank-backend")
+                    (:file "nregex")
+                    ,@(mapcar #'(lambda (component)
+                                  (if (atom component)
+                                      (list :file component)
+                                      component))
+                              sysdep-components)
+                    (:file "swank"))
+       :depends-on (#+sbcl sb-bsd-sockets)))
+
+#+sbcl (define-swank-system
+	  "swank-sbcl"
+	  "swank-source-path-parser"
+	  "swank-source-file-cache" 
+	  "swank-gray")
+
+#+openmcl (define-swank-system
+	    "metering"
+	    "swank-openmcl"
+	    "swank-gray")
+
+#+cmu (define-swank-system
+	"swank-source-path-parser" 
+	"swank-source-file-cache"
+	"swank-cmucl")
+
+#+clisp (define-swank-system
+	  "xref"
+	  "metering"
+	  "swank-clisp"
+	  "swank-gray")
+
+#+armedbear (define-swank-system
+		"swank-abcl")
+
+#+ecl (define-swank-system
+	  "swank-ecl" "swank-gray")
+
+(in-package #:swank-loader)
+
+(defvar *source-directory* 
+  (make-pathname :name nil :type nil 
+                 :defaults (or *load-pathname* *default-pathname-defaults*))
+  "The directory where to look for the source.")
+
+
+(defun load-user-init-file ()
+  "Load the user init file, return NIL if it does not exist."
+  (load (merge-pathnames (user-homedir-pathname)
+                         (make-pathname :name ".swank" :type "lisp"))
+        :if-does-not-exist nil))
+
+(defun load-site-init-file (directory)
+  (load (make-pathname :name "site-init" :type "lisp"
+                       :defaults directory)
+        :if-does-not-exist nil))
+
+(defun load-swank (&key (source-directory *source-directory*))
+  (asdf:oos 'asdf:load-op :swank)
+  (funcall (intern (string :warn-unimplemented-interfaces) :swank-backend))
+  (load-site-init-file source-directory)
+  (load-user-init-file))
+
+(load-swank)
+
+;; swank.asd ends here
diff --git a/app-emacs/slime/files/digest-slime-2.0.0.20060617 b/app-emacs/slime/files/digest-slime-2.0.0.20060617
new file mode 100644
index 000000000000..a8c29da1ffc8
--- /dev/null
+++ b/app-emacs/slime/files/digest-slime-2.0.0.20060617
@@ -0,0 +1,3 @@
+MD5 97e4bf25cb36b25b56f747aa4d061ad9 slime-2.0.0.20060617.tar.gz 473051
+RMD160 fb20268b7e2d67b7f9e190d16a09811b6ecdf344 slime-2.0.0.20060617.tar.gz 473051
+SHA256 5f0cf57ab69bc2220990550cd25bc7daeb115171a23c10c97c26ff3a1e4b2147 slime-2.0.0.20060617.tar.gz 473051
diff --git a/app-emacs/slime/slime-2.0.0.20060617.ebuild b/app-emacs/slime/slime-2.0.0.20060617.ebuild
new file mode 100644
index 000000000000..8873b48d4835
--- /dev/null
+++ b/app-emacs/slime/slime-2.0.0.20060617.ebuild
@@ -0,0 +1,62 @@
+# Copyright 1999-2006 Gentoo Foundation
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/app-emacs/slime/slime-2.0.0.20060617.ebuild,v 1.1 2006/06/18 04:42:06 mkennedy Exp $
+
+inherit elisp eutils
+
+DESCRIPTION="SLIME, the Superior Lisp Interaction Mode (Extended)"
+HOMEPAGE="http://common-lisp.net/project/slime/"
+
+SRC_URI="mirror://gentoo/${P}.tar.gz"
+LICENSE="GPL-2"
+SLOT="0"
+KEYWORDS="~amd64 ~ppc ~sparc ~x86"
+IUSE="doc"
+
+DEPEND="virtual/emacs
+	dev-lisp/common-lisp-controller
+	virtual/commonlisp
+	doc? ( sys-apps/texinfo )"
+
+CLPACKAGE=swank
+
+S=${WORKDIR}/slime
+
+src_compile() {
+	elisp-comp *.el || die
+	use doc && make -C doc slime.info
+}
+
+src_install() {
+	elisp-install ${PN} *.{el,elc} ${FILESDIR}/${PV}/swank-loader.lisp
+	elisp-site-file-install ${FILESDIR}/${PV}/70slime-gentoo.el
+	dodoc README* ChangeLog HACKING NEWS PROBLEMS
+	zcat ${D}/usr/share/doc/${PF}/ChangeLog.gz \
+		>${D}/usr/share/emacs/site-lisp/slime/ChangeLog
+	insinto /usr/share/common-lisp/source/swank
+	doins *.lisp ${FILESDIR}/${PV}/swank.asd
+	dodir /usr/share/common-lisp/systems
+	dosym /usr/share/common-lisp/source/swank/swank.asd \
+		/usr/share/common-lisp/systems
+	dodoc ${FILESDIR}/${PV}/README.Gentoo
+	if use doc; then
+		doinfo doc/slime.info
+	fi
+}
+
+pkg_preinst() {
+	unregister-common-lisp-source $CLPACKAGE || die
+}
+
+pkg_postrm() {
+	if ! [ -d /usr/share/common-lisp/source/$CLPACKAGE ]; then
+		unregister-common-lisp-source $CLPACKAGE || die
+	fi
+	elisp-site-regen || die
+}
+
+pkg_postinst() {
+	register-common-lisp-source $CLPACKAGE || die
+	elisp-site-regen || die
+	zcat /usr/share/doc/${PF}/README.Gentoo |while read line; do einfo "${line}"; done
+}