public inbox for gentoo-commits@lists.gentoo.org
 help / color / mirror / Atom feed
From: "Ulrich Müller" <ulm@gentoo.org>
To: gentoo-commits@lists.gentoo.org
Subject: [gentoo-commits] proj/lisp:master commit in: dev-lisp/linedit/files/, dev-lisp/linedit/
Date: Sat,  2 Apr 2022 15:34:55 +0000 (UTC)	[thread overview]
Message-ID: <1648911740.fe2a32c0de09b784bac448ce8389b1aa4f4a4558.ulm@gentoo> (raw)

commit:     fe2a32c0de09b784bac448ce8389b1aa4f4a4558
Author:     Ulrich Müller <ulm <AT> gentoo <DOT> org>
AuthorDate: Sat Apr  2 15:02:20 2022 +0000
Commit:     Ulrich Müller <ulm <AT> gentoo <DOT> org>
CommitDate: Sat Apr  2 15:02:20 2022 +0000
URL:        https://gitweb.gentoo.org/proj/lisp.git/commit/?id=fe2a32c0

dev-lisp/linedit: Remove old

Signed-off-by: Ulrich Müller <ulm <AT> gentoo.org>

 .../0.17.5-linedit.asd-drop-madeira-port.patch     | 21 --------
 .../files/0.17.5-linedit.asd-uffi-glue.patch       | 58 --------------------
 dev-lisp/linedit/linedit-0.17.5.ebuild             | 62 ----------------------
 3 files changed, 141 deletions(-)

diff --git a/dev-lisp/linedit/files/0.17.5-linedit.asd-drop-madeira-port.patch b/dev-lisp/linedit/files/0.17.5-linedit.asd-drop-madeira-port.patch
deleted file mode 100644
index a6576ec9..00000000
--- a/dev-lisp/linedit/files/0.17.5-linedit.asd-drop-madeira-port.patch
+++ /dev/null
@@ -1,21 +0,0 @@
-diff -Nuar a/linedit.asd b/linedit.asd
---- a/linedit.asd	2017-10-16 23:10:11.424173773 +0200
-+++ b/linedit.asd	2017-10-16 23:10:48.764173614 +0200
-@@ -30,7 +30,6 @@
-   :licence "MIT"
-   :author "Nikodemus Siivola <nikodemus@random-state.net>"
-   :depends-on (:uffi :terminfo :osicat :alexandria)
--  :defsystem-depends-on (:madeira-port)
-   :components
-   (
-    ;; Common
-@@ -60,6 +59,6 @@
-    (:module "ports"
-     :depends-on ("main")
-     :components
--    ((:madeira-port "sbcl" :when :sbcl)
--     (:madeira-port "ccl" :when :ccl)
--     (:madeira-port "generic" :unless (:or :sbcl :ccl))))))
-+    ((:file "sbcl" :if-feature :sbcl)
-+    (:file "ccl" :if-feature :ccl)
-+    (:file "generic" :if-feature (:not (:or :sbcl :ccl)))))))

