Subject: bug#30575: closed (Re: bug#30714: Racket doesn't build any more, xform error)

From: [email-masked] (GNU bug Tracking System)
Date: Mon, 02 Apr 2018 15:40:04 +0000

Your bug report

#30603: [PATCH] gnu: racket: Update to 6.12.

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
30603: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=30603
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#30714: Racket doesn't build any more, xform error
From: Christopher Lemmer Webber <[email-masked]>
To: [email-masked], [email-masked]
Date: Mon, 02 Apr 2018 10:39:56 -0500
List-Id: <debbugs-submit.debbugs.gnu.org>

Fixed bugs #30714 and #30603 in 75afbd247876d62f27cb2c90098bd59040f7e614

Subject: [PATCH] gnu: racket: Update to 6.12.
From: Danny Milosavljevic <[email-masked]>
To: [email-masked]
Cc: Danny Milosavljevic <[email-masked]>
Date: Thu, 22 Feb 2018 17:56:21 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

* gnu/packages/scheme.scm (racket): Update to 6.12.
[arguments]<#:phases>[patch-/bin/sh]: Add substitution.
---
 gnu/packages/scheme.scm | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm
index d5286b312..a90f88fce 100644
--- a/gnu/packages/scheme.scm
+++ b/gnu/packages/scheme.scm
@@ -404,7 +404,7 @@ implementation techniques and as an expository tool.")
 (define-public racket
   (package
     (name "racket")
-    (version "6.11")
+    (version "6.12")
     (source (origin
              (method url-fetch)
              (uri (list (string-append "http://mirror.racket-lang.org/installers/"
@@ -414,7 +414,7 @@ implementation techniques and as an expository tool.")
                          version "/racket-" version "-src.tgz")))
              (sha256
               (base32
-               "1nk7705x24jjlbqqhj8yvbgqkfscxx3m81bry1g56kjxysjmf3sw"))))
+               "0cwcypzjfl9py1s695mhqkiapff7c1w29llsmdj7qgn58wl0apk5"))))
     (build-system gnu-build-system)
     (arguments
      '(#:phases
@@ -484,6 +484,9 @@ implementation techniques and as an expository tool.")
            (lambda _
              (substitute* "collects/racket/system.rkt"
                (("/bin/sh") (which "sh")))
+             (substitute* "src/racket/src/schpriv.h"
+               ;; Our gcc version is too old so signbit is not a builtin.
+               (("MZ_IS_NEG_ZERO") "MZ_IS_NEG_ZEROdisable"))
              #t)))
        #:tests? #f                                ; XXX: how to run them?
        ))