New upstream version.

(Portage version: 2.0.53)

5 files changed, 115 insertions, 0 deletions

diff --git a/app-emacs/slime/files/1.2.1.20051211/70slime-gentoo.el b/app-emacs/slime/files/1.2.1.20051211/70slime-gentoo.el
new file mode 100644
index 000000000000..105a1c76e689
--- /dev/null
+++ b/app-emacs/slime/files/1.2.1.20051211/70slime-gentoo.el
@@ -0,0 +1,16 @@
+
+;;; site-lisp configuration for slime-cvs
+
+(add-to-list 'load-path "@SITELISP@")
+(require 'slime)
+(add-hook 'lisp-mode-hook
+	  (lambda () (slime-mode t)))
+(add-hook 'inferior-lisp-mode-hook
+	  (lambda () (inferior-slime-mode t)))
+
+;; 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/1.2.1.20051211/README.Gentoo b/app-emacs/slime/files/1.2.1.20051211/README.Gentoo
new file mode 100644
index 000000000000..99353ee7aa29
--- /dev/null
+++ b/app-emacs/slime/files/1.2.1.20051211/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/1.2.1.20051211/swank-loader.lisp b/app-emacs/slime/files/1.2.1.20051211/swank-loader.lisp
new file mode 100644
index 000000000000..4d9b157312e6
--- /dev/null
+++ b/app-emacs/slime/files/1.2.1.20051211/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/1.2.1.20051211/swank.asd b/app-emacs/slime/files/1.2.1.20051211/swank.asd
new file mode 100644
index 000000000000..d5de5b7de4a5
--- /dev/null
+++ b/app-emacs/slime/files/1.2.1.20051211/swank.asd
@@ -0,0 +1,81 @@
+;;; -*- mode: lisp; syntax: common-lisp; package: common-lisp -*-
+
+(defpackage #:swank-system
+  (:use #:common-lisp
+        #:asdf))
+
+(defpackage #:swank-loader
+  (:use #:common-lisp))
+
+(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)
+
+(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 ()
+  (load (make-pathname :name "site-init" :type "lisp"
+                       :defaults *load-truename*)
+        :if-does-not-exist nil))
+
+(funcall (intern (string :warn-unimplemented-interfaces) :swank-backend))
+
+(load-site-init-file)
+(load-user-init-file)
+
+;; swank.asd ends here
diff --git a/app-emacs/slime/files/digest-slime-1.2.1.20051211 b/app-emacs/slime/files/digest-slime-1.2.1.20051211
new file mode 100644
index 000000000000..5d90b3f00873
--- /dev/null
+++ b/app-emacs/slime/files/digest-slime-1.2.1.20051211
@@ -0,0 +1,2 @@
+MD5 4f57feaf262dd67f134de7874701e812 slime-1.2.1-CVS-2005-12-11-gentoo.patch.bz2 106345
+MD5 f7fabc03e1ec5a4d380f0890141058d9 slime-1.2.1.tar.gz 373957