diff --git a/dev-lisp/linedit/files/0.17.5-linedit.asd-uffi-glue.patch b/dev-lisp/linedit/files/0.17.5-linedit.asd-uffi-glue.patch
deleted file mode 100644
index fbbd38da..00000000
--- a/dev-lisp/linedit/files/0.17.5-linedit.asd-uffi-glue.patch
+++ /dev/null
@@ -1,58 +0,0 @@
-diff -Nuar a/linedit.asd b/linedit.asd
---- a/linedit.asd	2015-06-24 00:10:05.000000000 +0200
-+++ b/linedit.asd	2017-10-16 21:17:13.314174329 +0200
-@@ -24,40 +24,6 @@
- 
- (in-package :linedit-system)
- 
--(defvar *gcc* "/usr/bin/gcc")
--
--(defvar *gcc-options*
--  #-(or darwin macosx)
--  (list "-shared" "-fPIC")
--  #+(or darwin macosx)
--  (append
--   (list "-dynamic"  "-bundle")
--   #+(or x86 x86-64)
--   (list "-arch" "x86_64" "-arch" "i386")
--   #-sbcl
--   (list "/usr/lib/bundle1.o" "-flat_namespace" "-undefined" "suppress")))
--
--;;; Separate class so that we don't mess up other packages
--(defclass uffi-c-source-file (c-source-file) ())
--
--(defmethod output-files ((o compile-op) (c uffi-c-source-file))
--  (list (make-pathname :name (component-name c)
--		       :type #-(or darwin macosx) "so" #+(or darwin macosx) "dylib"
--		       :defaults (component-pathname c))))
--
--(defmethod perform ((o load-op) (c uffi-c-source-file))
--  (let ((loader (intern (symbol-name '#:load-foreign-library) :uffi)))
--    (dolist (f (asdf::input-files o c))
--      (funcall loader f :module (pathname-name f)))))
--
--(defmethod perform ((o compile-op) (c uffi-c-source-file))
--  (unless (zerop (run-shell-command "~S ~S ~{~S ~}-o ~S"
--				    *gcc*
--				    (namestring (component-pathname c))
--				    *gcc-options*
--				    (namestring (car (output-files o c)))))
--    (error 'operation-error :component c :operation o)))
--
- (defsystem :linedit
-   :version "0.17.5"
-   :description "Readline-style library."
-@@ -74,10 +40,10 @@
-    (:file "matcher" :depends-on ("packages"))
- 
-    ;; Backend
--   (:file "backend" :depends-on ("utility-macros"))
--   (:uffi-c-source-file "terminal_glue")
-+   (:file "uffi-loader" :depends-on ("packages"))
-+   (:file "backend" :depends-on ("utility-macros" "uffi-loader"))
-    (:file "terminal-translations" :depends-on ("packages"))
--   (:file "terminal" :depends-on ("terminal-translations" "backend" "terminal_glue"))
-+   (:file "terminal" :depends-on ("terminal-translations" "backend" "uffi-loader"))
-    (:file "smart-terminal" :depends-on ("terminal" "matcher"))
-    (:file "dumb-terminal" :depends-on ("terminal"))
- 

diff --git a/dev-lisp/linedit/linedit-0.17.5.ebuild b/dev-lisp/linedit/linedit-0.17.5.ebuild
deleted file mode 100644
index a13ea021..00000000
--- a/dev-lisp/linedit/linedit-0.17.5.ebuild
+++ /dev/null
@@ -1,62 +0,0 @@
-# Copyright 1999-2018 Gentoo Foundation
-# Distributed under the terms of the GNU General Public License v2
-
-EAPI=6
-
-inherit common-lisp-3 eutils flag-o-matic multilib toolchain-funcs
-
-DESCRIPTION="Linedit is a readline-style library written in Common Lisp."
-HOMEPAGE="http://www.common-lisp.net/project/linedit/"
-SRC_URI="mirror://gentoo/${P}.tar.gz"
-
-LICENSE="MIT"
-SLOT="0"
-KEYWORDS="~amd64 ~ppc ~sparc ~x86"
-IUSE=""
-
-RDEPEND="dev-lisp/alexandria
-		dev-lisp/osicat
-		dev-lisp/terminfo
-		dev-lisp/uffi"
-
-HTML_DOCS=( public_html/. )
-
-@cc() {
-	local cc=$(tc-getCC)
-	echo "${cc}" "${@}"
-	"${cc}" "${@}"
-}
-
-create_uffi_loader() {
-	cat > uffi-loader.lisp <<-EOF
-	;;;; -*- mode: lisp; syntax: common-lisp; indent-tabs-mode: nil; base: 10; package: linedit -*-
-	(in-package :linedit)
-
-	(uffi:load-foreign-library #p"/usr/$(get_libdir)/linedit/signals.so")
-	(uffi:load-foreign-library #p"/usr/$(get_libdir)/linedit/terminal_glue.so")
-	EOF
-}
-
-src_prepare() {
-	# terminfo lives in a separate package
-	rm "${S}"/terminfo.* || die
-	eapply "${FILESDIR}"/${PV}-${PN}.asd-uffi-glue.patch
-	eapply "${FILESDIR}"/${PV}-${PN}.asd-drop-madeira-port.patch
-	create_uffi_loader
-	eapply_user
-}
-
-src_compile() {
-	strip-flags
-	@cc "terminal_glue.c" ${CFLAGS} ${LDFLAGS} \
-		-fPIC -DPIC -shared -Wl,-soname="terminal_glue" -o "terminal_glue.so" \
-		|| die
-}
-
-src_install() {
-	common-lisp-install-sources -t all *.lisp ports/
-	common-lisp-install-asdf
-	einstalldocs
-	exeinto "/usr/$(get_libdir)/${PN}"
-	doexe *.so
-}


             reply	other threads:[~2022-04-02 15:35 UTC|newest]

Thread overview: 5+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2022-04-02 15:34 Ulrich Müller [this message]
  -- strict thread matches above, loose matches on Subject: below --
2018-05-28 18:01 [gentoo-commits] proj/lisp:master commit in: dev-lisp/linedit/files/, dev-lisp/linedit/ José María Alonso
2014-11-11 23:16 José María Alonso
2014-07-26 15:47 ` José María Alonso
2013-04-01 18:56 José María Alonso

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=1648911740.fe2a32c0de09b784bac448ce8389b1aa4f4a4558.ulm@gentoo \
    --to=ulm@gentoo.org \
    --cc=gentoo-commits@lists.gentoo.org \
    --cc=gentoo-dev@lists.gentoo.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox