Subject: [bug#63824] [PATCH 2/3] gnu: jimtcl: Update to 0.82.

From: Jean-Pierre De Jesus DIAZ <[email-masked]>
Date: Thu, 1 Jun 2023 15:32:35 +0200

* gnu/packages/embedded (jimtcl): Update to 0.82.
  [arguments]: Use G-Expressions and update failing test, TTY test
  doesn't fail anymore.
  [inputs]: Add openssl as an input as now by default jimtcl enables the
  SSL configuration option.
* gnu/packages/embedded (openocd): Support jimtcl 0.82.
  [arguments]: Link against libssl and libcrypto.
  [inputs]: Add openssl.

Signed-off-by: Jean-Pierre De Jesus DIAZ <[email-masked]>
---
 gnu/packages/embedded.scm | 36 ++++++++++++++++++------------------
 1 file changed, 18 insertions(+), 18 deletions(-)

diff --git a/gnu/packages/embedded.scm b/gnu/packages/embedded.scm
index 2a90ca22d0..6efecf9700 100644
--- a/gnu/packages/embedded.scm
+++ b/gnu/packages/embedded.scm
@@ -69,6 +69,7 @@ (define-module (gnu packages embedded)
   #:use-module (gnu packages readline)
   #:use-module (gnu packages swig)
   #:use-module (gnu packages texinfo)
+  #:use-module (gnu packages tls)
   #:use-module (gnu packages version-control)
   #:use-module (gnu packages xorg)
   #:use-module (srfi srfi-1))
@@ -535,7 +536,7 @@ (define-public libjaylink
 (define-public jimtcl
   (package
     (name "jimtcl")
-    (version "0.80")
+    (version "0.82")
     (source (origin
               (method git-fetch)
               (uri (git-reference
@@ -544,23 +545,22 @@ (define-public jimtcl
               (file-name (git-file-name name version))
               (sha256
                (base32
-                "06rn60cx9sapc175vxvan87b8j5rkhh5gvvz7343xznzwlr0wcgk"))))
+                "01nxqzn41797ypph1vpwjfh3zqgks0l8ihh6932b4kb83apy6f08"))))
     (build-system gnu-build-system)
     (arguments
-     `(#:phases
-       (modify-phases %standard-phases
-         (replace 'configure
-         ;; This package doesn't use autoconf.
-           (lambda* (#:key outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out")))
-               (invoke "./configure"
-                       (string-append "--prefix=" out)))))
-         (add-before 'check 'delete-failing-tests
-           (lambda _
-             ;; XXX All but 1 TTY tests fail (Inappropriate ioctl for device).
-             (delete-file "tests/tty.test")
-             #t))
-         )))
+     (list #:phases
+           #~(modify-phases %standard-phases
+               (replace 'configure
+                 ;; This package doesn't use autoconf.
+                 (lambda _
+                   (invoke "./configure"
+                           (string-append "--prefix=" #$output))))
+               (add-before 'check 'delete-failing-tests
+                 (lambda _
+                   ;; XXX All but 1 SSL tests fail (tries connecting to Google
+                   ;; servers).
+                   (delete-file "tests/ssl.test"))))))
+    (inputs (list openssl))
     (native-inputs
      ;; For tests.
      (list inetutils))       ; for hostname
@@ -592,10 +592,10 @@ (define-public openocd
            pkg-config
            texinfo))
     (inputs
-     (list hidapi jimtcl libftdi libjaylink libusb-compat))
+     (list hidapi jimtcl libftdi libjaylink libusb-compat openssl))
     (arguments
      '(#:configure-flags
-       (append (list "LIBS=-lutil"
+       (append (list "LIBS=-lutil -lcrypto -lssl"
                      "--disable-werror"
                      "--enable-sysfsgpio"
                      "--disable-internal-jimtcl"
-- 
2.34.1