diff options
Diffstat (limited to 'dev-lisp/cmucl/files/18e')
-rw-r--r-- | dev-lisp/cmucl/files/18e/README.Gentoo | 31 | ||||
-rw-r--r-- | dev-lisp/cmucl/files/18e/herald-save.lisp-gentoo.patch | 18 | ||||
-rw-r--r-- | dev-lisp/cmucl/files/18e/install-clc.lisp-gentoo.patch | 35 | ||||
-rw-r--r-- | dev-lisp/cmucl/files/18e/site-init.lisp.in | 54 |
4 files changed, 0 insertions, 138 deletions
diff --git a/dev-lisp/cmucl/files/18e/README.Gentoo b/dev-lisp/cmucl/files/18e/README.Gentoo deleted file mode 100644 index 885807587fb5..000000000000 --- a/dev-lisp/cmucl/files/18e/README.Gentoo +++ /dev/null @@ -1,31 +0,0 @@ - -* README.Gentoo -- Gentoo Specific Notes for dev-lisp/cmucl - -** About dev-lisp/cmucl - -The dev-lisp/cmucl ebuild in portage aim to provide a port of -Debian's package of CMUCL. Thus the Gentoo CMUCL port should be -binary compatible with the Debian port. - -** Linux Miscellaneous Binary Support - -You can have your compiled Lisp .x86f files automatically executed -like any other binary by executing the following command: - - echo ':lisp:E::x86f::/usr/bin/lisp-start:' \ - >/proc/sys/fs/binfmt_misc/register - -Note: you need kernel support for this. A good place to put the -above command is in your /etc/conf.d/localstart. - -** Credit - -This Gentoo package, like many other Gentoo packages in the dev-lisp -category, benifit from the Debian Project's work. - - -- Matthew Kennedy <mkennedy@gentoo.org> - - -Local Variables: *** -mode: outline *** -End: *** diff --git a/dev-lisp/cmucl/files/18e/herald-save.lisp-gentoo.patch b/dev-lisp/cmucl/files/18e/herald-save.lisp-gentoo.patch deleted file mode 100644 index 62d6e66d0750..000000000000 --- a/dev-lisp/cmucl/files/18e/herald-save.lisp-gentoo.patch +++ /dev/null @@ -1,18 +0,0 @@ -diff -ur cmucl-18e.original/src/code/save.lisp cmucl-18e/src/code/save.lisp ---- cmucl-18e.original/src/code/save.lisp 2003-06-08 02:23:44.000000000 -0500 -+++ cmucl-18e/src/code/save.lisp 2004-01-14 14:03:28.487836232 -0600 -@@ -289,11 +289,9 @@ - )) - - (setf (getf *herald-items* :bugs) -- '("For support see http://www.cons.org/cmucl/support.html Send bug reports to the debian BTS." -- terpri -- "or to " -- "pvaneynd@debian.org" terpri -- "type (help) for help, (quit) to exit, and (demo) to see the demos" terpri -+ '("For support see http://www.cons.org/cmucl/support.html" terpri -+ "Send bug reports to http://bugs.gentoo.org." terpri -+ "Type (help) for help or (quit) to exit." terpri - terpri - "Loaded subsystems:")) - diff --git a/dev-lisp/cmucl/files/18e/install-clc.lisp-gentoo.patch b/dev-lisp/cmucl/files/18e/install-clc.lisp-gentoo.patch deleted file mode 100644 index b155c7f16156..000000000000 --- a/dev-lisp/cmucl/files/18e/install-clc.lisp-gentoo.patch +++ /dev/null @@ -1,35 +0,0 @@ -diff -ur cmucl-18e.original/own-work/install-clc.lisp cmucl-18e/own-work/install-clc.lisp ---- cmucl-18e.original/own-work/install-clc.lisp 2003-05-02 02:49:32.000000000 -0500 -+++ cmucl-18e/own-work/install-clc.lisp 2004-01-15 02:25:05.514260000 -0600 -@@ -10,15 +10,17 @@ - (load "/usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp")) - (unix:unix-exit 1)) - --(unless (ignore-errors -+;; (unless (ignore-errors - (common-lisp-controller:init-common-lisp-controller - "/usr/lib/common-lisp/cmucl/" - :version 3) -- t) -- (format t "~%Error during init of common-lisp-controller~%") -- (unix:unix-exit 1)) -+;; t) -+;; (format t "~%Error during init of common-lisp-controller~%") -+;; (unix:unix-exit 1)) - --(defun common-lisp-controller:send-clc-command (command package) -+(in-package :common-lisp-controller) -+ -+(defun send-clc-command (command package) - (let ((process - (ext:run-program "/usr/bin/clc-send-command" - (list -@@ -40,6 +42,8 @@ - package - "cmucl")))) - -+(in-package "COMMON-LISP-USER") -+ - (unless (ignore-errors - ;; it loaded, configure it for common-lisp-controller use: - (format t "~%Saving to new-lisp.core...") diff --git a/dev-lisp/cmucl/files/18e/site-init.lisp.in b/dev-lisp/cmucl/files/18e/site-init.lisp.in deleted file mode 100644 index 94f999802061..000000000000 --- a/dev-lisp/cmucl/files/18e/site-init.lisp.in +++ /dev/null @@ -1,54 +0,0 @@ -;;; -*- Mode: Lisp; Package: System -*- -;;; -;;; ********************************************************************** -;;; This code was written as part of the CMU Common Lisp project at -;;; Carnegie Mellon University, and has been placed in the public domain. -;;; - -;;; Heavy modifications by Peter Van Eynde - -;;; More modifications for Gentoo by Matthew Kennedy -;;; <mkennedy@gentoo.org> - -(in-package "SYSTEM") - -(if (probe-file "/etc/lisp-config.lisp") - (load "/etc/lisp-config.lisp") - (format t "~%;;; Warning: There is no /etc/lisp-config.lisp file (which should have been created during emerge")) - -;;; If you have sources installed on your system, un-comment the following form -;;; and change it to point to the source location. This will allow the Hemlock -;;; "Edit Definition" command and the debugger to find sources for functions in -;;; the core. -(setf (ext:search-list "target:") - '( - "/usr/share/common-lisp/source/cmucl/" ; object dir - )) - -(setf (ext:search-list "library:") '("/usr/lib/cmucl/")) -;;; for safety... - -;;; optional extentions to the lisp image: delete if you -;;; don't like them :-). -(in-package :common-lisp-user) - -;;; newbie functions, delete if you don't like them - -(defun help () - (format t "~ -Welcome to the Gentoo GNU/Linux port of CMUCL. - -The CMUCL REPL does not have GNU Readline-like support, however -you may wish to install rlwap (see: app-misc/rlwrap) to achieve -the same effect. - -If you think you found a bug, please use http://bugs.gentoo.org/ - -Read the documentation in /usr/share/doc/@PF@. - -(quit) exit Lisp -(describe 'foo) gives information about foo -(inspect '*foo*) interactively inspects *foo* -(apropos \"foo\") briefly describe all symbols which match \"foo\" -")) - |