*** empty log message ***

5 files changed, 108 insertions, 8 deletions

diff --git a/dev-lisp/cmucl/ChangeLog b/dev-lisp/cmucl/ChangeLog
index 63f7d6df672f..1fdee1c254c7 100644
--- a/dev-lisp/cmucl/ChangeLog
+++ b/dev-lisp/cmucl/ChangeLog
@@ -1,6 +1,11 @@
 # ChangeLog for dev-lisp/cmucl
 # Copyright 2000-2004 Gentoo Foundation; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cmucl/ChangeLog,v 1.10 2004/06/24 23:57:39 agriffis Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cmucl/ChangeLog,v 1.11 2004/08/11 14:38:31 mkennedy Exp $
+
+*cmucl-19a (09 Aug 2004)
+
+  09 Aug 2004; <mkennedy@gentoo.org> cmucl-19a.ebuild:
+  Debian patch level bump
 
   18 May 2004; Mamoru KOMACHI <usata@gentoo.org> cmucl-18e-r1.ebuild,
   cmucl-18e-r2.ebuild, cmucl-18e-r3.ebuild, cmucl-18e-r4.ebuild,
diff --git a/dev-lisp/cmucl/Manifest b/dev-lisp/cmucl/Manifest
index b96e773c8d73..a16267b3281c 100644
--- a/dev-lisp/cmucl/Manifest
+++ b/dev-lisp/cmucl/Manifest
@@ -1,15 +1,16 @@
 MD5 b93215965e34d54ca6e9fd5431bac594 cmucl-18e-r4.ebuild 2888
-MD5 a8e4f96ceba850d0bf75015632ed5cf0 cmucl-19a.ebuild 3031
+MD5 496c9ecc3fee6d4e7c1eda8faaaad33f cmucl-19a.ebuild 3031
 MD5 637141c1d7519ba02ab16ba8073f86f4 cmucl-18e-r1.ebuild 3327
 MD5 29904b2e98286ec168bc9c87b0f3b0ac cmucl-18e-r3.ebuild 3411
 MD5 8f0849ab792a63ef81e036ee02f636e6 cmucl-18e-r2.ebuild 3195
+MD5 a8e4f96ceba850d0bf75015632ed5cf0 cmucl-19a.ebuild.~1.1.~ 3031
 MD5 294fa84eedbaa4115ecc5c47200f48cc ChangeLog 1746
 MD5 485e34143c90280ddfaacdc2309ffe35 cmucl-18e.ebuild 2669
 MD5 929688a2167434e2a4f0169de47e7428 metadata.xml 1107
 MD5 df309c5d109052b9c57d79bb4aac5871 files/digest-cmucl-18e-r3 137
 MD5 3e3791768309ef2b15c4e342b300980b files/digest-cmucl-18e 205
 MD5 df309c5d109052b9c57d79bb4aac5871 files/digest-cmucl-18e-r4 137
-MD5 e42b98430cb83b99c437195f3667196d files/digest-cmucl-19a 239
+MD5 a4b38b2a7ceb581cb18dc2c730f56370 files/digest-cmucl-19a 239
 MD5 df309c5d109052b9c57d79bb4aac5871 files/digest-cmucl-18e-r2 137
 MD5 3e3791768309ef2b15c4e342b300980b files/digest-cmucl-18e-r1 205
 MD5 b23a0a0d355d92b1a2123de8acd61418 files/19a/install-clc.lisp 1749
diff --git a/dev-lisp/cmucl/cmucl-19a.ebuild b/dev-lisp/cmucl/cmucl-19a.ebuild
index d5604f24da21..dd773b6aad3f 100644
--- a/dev-lisp/cmucl/cmucl-19a.ebuild
+++ b/dev-lisp/cmucl/cmucl-19a.ebuild
@@ -1,10 +1,10 @@
 # Copyright 1999-2004 Gentoo Foundation
 # Distributed under the terms of the GNU General Public License v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cmucl/cmucl-19a.ebuild,v 1.1 2004/08/07 05:22:07 mkennedy Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cmucl/cmucl-19a.ebuild,v 1.2 2004/08/11 14:38:31 mkennedy Exp $
 
 inherit common-lisp-common eutils
 
-DEB_PV=1
+DEB_PV=2
 MY_PV=${PV}-release-20040728
 
 DESCRIPTION="CMU Common Lisp is an implementation of ANSI Common Lisp"
@@ -66,8 +66,7 @@ src_install() {
 	insinto /usr/lib/cmucl
 	doins ${FILESDIR}/${PV}/install-clc.lisp
 	exeinto /usr/lib/common-lisp/bin
-	cp own-work/cmucl-script.sh cmucl.sh
-	doexe cmucl.sh
+	doexe ${FILESDIR}/${PV}/cmucl.sh
 
 	insinto /etc/common-lisp/cmucl
 	sed "s,@PF@,${PF},g" <${FILESDIR}/${PV}/site-init.lisp.in >site-init.lisp
diff --git a/dev-lisp/cmucl/files/19a/cmucl.sh b/dev-lisp/cmucl/files/19a/cmucl.sh
new file mode 100644
index 000000000000..16772da268f0
--- /dev/null
+++ b/dev-lisp/cmucl/files/19a/cmucl.sh
@@ -0,0 +1,95 @@
+#!/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 --git a/dev-lisp/cmucl/files/digest-cmucl-19a b/dev-lisp/cmucl/files/digest-cmucl-19a
index 02081ab3d5fa..f0944c7823b9 100644
--- a/dev-lisp/cmucl/files/digest-cmucl-19a
+++ b/dev-lisp/cmucl/files/digest-cmucl-19a
@@ -1,3 +1,3 @@
 MD5 6b37fe4815935af73f0efd1312e6a969 cmucl_19a-release-20040728.orig.tar.gz 4456803
-MD5 a1b0e25d77646e6f83a0c723f2e46b14 cmucl_19a-release-20040728-1.diff.gz 1500168
+MD5 f4b9605ca8a7e2bb3b3030df0f597102 cmucl_19a-release-20040728-2.diff.gz 1499700
 MD5 8d2afba837c28149944d3edd02af8b86 cmucl-19a-x86-linux.tar.bz2 7237512