guix_mirror_bot pushed a commit to branch next-master
in repository guix.

commit 797b9436d2c131f7cd83a3b43a207e1eaa609589
Author: Andreas Enge <[email protected]>
AuthorDate: Sun Jan 11 13:23:01 2026 +0100

    gnu: Remove hdf4-alt.
    
    * gnu/packages/maths.scm (hdf4-alt): Delete variable.
    
    Change-Id: I1674afe82952c473a7718371a4ffeb79e49c4020
---
 gnu/packages/maths.scm | 73 --------------------------------------------------
 1 file changed, 73 deletions(-)

diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index aec6594115..a7ada24005 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -1677,79 +1677,6 @@ structures for meshing and parallelism, as well as more 
environment-related aspe
 such as dataset configuration.")
     (license license:asl2.0)))
 
-(define-public hdf4-alt
-  (package
-    (name "hdf4-alt")
-    (version "4.2.16-2")
-    (source
-     (origin
-       (method url-fetch)
-       (uri (string-append "https://support.hdfgroup.org/ftp/HDF/releases/HDF";
-                           version "/src/hdf-" version ".tar.bz2"))
-       (sha256
-        (base32 "0b395czhqr43mmbiifmg2mhb488wnd4zccj45vpql98ja15j7hy5"))
-       (patches (search-patches "hdf4-reproducibility.patch"
-                                "hdf4-shared-fortran.patch"))))
-    (build-system gnu-build-system)
-    (native-inputs
-     (list gfortran bison flex))
-    (inputs
-     `(("zlib" ,zlib)
-       ("libjpeg" ,libjpeg-turbo)
-       ("libtirpc" ,libtirpc)))
-    (arguments
-     `(#:parallel-tests? #f
-       ;; Twisted expression to avoid rebuilding when dropping inheritance.
-       #:configure-flags (cons* "--disable-netcdf"
-                                (list "--enable-shared"
-                                      "FCFLAGS=-fallow-argument-mismatch"
-                                      "FFLAGS=-fallow-argument-mismatch"
-                                      "--enable-hdf4-xdr"))
-       #:phases
-       (modify-phases %standard-phases
-         ;; This is inspired by two of Debian's patches.
-         (add-before 'configure 'add-more-architecture-support
-           (lambda _
-             (substitute* '("mfhdf/ncgen/ncgen.l"
-                            "mfhdf/ncgen/ncgenyy.c"
-                            "mfhdf/libsrc/netcdf.h.in")
-               (("AIX5L64") "__aarch64__ || ( __riscv && __riscv_xlen == 
64)"))))
-         (add-before 'configure 'patchbuild
-           (lambda _
-             (substitute*
-                 '("mfhdf/hdfimport/testutil.sh.in" "hdf/util/testutil.sh.in")
-               (("/bin/rm") "rm")
-               (("/bin/mkdir") "mkdir"))))
-         (add-after 'configure 'patch-settings
-           (lambda _
-             ;; libhdf4.settings contains the full path of the
-             ;; compilers used, and its contents are included in
-             ;; .so-files.  We truncate the hashes to avoid
-             ;; unnecessary store references to those compilers:
-             (substitute* "libhdf4.settings"
-               (("(/gnu/store/)([0-9A-Za-z]*)" all prefix hash)
-                (string-append prefix (string-take hash 10) "...")))
-             #t))
-         (add-after 'install 'provide-absolute-libjpeg-reference
-           (lambda* (#:key inputs outputs #:allow-other-keys)
-             (let ((out (assoc-ref outputs "out"))
-                   (libjpeg (assoc-ref inputs "libjpeg")))
-               ;; libjpeg-turbo does not provide a .la file, so libtool is
-               ;; unable to add an absolute reference for -ljpeg in the .la
-               ;; files.  Fix it manually to avoid having to propagate it.
-               (substitute* (find-files (string-append out "/lib") "\\.la$")
-                 (("-ljpeg")
-                  (string-append "-L" libjpeg "/lib -ljpeg")))))))))
-    (home-page "https://www.hdfgroup.org/products/hdf4/";)
-    (synopsis
-     "Library and multi-object file format for storing and managing data")
-    (description "HDF4 is a library and multi-object file format for storing
-and managing data between machines.  HDF4 is an older hierarchical data format,
-incompatible with HDF5.")
-    (license
-     (license:non-copyleft
-      "https://www.hdfgroup.org/ftp/HDF/HDF_Current/src/unpacked/COPYING";))))
-
 (define-public hdf5-1.8
   (package
     (name "hdf5")

Reply via email to