unofficial mirror of bug-guix@gnu.org 
 help / color / mirror / code / Atom feed
From: Holger Peters <holger.peters@posteo.de>
To: 42771@debbugs.gnu.org
Cc: Holger Peters <holger.peters@posteo.de>
Subject: bug#42771: [PATCH] Disable tests for smalltalk and add candidate releases
Date: Sun, 29 Nov 2020 09:43:28 +0100	[thread overview]
Message-ID: <20201129084328.545720-1-holger.peters@posteo.de> (raw)
In-Reply-To: <87sgcxc6lh.fsf@rohleder.de>

* gnu/packages/smalltalk.scm (smalltalk): disable tests
(smalltalk-next): New variable.
(smalltalk-next-from-vcs): New variable.
---
 gnu/packages/smalltalk.scm | 64 +++++++++++++++++++++++++++++++++++++-
 1 file changed, 63 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/smalltalk.scm b/gnu/packages/smalltalk.scm
index 5d35f563e2..7136751a81 100644
--- a/gnu/packages/smalltalk.scm
+++ b/gnu/packages/smalltalk.scm
@@ -4,6 +4,7 @@
 ;;; Copyright © 2016 Nicolas Goaziou <mail@nicolasgoaziou.fr>
 ;;; Copyright © 2016 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2018 Tobias Geerinckx-Rice <me@tobias.gr>
+;;; Copyright © 2020 Holger Peters <holger.peters@posteo.de>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -24,20 +25,26 @@
   #:use-module ((guix licenses) #:prefix license:)
   #:use-module (guix packages)
   #:use-module (guix download)
+  #:use-module (guix git-download)
   #:use-module (guix build-system cmake)
   #:use-module (guix build-system gnu)
   #:use-module (gnu packages audio)
   #:use-module (gnu packages autotools)
   #:use-module (gnu packages base)
+  #:use-module (gnu packages bison)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages flex)
   #:use-module (gnu packages fontutils)
+  #:use-module (gnu packages gettext)
   #:use-module (gnu packages gl)
   #:use-module (gnu packages glib)
   #:use-module (gnu packages libffi)
   #:use-module (gnu packages libsigsegv)
   #:use-module (gnu packages linux)
+  #:use-module (gnu packages perl)
   #:use-module (gnu packages pkg-config)
   #:use-module (gnu packages pulseaudio)
+  #:use-module (gnu packages texinfo)
   #:use-module (gnu packages xorg))
 
 (define-public smalltalk
@@ -61,7 +68,8 @@
     (inputs
      `(("zip" ,zip)))
     (arguments
-     `(#:phases
+     `(#:tests? #f  ; failing tests, 3.2.5 has been released years ago
+       #:phases
        (modify-phases %standard-phases
          (add-before 'configure 'fix-libc
            (lambda _
@@ -145,3 +153,57 @@ also includes a customisable framework for creating dynamic HTTP servers and
 interactively extensible Web sites.")
     (home-page "http://squeakvm.org/")
     (license license:x11)))
+
+;;; alpha release
+(define-public smalltalk-next
+  (package (inherit smalltalk)
+    (name "smalltalk-next")
+    (version "3.2.91")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (string-append "https://alpha.gnu.org/gnu/smalltalk/smalltalk-"
+                           version ".tar.xz"))
+       (sha256
+        (base32 "1zb2h5cbz1cwybqjl24lflw359lwj7sjvvhwb4x6miypzhwq4qh0"))))))
+
+;;; This version from the main development branch can be built with passing
+;;; tests
+(define-public smalltalk-next-from-vcs
+  (let ((revision "18")
+        (commit "dfe4b5660037c4d178853ee00458a75e51a88563")
+        (git-url "git://git.sv.gnu.org/smalltalk.git"))
+    (package (inherit smalltalk)
+      (name "smalltalk-next-from-vcs")
+      (version (git-version "3.2.91" revision commit))
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url git-url)
+                      (commit commit)))
+                (file-name (git-file-name name version))
+                (sha256 (base32 "11dm1qricq7fwn1gfyn9ik7f1axw7l3ivipsh11dywa42pmb5j2r"))))
+      (native-inputs
+       `(("autoconf" ,autoconf)
+         ("automake" ,automake)
+         ("libtool" ,libtool)
+         ("flex" ,flex)
+         ("texinfo" ,texinfo)
+         ("perl" ,perl)
+         ("gettext" ,gettext-minimal)
+         ("libffi" ,libffi)
+         ("libltdl" ,libltdl)
+         ("bison" ,bison)
+         ("libsigsegv" ,libsigsegv)
+         ("pkg-config" ,pkg-config)))
+      (arguments
+       `(#:phases
+         (modify-phases %standard-phases
+           (add-before 'configure 'fix-libc
+             (lambda _
+               (let ((libc (assoc-ref %build-inputs "libc")))
+                 (substitute* "libc.la.in"
+                   (("@LIBC_SO_NAME@") "libc.so")
+                   (("@LIBC_SO_DIR@")  (string-append libc "/lib"))))
+               #t))))))))
+
-- 
2.28.0





  parent reply	other threads:[~2020-11-29 12:58 UTC|newest]

Thread overview: 10+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2020-08-08 18:53 bug#42771: smalltalk fails to build Michael Rohleder
2020-11-28 22:09 ` bug#42771: [PATCH] Disable tests for smalltalk and add candidate releases Holger Peters
2020-12-04 11:34   ` Holger Peters
2020-12-04 12:06     ` Holger Peters
2020-11-29  8:43 ` Holger Peters [this message]
2020-12-05 14:30   ` Ludovic Courtès
2020-12-28 11:42     ` bug#42771: smalltalk fails to build Miguel Ángel Arruga Vivas
2021-01-04  9:28       ` Ludovic Courtès
2021-01-05 12:09         ` Miguel Ángel Arruga Vivas
2021-01-03 15:34     ` bug#42771: [PATCH] Disable tests for smalltalk and add candidate releases Holger Peters

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

  List information: https://guix.gnu.org/

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

  git send-email \
    --in-reply-to=20201129084328.545720-1-holger.peters@posteo.de \
    --to=holger.peters@posteo.de \
    --cc=42771@debbugs.gnu.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.
Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/guix.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).