01/02: gnu: glibc: Reintroduce version 2.33.

[guix-commits]

civodul pushed a commit to branch core-updates
in repository guix.

commit 0e978a81951c0ab8583b44630e890df2198885c2
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Wed Apr 19 16:19:02 2023 +0200

    gnu: glibc: Reintroduce version 2.33.
    
    * gnu/packages/base.scm (glibc-2.33): New variable.
---
 gnu/packages/base.scm | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)

diff --git a/gnu/packages/base.scm b/gnu/packages/base.scm
index 520c2093f3..6911ea78be 100644
--- a/gnu/packages/base.scm
+++ b/gnu/packages/base.scm
@@ -1053,6 +1053,33 @@ with the Linux kernel.")
 
 ;; Below are old libc versions, which we use mostly to build locale data in
 ;; the old format (which the new libc cannot cope with.)
+
+(define-public glibc-2.33
+  (package
+    (inherit glibc)
+    (name "glibc")
+    (version "2.33")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://gnu/glibc/glibc-" version 
".tar.xz"))
+              (sha256
+               (base32
+                "1zvp0qdfbdyqrzydz18d9zg3n5ygy8ps7cmny1bvsp8h1q05c99f"))
+              (patches
+               ;; Remove a patch that's become irrelevant and that does not
+               ;; apply to this version.
+               (remove (lambda (patch)
+                         (string=? (basename patch)
+                                   "glibc-hurd-clock_gettime_monotonic.patch"))
+                       (origin-patches (package-source glibc))))))
+    (arguments
+     (substitute-keyword-arguments (package-arguments glibc)
+       ((#:configure-flags flags ''())
+        ;; There are undefined references to pthread symbols while linking
+        ;; 'support/links-dso-program.cc'.  Since this isn't needed here, turn
+        ;; off C++ tests.
+        `(cons "libc_cv_cxx_link_ok=no" ,flags))))))
+
 (define-public glibc-2.32
   (package
     (inherit glibc)