guix_mirror_bot pushed a commit to branch r-team
in repository guix.

commit 29cd27bc3d00eeecffd2a0acb434b8bda2bb235d
Author: Ricardo Wurmus <[email protected]>
AuthorDate: Mon Mar 9 12:31:27 2026 +0100

    gnu: r-rcppparallel: Use onetbb library.
    
    * gnu/packages/cran.scm (r-rcppparallel)[arguments]: Remove phases
    'relax-gcc-14-strictness and 'gcc-compatibility.
    [inputs]: Replace tbb-2020 with onetbb.
    
    Change-Id: Ib49e21a7b44df67a46fdda899d95aa05d8b1ace9
---
 gnu/packages/cran.scm | 24 ++----------------------
 1 file changed, 2 insertions(+), 22 deletions(-)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 362d8f216c..b933e94f1e 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -32540,28 +32540,8 @@ package provides a minimal R interface by relying on 
the Rcpp package.")
       #~(modify-phases %standard-phases
           (add-after 'unpack 'use-system-tbb
             (lambda* (#:key inputs #:allow-other-keys)
-              (setenv "TBB_ROOT" (assoc-ref inputs "tbb"))))
-          (add-before 'install 'relax-gcc-14-strictness
-            (lambda _
-              ;; XXX FIXME: $HOME/.R/Makevars seems to be the only way to
-              ;; set custom CFLAGS for R?
-              (setenv "HOME" (getcwd))
-              (mkdir-p ".R")
-              (with-directory-excursion ".R"
-                (with-output-to-file "Makevars"
-                  (lambda _
-                    (display (string-append
-                              "CXXFLAGS=-g -O2"
-                              " -Wno-error=changes-meaning\n")))))))
-          ;; This change lets us use GCC 13+.  We need to patch things here so
-          ;; that packages using RcppParallel to generate code can be compiled
-          ;; without errors.
-          (add-after 'install 'gcc-compatibility
-            (lambda _
-              (substitute* (string-append #$output 
"/site-library/RcppParallel/include/tbb/task.h")
-                (("task\\* next_offloaded")
-                 "tbb::task* next_offloaded")))))))
-    (inputs (list tbb-2020))
+              (setenv "TBB_ROOT" #$(this-package-input "onetbb")))))))
+    (inputs (list onetbb))
     (native-inputs (list r-rcpp r-runit))
     (home-page "https://rcppcore.github.io/RcppParallel/";)
     (synopsis "Parallel programming tools for Rcpp")

Reply via email to