GNU bug report logs - #37439
[PATCH] Add abcl.

Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.

Package: guix-patches; Reported by: Carlo Zancanaro <carlo@HIDDEN>; Keywords: patch; dated Tue, 17 Sep 2019 12:30:02 UTC; Maintainer for guix-patches is guix-patches@HIDDEN.

Message received at submit <at> debbugs.gnu.org:


Received: (at submit) by debbugs.gnu.org; 17 Sep 2019 12:29:44 +0000
From debbugs-submit-bounces <at> debbugs.gnu.org Tue Sep 17 08:29:44 2019
Received: from localhost ([127.0.0.1]:51793 helo=debbugs.gnu.org)
	by debbugs.gnu.org with esmtp (Exim 4.84_2)
	(envelope-from <debbugs-submit-bounces <at> debbugs.gnu.org>)
	id 1iACbx-0005rf-Vt
	for submit <at> debbugs.gnu.org; Tue, 17 Sep 2019 08:29:44 -0400
Received: from lists.gnu.org ([209.51.188.17]:59951)
 by debbugs.gnu.org with esmtp (Exim 4.84_2)
 (envelope-from <carlo@HIDDEN>) id 1iACbr-0005rS-Hx
 for submit <at> debbugs.gnu.org; Tue, 17 Sep 2019 08:29:36 -0400
Received: from eggs.gnu.org ([2001:470:142:3::10]:35922)
 by lists.gnu.org with esmtp (Exim 4.90_1)
 (envelope-from <carlo@HIDDEN>) id 1iACbp-0000Ta-FH
 for guix-patches@HIDDEN; Tue, 17 Sep 2019 08:29:31 -0400
X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org
X-Spam-Level: 
X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,URIBL_BLOCKED
 autolearn=disabled version=3.3.2
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
 (envelope-from <carlo@HIDDEN>) id 1iACbn-0000qb-S7
 for guix-patches@HIDDEN; Tue, 17 Sep 2019 08:29:29 -0400
Received: from zancanaro.com.au ([45.76.117.151]:43114)
 by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32)
 (Exim 4.71) (envelope-from <carlo@HIDDEN>)
 id 1iACbn-0000Xf-5u
 for guix-patches@HIDDEN; Tue, 17 Sep 2019 08:29:27 -0400
Received: by zancanaro.com.au (Postfix, from userid 116)
 id 843CA29DC3; Tue, 17 Sep 2019 12:29:19 +0000 (UTC)
Received: from jolteon (210-1-202-160-cpe.spintel.net.au [210.1.202.160])
 by zancanaro.com.au (Postfix) with ESMTPSA id C431D29DC1
 for <guix-patches@HIDDEN>; Tue, 17 Sep 2019 12:29:15 +0000 (UTC)
User-agent: mu4e 1.2.0; emacs 26.3
From: Carlo Zancanaro <carlo@HIDDEN>
To: guix-patches@HIDDEN
Subject: [PATCH] Add abcl.
Date: Tue, 17 Sep 2019 22:29:14 +1000
Message-ID: <87sgovrtr9.fsf@HIDDEN>
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="=-=-="
X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic]
X-Received-From: 45.76.117.151
X-Spam-Score: -1.4 (-)
X-Debbugs-Envelope-To: submit
X-BeenThere: debbugs-submit <at> debbugs.gnu.org
X-Mailman-Version: 2.1.18
Precedence: list
List-Id: <debbugs-submit.debbugs.gnu.org>
List-Unsubscribe: <https://debbugs.gnu.org/cgi-bin/mailman/options/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=unsubscribe>
List-Archive: <https://debbugs.gnu.org/cgi-bin/mailman/private/debbugs-submit/>
List-Post: <mailto:debbugs-submit <at> debbugs.gnu.org>
List-Help: <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=help>
List-Subscribe: <https://debbugs.gnu.org/cgi-bin/mailman/listinfo/debbugs-submit>, 
 <mailto:debbugs-submit-request <at> debbugs.gnu.org?subject=subscribe>
Errors-To: debbugs-submit-bounces <at> debbugs.gnu.org
Sender: "Debbugs-submit" <debbugs-submit-bounces <at> debbugs.gnu.org>
X-Spam-Score: -0.1 (/)

--=-=-=
Content-Type: text/plain; format=flowed

Hey Guix!

Here's another patch! This one adds a new Common Lisp 
implementation: ABCL on the JVM.

