cmucl remove old ebuilds
Sat Nov 4 22:10:47 PST 2006 Matthew Kennedy <mkennedy@common-lisp.net>
* cmucl remove old ebuilds
diff -rN -u old-portage-overlay/dev-lisp/cmucl/cmucl-19c.ebuild new-portage-overlay/dev-lisp/cmucl/cmucl-19c.ebuild
--- old-portage-overlay/dev-lisp/cmucl/cmucl-19c.ebuild 2014-07-30 12:19:08.000000000 -0700
+++ new-portage-overlay/dev-lisp/cmucl/cmucl-19c.ebuild 1969-12-31 16:00:00.000000000 -0800
@@ -1,171 +0,0 @@
-# Copyright 1999-2006 Gentoo Foundation
-# Distributed under the terms of the GNU General Public License v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cmucl/cmucl-19c.ebuild,v 1.4 2006/09/21 15:55:14 ticho Exp $
-
-inherit common-lisp-common-2 eutils toolchain-funcs
-
-DEB_PV=1
-MY_PV=${PV}-release-20051115
-
-DESCRIPTION="CMU Common Lisp is an implementation of ANSI Common Lisp"
-HOMEPAGE="http://www.cons.org/cmucl/
- http://packages.debian.org/unstable/devel/cmucl.html"
-SRC_URI="http://ftp.debian.org/debian/pool/main/c/cmucl/cmucl_${MY_PV}.orig.tar.gz
- http://ftp.debian.org/debian/pool/main/c/cmucl/cmucl_${MY_PV}-${DEB_PV}.diff.gz
- ftp://ftp.common-lisp.net/pub/project/cmucl/release/${PV}/${P}-x86-linux.tar.bz2"
-
-LICENSE="public-domain"
-SLOT="0"
-KEYWORDS="x86"
-IUSE="doc lesstif nosource"
-
-DEPEND=">=dev-lisp/common-lisp-controller-4
- doc? ( virtual/tetex )
- lesstif? ( x11-libs/lesstif )
- !lesstif? ( x11-libs/openmotif )
- sys-devel/bc"
-
-PROVIDE="virtual/commonlisp"
-
-S=${WORKDIR}/cmucl-${MY_PV}.orig
-
-src_unpack() {
- unpack ${A}
- epatch cmucl_${MY_PV}-${DEB_PV}.diff || die
- epatch ${FILESDIR}/${PV}/herald-save.lisp-gentoo.patch || die
-
- find ${S} -type f \( -name \*.sh -o -name linux-nm \) \
- -exec chmod +x '{}' \;
-}
-
-src_compile() {
- export SANDBOX_ON=0
-
- # non-x86 maintainers, add to the the following and verify
-
- if use lesstif || test -d /usr/X11R6/include/lesstif; then
- sed -i -e 's,-I/usr/X11R6/include,-I/usr/X11R6/include/lesstif,g' \
- -e 's,-L/usr/X11R6/lib,-L/usr/X11R6/lib/lesstif -L/usr/X11R6/lib,g' \
- src/motif/server/Config.x86
- fi
-
- sed -i -e "s,CC = .*,CC = $(tc-getCC),g" \
- src/lisp/Config.linux_gencgc
-
- PATH=${WORKDIR}/bin:$PATH CMUCLCORE=${WORKDIR}/lib/cmucl/lib/lisp.core make || die
-
- if use doc; then
- make -C src/docs
- fi
-}
-
-src_install() {
- insinto /usr/lib/cmucl/include
- doins src/lisp/*.h target/lisp/*.h target/lisp/*.map target/lisp/*.nm
- insinto /usr/lib/cmucl
- cp target/lisp/lisp.core lisp-dist.core
- doins lisp-dist.core
-
- dodoc target/lisp/lisp.{nm,map}
- doman src/general-info/{cmucl,lisp}.1
-
- dobin target/lisp/lisp
- dobin own-work/Demos/lisp-start
-
- insinto /usr/lib/cmucl
- doins own-work/install-clc.lisp
- exeinto /usr/lib/common-lisp/bin
- newexe own-work/cmucl-script.sh cmucl.sh
-
- insinto /etc/common-lisp/cmucl
- sed "s,@PF@,${PF},g" <${FILESDIR}/${PV}/site-init.lisp.in >site-init.lisp
- doins site-init.lisp
- dosym /etc/common-lisp/cmucl/site-init.lisp /usr/lib/cmucl/site-init.lisp
-
- dodir /etc/env.d
- cat >${D}/etc/env.d/50cmucl <<EOF
-# CMUCLLIB=/usr/lib/cmucl
-EOF
- [ -f /etc/lisp-config.lisp ] || touch ${D}/etc/lisp-config.lisp
-
- insinto /usr/share/doc/${P}/html/Basic-tutorial
- doins own-work/tutorials/Basic-tutorial/*
- insinto /usr/share/doc/${P}/html/Clos
- doins own-work/tutorials/Clos/*
- docinto notes
- dodoc own-work/tutorials/notes/*
-
- insinto /usr/lib/cmucl
- doins own-work/hemlock11.*
-
- if use doc; then
- dodoc src/docs/*/*.{ps,pdf}
- fi
-
- exeinto /usr/lib/cmucl
- doexe target/motif/server/motifd
-
- # subsystems
- insinto /usr/lib/cmucl/subsystems/
- doins target/interface/clm-library.x86f \
- target/pcl/simple-streams-library.x86f \
- target/pcl/iodefs-library.x86f \
- target/pcl/gray-compat-library.x86f \
- target/hemlock/hemlock-library.x86f \
- target/pcl/gray-streams-library.x86f \
- target/clx/clx-library.x86f
-
- # Previously installed from dev-lisp/cmucl-source
- if ! use nosource; then
- dodir /usr/share/common-lisp/source/cmucl
- (cd src ; find . -name \*.lisp -and -type f | tar --create --file=- --files-from=- ) |\
- tar --extract --file=- -C ${D}/usr/share/common-lisp/source/cmucl
- dodir /usr/share/common-lisp/systems
- fi
-
- # cmucl-graystream
- insinto /usr/share/common-lisp/source/cmucl-graystream
- doins src/pcl/gray-streams* own-work/cmucl-graystream.asd
- dosym /usr/share/common-lisp/source/cmucl-graystream/cmucl-graystream.asd \
- /usr/share/common-lisp/systems/
-
- # cmucl-clx
- insinto /usr/share/common-lisp/source/cmucl-clx
- cp -r src/clx/*.lisp own-work/cmucl-clx.asd \
- src/code/clx-ext.lisp \
- src/hemlock/charmacs.lisp \
- src/hemlock/key-event.lisp \
- src/hemlock/keysym-defs.lisp \
- ${D}/usr/share/common-lisp/source/cmucl-clx
- insinto /usr/share/common-lisp/source/cmucl-clx/debug
- doins src/clx/debug/*.lisp
- insinto /usr/share/common-lisp/source/cmucl-clx/demo
- doins src/clx/demo/*.lisp
- insinto /usr/share/common-lisp/source/cmucl-clx/test
- doins src/clx/test/*.lisp
-# find ${D}/usr/share/common-lisp/source/cmucl-clx -type f -print0 | xargs -0 chmod 644
-# find ${D}/usr/share/common-lisp/source/cmucl-clx -type d -print0 | xargs -0 chmod 755
- dosym /usr/share/common-lisp/source/cmucl-clx/cmucl-clx.asd \
- /usr/share/common-lisp/systems/
-
- keepdir /usr/lib/common-lisp/cmucl
- impl-save-timestamp-hack cmucl || die
-}
-
-pkg_postinst() {
- standard-impl-postinst cmucl
- register-common-lisp-source cmucl-graystream
- register-common-lisp-source cmucl-clx
-}
-
-pkg_prerm() {
- standard-impl-postrm cmucl /usr/bin/lisp
- unregister-common-lisp-source cmucl-graystream
- unregister-common-lisp-source cmucl-clx
-}
-
-pkg_postrm() {
- if [ ! -x /usr/bin/lisp ]; then
- rm -rf /usr/lib/cmucl/ || die
- fi
-}
diff -rN -u old-portage-overlay/dev-lisp/cmucl/files/19c/README.Gentoo new-portage-overlay/dev-lisp/cmucl/files/19c/README.Gentoo
--- old-portage-overlay/dev-lisp/cmucl/files/19c/README.Gentoo 2014-07-30 12:19:08.000000000 -0700
+++ new-portage-overlay/dev-lisp/cmucl/files/19c/README.Gentoo 1969-12-31 16:00:00.000000000 -0800
@@ -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 -rN -u old-portage-overlay/dev-lisp/cmucl/files/19c/cmucl.sh new-portage-overlay/dev-lisp/cmucl/files/19c/cmucl.sh
--- old-portage-overlay/dev-lisp/cmucl/files/19c/cmucl.sh 2014-07-30 12:19:08.000000000 -0700
+++ new-portage-overlay/dev-lisp/cmucl/files/19c/cmucl.sh 1969-12-31 16:00:00.000000000 -0800
@@ -1,95 +0,0 @@
-#!/bin/sh
-
-if [ ! -f /usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp ] ; then
- cat <<EOF
-$0: cannot find the common-lisp-controller source.
-EOF
- exit 0
-fi
-
-IMAGE=/usr/lib/cmucl/lisp.core
-DIR=cmucl
-
-case $1 in
- rebuild)
- echo $0 rebuilding...
- shift
- while [ ! -z "$1" ] ; do
- echo rebuilding $1
- /usr/bin/lisp -core $IMAGE -eval "
-(let ((*gc-verbose* nil)
- (*compile-print* nil)
- (*compile-progress* nil)
- (*compile-verbose* nil)
- (*require-verbose* nil)
- (*load-verbose* nil))
- (load \"/etc/common-lisp/cmucl/site-init.lisp\"))
-(let ((*gc-verbose* nil)
- (*compile-print* t)
- (*compile-progress* nil)
- (*compile-verbose* t)
- (*require-verbose* t)
- (*load-verbose* t)
- (mk::*load-source-if-no-binary* nil)
- (mk::*bother-user-if-no-binary* nil)
- (mk::*compile-during-load* t))
-
- (handler-case
- (progn
- (with-compilation-unit (:optimize '((inhibit-warnings 3)))
- (common-lisp-controller:compile-library :$1))
- (unix:unix-exit 0))
- (error (e)
- (ignore-errors (format t \"~&Built Error: ~A~%\" e))
- (finish-output)
- (unix:unix-exit 1)))))" -nositeinit -noinit -batch -quiet || exit 1
- shift
- done
- ;;
- remove)
- echo $0 removing packages...
- shift
- while [ ! -z "$1" ] ; do
- rm -rf "/usr/lib/common-lisp/$DIR/$1"
- shift
- done
- rmdir /usr/lib/common-lisp/$DIR 2> /dev/null
- ;;
- install-defsystem|install-clc)
- echo installing the clc...
- ( cd /usr/lib/cmucl
- [ -f $IMAGE ] && rm -f $IMAGE
- /usr/bin/lisp \
- -core ${IMAGE%.core}-dist.core -load /usr/lib/cmucl/install-clc.lisp \
- -nositeinit -noinit -batch -quiet && \
- mv new-lisp.core $IMAGE || (echo FAILED ; ln ${IMAGE%.core}-dist.core $IMAGE ) )
- ;;
- remove-defsystem|remove-clc)
- [ -f $IMAGE ] && rm -f $IMAGE
- ;;
- make-user-image)
- if [ ! -f $1 ] ; then
- echo Cannot find file $1 to load and dump!
- exit 321
- fi
- /usr/bin/lisp -core $IMAGE -eval "
-(load \"$1\")
- ;;
- ;; Enable the garbage collector. But first fake it into thinking that
- ;; we don't need to garbage collect. The save-lisp is going to call
- ;; purify so any garbage will be collected then.
-#-gengc (setf lisp::*need-to-collect-garbage* nil)
-(gc-on)
- ;;
- ;; Save the lisp.
-(setf ext:*batch-mode* nil)
-(save-lisp #p\"home:lisp.core\")" -nositeinit -noinit -batch -quiet && echo New image created
- ;;
- *)
- echo $0 unkown command $1
- echo known commands: install-clc, remove-clc,rebuild and remove
- exit 1
- ;;
-esac
-
-exit 0
diff -rN -u old-portage-overlay/dev-lisp/cmucl/files/19c/herald-save.lisp-gentoo.patch new-portage-overlay/dev-lisp/cmucl/files/19c/herald-save.lisp-gentoo.patch
--- old-portage-overlay/dev-lisp/cmucl/files/19c/herald-save.lisp-gentoo.patch 2014-07-30 12:19:08.000000000 -0700
+++ new-portage-overlay/dev-lisp/cmucl/files/19c/herald-save.lisp-gentoo.patch 1969-12-31 16:00:00.000000000 -0800
@@ -1,18 +0,0 @@
-diff -ur cmucl-19c-release-20051115.orig.orig/src/code/save.lisp cmucl-19c-release-20051115.orig/src/code/save.lisp
---- cmucl-19c-release-20051115.orig.orig/src/code/save.lisp 2005-12-07 12:27:38.000000000 -0600
-+++ cmucl-19c-release-20051115.orig/src/code/save.lisp 2005-12-07 12:29:30.000000000 -0600
-@@ -297,11 +297,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 -rN -u old-portage-overlay/dev-lisp/cmucl/files/19c/install-clc.lisp new-portage-overlay/dev-lisp/cmucl/files/19c/install-clc.lisp
--- old-portage-overlay/dev-lisp/cmucl/files/19c/install-clc.lisp 2014-07-30 12:19:08.000000000 -0700
+++ new-portage-overlay/dev-lisp/cmucl/files/19c/install-clc.lisp 1969-12-31 16:00:00.000000000 -0800
@@ -1,55 +0,0 @@
-;;; -*- Mode: LISP; Package: CL-USER -*-
-;;;
-;;; Copyright Peter Van Eynde, 2001
-;;;
-;;; License: LGPL v2
-;;;
-(in-package "COMMON-LISP-USER")
-
-(unless (ignore-errors
- (load "/usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp"))
- (unix:unix-exit 1))
-
-;; (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))
-
-(in-package :common-lisp-controller)
-
-(defun send-clc-command (command package)
- (let ((process
- (ext:run-program "/usr/bin/clc-send-command"
- (list
- (ecase command
- (:recompile "recompile")
- (:remove "remove"))
- (format nil "~A" package)
- "cmucl"
- "--quiet")
- :wait t)))
- (if (= (ext:process-exit-code process)
- 0)
- ;; no error
- (values)
- (error "An error happend during ~A of ~A for ~A~%Please see /usr/share/doc/common-lisp-controller/REPORTING-BUGS.gz"
- (ecase command
- (:recompile "recompilation")
- (:remove "removal"))
- 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...")
- (ext:gc :full t)
- (setf ext:*batch-mode* nil)
- (ext:save-lisp "new-lisp.core"
- :purify t))
- (unix:unix-exit 1))
-
diff -rN -u old-portage-overlay/dev-lisp/cmucl/files/19c/site-init.lisp.in new-portage-overlay/dev-lisp/cmucl/files/19c/site-init.lisp.in
--- old-portage-overlay/dev-lisp/cmucl/files/19c/site-init.lisp.in 2014-07-30 12:19:08.000000000 -0700
+++ new-portage-overlay/dev-lisp/cmucl/files/19c/site-init.lisp.in 1969-12-31 16:00:00.000000000 -0800
@@ -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\"
-"))
-