*** empty log message ***

5 files changed, 178 insertions, 4 deletions

diff --git a/dev-lisp/cl-ncurses/ChangeLog b/dev-lisp/cl-ncurses/ChangeLog
index a85dc199e6f6..31bbcde2d48a 100644
--- a/dev-lisp/cl-ncurses/ChangeLog
+++ b/dev-lisp/cl-ncurses/ChangeLog
@@ -1,6 +1,12 @@
 # ChangeLog for dev-lisp/cl-ncurses
 # Copyright 2000-2004 Gentoo Technologies, Inc.; Distributed under the GPL v2
-# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-ncurses/ChangeLog,v 1.1 2004/03/09 08:01:18 mkennedy Exp $
+# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-ncurses/ChangeLog,v 1.2 2004/05/09 19:12:07 mkennedy Exp $
+
+*cl-ncurses-0.1.1 (09 May 2004)
+
+  09 May 2004; <mkennedy@gentoo.org> +files/cl-ncurses-0.1.1-gentoo.patch,
+  +cl-ncurses-0.1.1.ebuild:
+  New upstream version.
 
 *cl-ncurses-0.1 (09 Mar 2004)
 
diff --git a/dev-lisp/cl-ncurses/Manifest b/dev-lisp/cl-ncurses/Manifest
index 4f7051fdfaed..de0b7037f97f 100644
--- a/dev-lisp/cl-ncurses/Manifest
+++ b/dev-lisp/cl-ncurses/Manifest
@@ -1,5 +1,7 @@
-MD5 96ddfd050deda89c9edb35514e57d926 files/cl-ncurses-0.1-gentoo.patch 4484
-MD5 b6ca5ee7861336d468ffa7b3d05eea9d files/digest-cl-ncurses-0.1 62
-MD5 071f450ade59bade7ae54d740f5316c7 ChangeLog 442
+MD5 be348984cba3c0834ef4c6f272e586c9 cl-ncurses-0.1.1.ebuild 960
 MD5 be348984cba3c0834ef4c6f272e586c9 cl-ncurses-0.1.ebuild 960
+MD5 071f450ade59bade7ae54d740f5316c7 ChangeLog 442
 MD5 9b65b0341efc8f4b29498aad23315229 metadata.xml 164