When I added Kawa we ended up deciding to put it in its own 
package (in kawa.scm). I wasn't sure whether it was a good idea to 
do that for ABCL, too, so I just put it in java.scm for now. Feel 
free to move it to its own package (or ask me to do so) if you'd 
rather. It might even fit better in lisp.scm.

Carlo


--=-=-=
Content-Type: text/x-diff; charset=utf-8
Content-Disposition: attachment; filename=0001-gnu-Add-abcl.patch
Content-Transfer-Encoding: quoted-printable

From 34c731278669102b0449a4b0cad25274be0e07f2 Mon Sep 17 00:00:00 2001
From: Carlo Zancanaro <carlo@HIDDEN>
Date: Tue, 17 Sep 2019 22:01:01 +1000
Subject: [PATCH] gnu: Add abcl.

* gnu/packages/java.scm (abcl): New variable.
* gnu/packages/patches/abcl-fix-build-xml.patch: New file.
* gnu/local.mk (dist_patch_DATA): Add it.
---
 gnu/local.mk                                  |  1 +
 gnu/packages/java.scm                         | 65 ++++++++++++++++++-
 gnu/packages/patches/abcl-fix-build-xml.patch | 37 +++++++++++
 3 files changed, 102 insertions(+), 1 deletion(-)
 create mode 100644 gnu/packages/patches/abcl-fix-build-xml.patch

diff --git a/gnu/local.mk b/gnu/local.mk
index 3f32b9cbf2..a0307b5e23 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -669,6 +669,7 @@ dist_patch_DATA =3D						\
   %D%/packages/patches/a2ps-CVE-2001-1593.patch	\
   %D%/packages/patches/a2ps-CVE-2014-0466.patch	\
   %D%/packages/patches/a2ps-CVE-2015-8107.patch	\
+  %D%/packages/patches/abcl-fix-build-xml.patch	\
   %D%/packages/patches/abiword-explictly-cast-bools.patch	\
   %D%/packages/patches/abiword-black-drawing-with-gtk322.patch	\
   %D%/packages/patches/acl-fix-perl-regex.patch		\
diff --git a/gnu/packages/java.scm b/gnu/packages/java.scm
index 403c446a82..1999f31798 100644
--- a/gnu/packages/java.scm
+++ b/gnu/packages/java.scm
@@ -2,7 +2,7 @@
 ;;; Copyright =C2=A9 2015, 2016, 2017, 2018, 2019 Ricardo Wurmus <rekado@e=
lephly.net>
 ;;; Copyright =C2=A9 2016 Leo Famulari <leo@HIDDEN>
 ;;; Copyright =C2=A9 2016, 2017 Roel Janssen <roel@HIDDEN>
-;;; Copyright =C2=A9 2017 Carlo Zancanaro <carlo@HIDDEN>
+;;; Copyright =C2=A9 2017, 2019 Carlo Zancanaro <carlo@HIDDEN>
 ;;; Copyright =C2=A9 2017, 2018 Julien Lepiller <julien@HIDDEN>
 ;;; Copyright =C2=A9 2017 Thomas Danckaert <post@HIDDEN>
 ;;; Copyright =C2=A9 2016, 2017, 2018 Alex Vong <alexvong1995@HIDDEN>
