55/201: gnu: abseil-cpp: Update to 20210324.2.

[guix-commits]

apteryx pushed a commit to branch core-updates-frozen-batched-changes
in repository guix.

commit b86c4c41073efceddf19d274f7632100ccc5fdb5
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Fri Oct 8 22:44:39 2021 -0400

    gnu: abseil-cpp: Update to 20210324.2.
    
    But keep the older variant for Tensorflow.
    
    * gnu/packages/cpp.scm (abseil-cpp-20200923.3): Renamed older variant.
    (abseil-cpp): New variable.
    * gnu/packages/machine-learning.scm (tensorflow-lite)
    [inputs]: Adjust to use the older abseil-cpp-20200923.3.
    * gnu/packages/rpc.scm (grpc-1.16.1)[native-inputs]: Likewise.
    
    Co-authored-by: Greg Hogan <code@greghogan.com>
---
 gnu/packages/cpp.scm              | 23 ++++++++++++++++++++++-
 gnu/packages/machine-learning.scm |  2 +-
 gnu/packages/rpc.scm              | 10 ++++++----
 3 files changed, 29 insertions(+), 6 deletions(-)

diff --git a/gnu/packages/cpp.scm b/gnu/packages/cpp.scm
index 77ed9e0..37dd5ce 100644
--- a/gnu/packages/cpp.scm
+++ b/gnu/packages/cpp.scm
@@ -765,7 +765,8 @@ other values of screen objects, by setting their values as 
the tween starting
 point and then, after each tween step, plugging back the result.")
     (license license:expat)))
 
-(define-public abseil-cpp
+;;; This older LTS release is kept for tensorflow.
+(define-public abseil-cpp-20200923.3
   (package
     (name "abseil-cpp")
     (version "20200923.3")
@@ -812,6 +813,26 @@ augment the C++ standard library.  The Abseil library code 
is collected from
 Google's C++ code base.")
     (license license:asl2.0)))
 
+(define-public abseil-cpp
+  (let ((base abseil-cpp-20200923.3))
+    (package/inherit base
+      (name "abseil-cpp")
+      (version "20210324.2")
+      (source (origin
+                (method git-fetch)
+                (uri (git-reference
+                      (url "https://github.com/abseil/abseil-cpp";)
+                      (commit version)))
+                (file-name (git-file-name name version))
+                (sha256
+                 (base32
+                  "0g9rbhk3mwjdfxk7cscd04vm8fphd5flz9yykpgvyy1nwa34zk3x"))))
+      (arguments
+       (substitute-keyword-arguments (package-arguments base)
+         ((#:configure-flags flags)
+          `(cons* "-DBUILD_TESTING=ON"
+                  (delete "-DABSL_RUN_TESTS=ON" ,flags))))))))
+
 (define-public pegtl
   (package
     (name "pegtl")
diff --git a/gnu/packages/machine-learning.scm 
b/gnu/packages/machine-learning.scm
index 9362d74..d714280 100644
--- a/gnu/packages/machine-learning.scm
+++ b/gnu/packages/machine-learning.scm
@@ -2211,7 +2211,7 @@ advanced research.")
                       (install-file file target-dir)))
                   (find-files "." "\\.h$")))))))))
     (inputs
-     `(("abseil-cpp" ,abseil-cpp)
+     `(("abseil-cpp" ,abseil-cpp-20200923.3)
        ("eigen" ,eigen-for-tensorflow-lite)
        ("flatbuffers" ,flatbuffers)
        ("python" ,python)))
diff --git a/gnu/packages/rpc.scm b/gnu/packages/rpc.scm
index f02fa66..0ff8363 100644
--- a/gnu/packages/rpc.scm
+++ b/gnu/packages/rpc.scm
@@ -152,11 +152,13 @@ browsers to backend services.")
                               "src/core/lib/gpr/log_posix.cc"
                               "src/core/lib/iomgr/ev_epollex_linux.cc")
                  (("gettid\\(")
-                  "sys_gettid("))
-               #t))))))
+                  "sys_gettid("))))))))
     (native-inputs
-     `(("protobuf" ,protobuf-3.6)
-       ,@(alist-delete "protobuf" (package-native-inputs grpc))))))
+     `(("abseil-cpp" ,abseil-cpp-20200923.3)
+       ("protobuf" ,protobuf-3.6)
+       ,@(fold alist-delete (package-native-inputs grpc)
+               '("abseil-cpp"
+                 "protobuf"))))))
 
 (define-public python-grpcio
   (package