+MD5 96ddfd050deda89c9edb35514e57d926 files/cl-ncurses-0.1-gentoo.patch 4484
+MD5 8327fc1accbd03c886c202908a8628e7 files/digest-cl-ncurses-0.1.1 64
+MD5 b6ca5ee7861336d468ffa7b3d05eea9d files/digest-cl-ncurses-0.1 62
diff --git a/dev-lisp/cl-ncurses/cl-ncurses-0.1.1.ebuild b/dev-lisp/cl-ncurses/cl-ncurses-0.1.1.ebuild
new file mode 100644
index 000000000000..1a7bbb456aaf
--- /dev/null
+++ b/dev-lisp/cl-ncurses/cl-ncurses-0.1.1.ebuild
@@ -0,0 +1,39 @@
+# Copyright 1999-2004 Gentoo Technologies, Inc.
+# Distributed under the terms of the GNU General Public License v2
+# $Header: /var/cvsroot/gentoo-x86/dev-lisp/cl-ncurses/cl-ncurses-0.1.1.ebuild,v 1.1 2004/05/09 19:12:07 mkennedy Exp $
+
+inherit common-lisp eutils
+
+DESCRIPTION="CL-NCURSES is a NCURSES interface for Common Lisp on Unix-platforms."
+HOMEPAGE="http://www.common-lisp.net/project/cl-ncurses/"
+SRC_URI="http://common-lisp.net/project/cl-ncurses/files/cl-ncurses_${PV}.tgz"
+
+LICENSE="MIT"
+SLOT="0"
+KEYWORDS="~x86"
+
+DEPEND="dev-lisp/common-lisp-controller
+	virtual/commonlisp"
+
+CLPACKAGE=cl-ncurses
+
+S=${WORKDIR}/cl-ncurses_${PV}
+
+src_unpack() {
+	unpack ${A}
+	cd ${S} && epatch ${FILESDIR}/cl-ncurses-${PV}-gentoo.patch
+}
+
+src_compile() {
+	make || die
+}
+
+src_install() {
+	common-lisp-install *.lisp cl-ncurses.asd
+	common-lisp-system-symlink
+	dodoc README
+	exeinto /usr/lib/cl-ncurses
+	doexe glue.so
+	insinto ${CLSOURCEROOT}/${PN}/tests
+	doins tests/*
+}
diff --git a/dev-lisp/cl-ncurses/files/cl-ncurses-0.1.1-gentoo.patch b/dev-lisp/cl-ncurses/files/cl-ncurses-0.1.1-gentoo.patch
new file mode 100644
index 000000000000..52f3b022a949
--- /dev/null
+++ b/dev-lisp/cl-ncurses/files/cl-ncurses-0.1.1-gentoo.patch
@@ -0,0 +1,126 @@
+diff -urN cl-ncurses_0.1.1.orig/Makefile cl-ncurses_0.1.1/Makefile
+--- cl-ncurses_0.1.1.orig/Makefile	2004-03-07 17:24:47.000000000 -0600
++++ cl-ncurses_0.1.1/Makefile	2004-05-09 14:04:58.806607224 -0500
+@@ -1,8 +1,16 @@
+ NAME=cl-ncurses
+ SOURCES=ncurses.asd *.lisp glue.c README LICENSE Makefile
+ 
+-all: glue.o
++CFLAGS=-fPIC -DPIC
++LDFLAGS=-shared -L/lib -lncurses
+ 
++glue.so: glue.o
++	$(LD) $(LDFLAGS) $^ -o $@
++
++.PHONY: dist clean
++
++clean:
++	-rm -f glue.so glue.o *.fasl *.x86f *~
+ dist:
+ 	mkdir $(NAME)
+ 	cp $(SOURCES) $(NAME)/
+diff -urN cl-ncurses_0.1.1.orig/cl-ncurses.asd cl-ncurses_0.1.1/cl-ncurses.asd
+--- cl-ncurses_0.1.1.orig/cl-ncurses.asd	2004-03-09 12:49:46.000000000 -0600
++++ cl-ncurses_0.1.1/cl-ncurses.asd	2004-05-09 13:56:44.541746904 -0500
+@@ -25,30 +25,6 @@
+ 
+ (in-package :asdf)
+ 
+-(defvar *gcc* "/usr/bin/gcc")
+-
+-(defvar *gcc-options* '(#-darwin "-shared"
+-			#+darwin "-bundle"
+-			"-fPIC"))
+-
+-(defmethod output-files ((o compile-op) (c c-source-file))
+-  (list (make-pathname :name (component-name c)
+-		       :type "so"
+-		       :defaults (component-pathname c))))
+-
+-(defmethod perform ((o load-op) (c c-source-file))
+-  (let ((loader (intern "LOAD-FOREIGN-LIBRARY" :uffi)))
+-    (dolist (f (input-files o c))
+-      (funcall loader f))))
+-
+-(defmethod perform ((o compile-op) (c c-source-file))
+-  (unless (zerop (run-shell-command "~A ~A ~{~A ~}-o ~A"
+-				    *gcc*
+-				    (namestring (component-pathname c))
+-				    *gcc-options*
+-				    (namestring (car (output-files o c)))))
+-    (error 'operation-error :component c :operation o)))
+-
+ (defsystem :cl-ncurses
+ 	   :version "0.1.1"
+ 	   :depends-on (:uffi)
+@@ -77,7 +53,8 @@
+ 			(:file "getcchar" :depends-on ("package"))
+ 			(:file "getch" :depends-on ("package"))
+ 			(:file "getstr" :depends-on ("glue"))
+-			(:c-source-file "glue")
++			(:file "glue-loader")
++			(:file "glue" :depends-on ("glue-loader"))
+ 			(:file "getyx" :depends-on ("package" "glue"))
+ 			(:file "in_wch" :depends-on ("package"))
+ 			(:file "in_wchstr" :depends-on ("package"))
+diff -urN cl-ncurses_0.1.1.orig/glue-loader.lisp cl-ncurses_0.1.1/glue-loader.lisp
+--- cl-ncurses_0.1.1.orig/glue-loader.lisp	1969-12-31 18:00:00.000000000 -0600
++++ cl-ncurses_0.1.1/glue-loader.lisp	2004-05-09 13:57:48.397039424 -0500
+@@ -0,0 +1,45 @@
++;;;; -*- mode: lisp; syntax: common-lisp; indent-tabs-mode: nil; base: 10; package: CL-NCURSES -*-
++
++;;;; Author: Matthew Kennedy <mkennedy@gentoo.org>
++;;;;
++;;;; This code is adapted from clsql-uffi-loader.lisp which is part of
++;;;; CLSQL.  clsql-uffi-loader.lisp comes with the following
++;;;; copyright:
++;;;;
++;;;;     This file, part of CLSQL, is Copyright (c) 2002 by Kevin M. Rosenberg
++;;;;
++;;;;     CLSQL users are granted the rights to distribute and use this
++;;;;     software as governed by the terms of the Lisp Lesser GNU
++;;;;     Public License (http://opensource.franz.com/preamble.html),
++;;;;     also known as the LLGPL.
++;;;;
++
++(in-package #:cl-ncurses)
++
++(defparameter *uffi-library-path*
++  `(,(make-pathname :directory (pathname-directory *load-truename*))
++     "/usr/lib/cl-ncurses/"))
++
++(defparameter *uffi-library-filename* nil)
++
++(defvar *uffi-supporting-libraries* '("c"))
++
++(defvar *uffi-library-loaded* nil
++  "T if foreign library was able to be loaded successfully")
++
++(defun load-uffi-foreign-library (&optional force)
++  (when force (setf *uffi-library-loaded* nil))
++  (unless *uffi-library-loaded*
++    (setf *uffi-library-filename* (find-foreign-library "glue" *uffi-library-path*))
++    (unless (probe-file *uffi-library-filename*)
++      (error "Unable to find glue.so"))
++    (if (load-foreign-library *uffi-library-filename* 
++			      :module "cl-ncurses" 
++			      :supporting-libraries 
++			      *uffi-supporting-libraries*)
++	(setq *uffi-library-loaded* t)
++	(error "Unable to load helper library ~A" *uffi-library-filename*))))
++
++(load-uffi-foreign-library)
++
++;; glue-loader.lisp ends here
+diff -urN cl-ncurses_0.1.1.orig/package.lisp cl-ncurses_0.1.1/package.lisp
+--- cl-ncurses_0.1.1.orig/package.lisp	2004-03-09 12:50:30.000000000 -0600
++++ cl-ncurses_0.1.1/package.lisp	2004-05-09 14:06:41.291027224 -0500
+@@ -29,7 +29,7 @@
+ 
+ (in-package :cl-ncurses)
+ 
+-(defvar *ncurses-search-paths* '("/usr/local/lib/" "/usr/lib/" "/lib/")
++(defvar *ncurses-search-paths* '("/lib/")
+   "The paths where to search the ncurses shared library")
+ 
+ (defparameter *ncurses-path*
diff --git a/dev-lisp/cl-ncurses/files/digest-cl-ncurses-0.1.1 b/dev-lisp/cl-ncurses/files/digest-cl-ncurses-0.1.1
new file mode 100644
index 000000000000..b2a0f5782128
--- /dev/null
+++ b/dev-lisp/cl-ncurses/files/digest-cl-ncurses-0.1.1
@@ -0,0 +1 @@
+MD5 165275405aa2089e42aee453523ad35a cl-ncurses_0.1.1.tgz 21124