@@ -11109,3 +11109,66 @@ network protocols, and core version control algori=
thms.")
      `(("java-javaewah" ,java-javaewah)
        ("java-jsch" ,java-jsch)
        ("java-slf4j-api" ,java-slf4j-api)))))
+
+(define-public abcl
+  (package
+    (name "abcl")
+    (version "1.5.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://abcl.org/releases/"
+                           version "/abcl-src-" version ".tar.gz"))
+       (sha256
+        (base32
+         "1hhvcg050nfpjbdmskc1cv2j38qi6qfl77a61b5cxx576kbff3lj"))
+       (patches
+        (search-patches
+         "abcl-fix-build-xml.patch"))))
+    (build-system ant-build-system)
+    (native-inputs
+     `(("java-junit" ,java-junit)))
+    (arguments
+     `(#:build-target "abcl.jar"
+       #:test-target "abcl.test"
+       #:phases
+       (modify-phases %standard-phases
+         (replace 'install
+           (lambda* (#:key outputs #:allow-other-keys)
+             (let ((share (string-append (assoc-ref outputs "out")
+                                         "/share/java/"))
+                   (bin (string-append (assoc-ref outputs "out")
+                                       "/bin/")))
+               (mkdir-p share)
+               (install-file "dist/abcl.jar" share)
+               (install-file "dist/abcl-contrib.jar" share)
+               (mkdir-p bin)
+               (with-output-to-file (string-append bin "abcl")
+                 (lambda _
+                   (let ((classpath (string-append
+                                     share "abcl.jar"
+                                     ":"
+                                     share "abcl-contrib.jar")))
+                     (display (string-append
+                               "#!" (which "sh") "\n"
+                               "if [[ -z $CLASSPATH ]]; then\n"
+                               "  cp=3D\"" classpath "\"\n"
+                               "else\n"
+                               "  cp=3D\"" classpath ":$CLASSPATH\"\n"
+                               "fi\n"
+                               "exec " (which "java") " -cp $cp org.armedb=
ear.lisp.Main $@\n")))))
+               (chmod (string-append bin "abcl") #o755)
+               #t))))))
+    (home-page "https://abcl.org/")
+    (synopsis "Common Lisp Implementation on the JVM")
+    (description
+     "@dfn{Armed Bear Common Lisp} (ABCL) is a full implementation of the =
Common
+Lisp language featuring both an interpreter and a compiler, running in the
+JVM.  It supports JSR-223 (Java scripting API): it can be a scripting engi=
ne
+in any Java application.  Additionally, it can be used to implement (parts=
 of)
+the application using Java to Lisp integration APIs.")
+    (license (list license:gpl2+
+                   ;; named-readtables is released under 3 clause BSD
+                   license:bsd-3
+                   ;; jfli is released under CPL 1.0
+                   license:cpl1.0))))
diff --git a/gnu/packages/patches/abcl-fix-build-xml.patch b/gnu/packages/p=
atches/abcl-fix-build-xml.patch
new file mode 100644
index 0000000000..0c21491b74
--- /dev/null
+++ b/gnu/packages/patches/abcl-fix-build-xml.patch
@@ -0,0 +1,37 @@
+ABCL's build calls the hostname command, and needs the internet to download
+JUnit. Neither of these are really required, though, so we can patch them =
out
+to make it build.
+
+--- a/build.xml
++++ b/build2.xml
+@@ -327,7 +327,7 @@ from ${abcl.home.dir}
+     <property name=3D"abcl.build.path"
+               value=3D"${build.classes.dir}/org/armedbear/lisp/build"/>
+     <target name=3D"abcl.stamp"=20
+-            depends=3D"abcl.compile,abcl.stamp.version,abcl.stamp.hostnam=
e">
++            depends=3D"abcl.compile,abcl.stamp.version">
+       <mkdir dir=3D"${abcl.build.path}/.."/>
+       <loadfile property=3D"abcl.version"
+                 srcFile=3D"${abcl.version.path}"/>
+@@ -455,11 +455,6 @@ from ${abcl.home.dir}
+                 value=3D"${abcl.version}-${abcl.version.src}"/>
+     </target>
+=20
+-    <target name=3D"abcl.stamp.hostname" if=3D"unix">
+-      <exec executable=3D"hostname" outputproperty=3D"abcl.hostname"/>
+-      <echo>abcl.hostname: ${abcl.hostname}</echo>
+-    </target>
+-
+     <target name=3D"abcl.system.uptodate">
+       <condition property=3D"abcl.system.needs-update.p">
+         <and>
+@@ -1019,8 +1014,7 @@ ${basedir}/../cl-bench
+       </unzip>
+     </target>
+=20=20=20=20=20=20=20=20=20
+-    <target name=3D"abcl.test.compile"=20
+-            depends=3D"abcl.test.pre-compile">
++    <target name=3D"abcl.test.compile" >
+       <mkdir dir=3D"${abcl.test.classes.dir}"/>
+       <javac destdir=3D"${abcl.test.classes.dir}"
+              classpathref=3D"abcl.test.compile.classpath"
--=20
2.23.0


--=-=-=--




Acknowledgement sent to Carlo Zancanaro <carlo@HIDDEN>:
New bug report received and forwarded. Copy sent to guix-patches@HIDDEN. Full text available.
Report forwarded to guix-patches@HIDDEN:
bug#37439; Package guix-patches. Full text available.
Please note: This is a static page, with minimal formatting, updated once a day.
Click here to see this page with the latest information and nicer formatting.
Last modified: Tue, 17 Sep 2019 12:45:02 UTC

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997 nCipher Corporation Ltd, 1994-97 Ian Jackson.