GNU bug report logs - #73235
[PATCH] gnu: gauche: Fix build, enable TLS, and use gexps.

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 73235 in the body.
You can then email your comments to 73235 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: Antero Mejr <mail <at> antr.me>
To: guix-patches <at> gnu.org
Subject: [PATCH] gnu: gauche: Fix build, enable TLS, and use gexps.
Date: Fri, 13 Sep 2024 20:13:18 +0000

There is a known test issue that will be fixed next release:
https://github.com/shirok/Gauche/issues/1044

* gnu/packages/scheme.scm (gauche): Fix build failure and enable TLS.
[arguments]: Set #:tests? to #f until next release, and add --with-tls
configure flag.
[inputs]: Add mbedtls.

Change-Id: Iceacb882e74f5a8e3e11d663cca51baafbcbeb69
---
Resolves https://issues.guix.gnu.org/73113

 gnu/packages/scheme.scm | 58 +++++++++++++++++++++--------------------
 1 file changed, 30 insertions(+), 28 deletions(-)

diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm
index 647f7e71d2..6f9d00e440 100644
--- a/gnu/packages/scheme.scm
+++ b/gnu/packages/scheme.scm
@@ -1098,38 +1098,40 @@ (define-public gauche
         (base32 "10zpbbikkcpdzk6c52wkckiyhn7nhnqjv2djdzyjr0n8qxxy4hrn"))))
     (build-system gnu-build-system)
     (inputs
-     (list libatomic-ops slib zlib))
+     (list libatomic-ops mbedtls slib zlib))
     (native-inputs
      (list texinfo openssl ; needed for tests
            pkg-config))    ; needed to find external libatomic-ops
     (arguments
-     `(#:configure-flags
-       (list (string-append "--with-slib="
-                            (assoc-ref %build-inputs "slib")
-                            "/lib/slib"))
-       #:phases
-       (modify-phases %standard-phases
-         (add-after 'unpack 'patch-/bin/sh
-           ;; Needed only for tests.
-           (lambda _
-             (substitute* '("test/www.scm"
-                            "ext/tls/test.scm"
-                            "lib/gauche/package/util.scm"
-                            "libsrc/gauche/process.scm")
-               (("/bin/sh") (which "sh")))))
-         (add-after 'build 'build-doc
-           (lambda _
-             (with-directory-excursion "doc"
-               (invoke "make" "info"))))
-         (add-before 'check 'patch-network-tests
-           ;; Remove net checks.
-           (lambda _
-             (delete-file "test/net.scm")
-             (invoke "touch" "test/net.scm")))
-         (add-after 'install 'install-docs
-           (lambda _
-             (with-directory-excursion "doc"
-               (invoke "make" "install")))))))
+     (list #:tests? #f ; 9 ffitest failures, known issue (fixed in 0.9.16):
+           ;; https://github.com/shirok/Gauche/issues/1044
+           #:configure-flags
+           #~(list (string-append "--with-slib=" #$(this-package-input "slib")
+                                  "/lib/slib")
+                   "--with-tls=mbedtls")
+           #:phases
+           #~(modify-phases %standard-phases
+               (add-after 'unpack 'patch-/bin/sh
+                 ;; Needed only for tests.
+                 (lambda _
+                   (substitute* '("test/www.scm"
+                                  "ext/tls/test.scm"
+                                  "lib/gauche/package/util.scm"
+                                  "libsrc/gauche/process.scm")
+                     (("/bin/sh") (which "sh")))))
+               (add-after 'build 'build-doc
+                 (lambda _
+                   (with-directory-excursion "doc"
+                     (invoke "make" "info"))))
+               (add-before 'check 'patch-network-tests
+                 ;; Remove net checks.
+                 (lambda _
+                   (delete-file "test/net.scm")
+                   (invoke "touch" "test/net.scm")))
+               (add-after 'install 'install-docs
+                 (lambda _
+                   (with-directory-excursion "doc"
+                     (invoke "make" "install")))))))
     (synopsis "Scheme scripting engine")
     (description "Gauche is a R7RS Scheme scripting engine aiming at being a
 handy tool that helps programmers and system administrators to write small to

base-commit: f1bdb291dc5d65de2c88e339df5e515fb4b3544c
-- 
2.46.0

Message #10 received at 73235-done <at> debbugs.gnu.org (full text, mbox):

From: Ludovic Courtès <ludo <at> gnu.org>
To: Antero Mejr <mail <at> antr.me>
Cc: 73113-done <at> debbugs.gnu.org, 73235-done <at> debbugs.gnu.org
Subject: Re: [bug#73235] [PATCH] gnu: gauche: Fix build, enable TLS, and use
 gexps.
Date: Wed, 25 Sep 2024 18:06:31 +0200

Antero Mejr <mail <at> antr.me> skribis:

> There is a known test issue that will be fixed next release:
> https://github.com/shirok/Gauche/issues/1044
>
> * gnu/packages/scheme.scm (gauche): Fix build failure and enable TLS.
> [arguments]: Set #:tests? to #f until next release, and add --with-tls
> configure flag.
> [inputs]: Add mbedtls.
>
> Change-Id: Iceacb882e74f5a8e3e11d663cca51baafbcbeb69
> ---
> Resolves https://issues.guix.gnu.org/73113

Applied, thanks!

Previous Next

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