apteryx pushed a commit to branch master
in repository guix.

commit 89de2cb1ef3c0f1ba29397abe9b4ff0885755e89
Author: Maxim Cournoyer <[email protected]>
AuthorDate: Wed Apr 23 22:08:29 2025 +0900

    gnu: itpp: Add LAPACK support and use gexps.
    
    This is needed to run some functions needed by the test suite of mia, for
    example.
    
    * gnu/packages/maths.scm (itpp) [arguments]: Use gexps.
    [inputs]: Add lapack.
    [native-inputs]: Remove labels.
    
    Change-Id: I58b31272ceaf5bdfbbcc0f769ab2418c4b7613d3
---
 gnu/packages/maths.scm | 52 +++++++++++++++++++++++++-------------------------
 1 file changed, 26 insertions(+), 26 deletions(-)

diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index b0c5b8685c..28c71283a7 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -68,6 +68,7 @@
 ;;; Copyright © 2024, 2025 Artyom V. Poptsov <[email protected]>
 ;;; Copyright © 2024 Zheng Junjie <[email protected]>
 ;;; Copyright © 2025 Luca Cirrottola <[email protected]>
+;;; Copyright © 2025 Maxim Cournoyer <[email protected]>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -2223,35 +2224,34 @@ the resulting text.")
               (uri (string-append "mirror://sourceforge/itpp/itpp/"
                                   version "/itpp-"
                                   version ".tar.gz"))
-       (sha256
-        (base32
-         "14ddy2xnb6sgp4hiax9v5sv4pr4l4dd4ps76nfha3nrpr1ikhcqm"))))
+              (sha256
+               (base32
+                "14ddy2xnb6sgp4hiax9v5sv4pr4l4dd4ps76nfha3nrpr1ikhcqm"))))
     (build-system cmake-build-system)
-    (arguments `(#:tests? #f ; Tests require googletest *sources*
-                 #:phases
-                 (modify-phases %standard-phases
-                   (add-after 'install 'delete-formulas-log
-                     ;; Contains date and timing information which is 
unreproducible,
-                     ;; and should not be needed when using the package
-                     (lambda* (#:key outputs #:allow-other-keys)
-                       (let ((out (assoc-ref outputs "out")))
-                         (delete-file (string-append out 
"/share/doc/itpp/html/_formulas.log")))))
-                   (add-after 'unpack 'set-man-page-date
-                     (lambda _
-                       (substitute* "itpp-config.1.cmake.in"
-                         ((".PACKAGE_DATE.") "2012-04-18"))))
-                   (add-before 'build 'set-force-source-date
-                     ;; for reproducible dates, texlive needs this to respect 
respect
-                     ;; SOURCE_DATE_EPOCH
-                     (lambda _
-                       (setenv "FORCE_SOURCE_DATE" "1"))))))
-    (inputs (list openblas fftw))
+    (arguments
+     (list
+      #:tests? #f                       ; Tests require googletest *sources*
+      #:phases
+      #~(modify-phases %standard-phases
+          (add-after 'install 'delete-formulas-log
+            ;; Contains date and timing information which is unreproducible,
+            ;; and should not be needed when using the package
+            (lambda _
+              (delete-file
+               (string-append #$output "/share/doc/itpp/html/_formulas.log"))))
+          (add-after 'unpack 'set-man-page-date
+            (lambda _
+              (substitute* "itpp-config.1.cmake.in"
+                ((".PACKAGE_DATE.") "2012-04-18"))))
+          (add-before 'build 'set-force-source-date
+            ;; for reproducible dates, texlive needs this to respect respect
+            ;; SOURCE_DATE_EPOCH
+            (lambda _
+              (setenv "FORCE_SOURCE_DATE" "1"))))))
+    (inputs (list fftw lapack openblas))
     ;; FIXME: Even though the fonts are available dvips complains:
     ;; "Font cmmi10 not found; characters will be left blank."
-    (native-inputs
-     `(("texlive" ,(texlive-updmap.cfg))
-       ("ghostscript" ,ghostscript)
-       ("doxygen" ,doxygen)))
+    (native-inputs (list (texlive-updmap.cfg) ghostscript doxygen))
     (home-page "https://itpp.sourceforge.net";)
     (synopsis "C++ library of maths, signal processing and communication 
classes")
     (description "IT++ is a C++ library of mathematical, signal processing and

Reply via email to