214/214: gnu: r-biostrings: Patch for R 4.2.0.

[guix-commits]

rekado pushed a commit to branch wip-r
in repository guix.

commit 74f89220cc8532797974e4813097cfa5236d746b
Author: Ricardo Wurmus <rekado@elephly.net>
AuthorDate: Sat May 28 10:34:30 2022 +0200

    gnu: r-biostrings: Patch for R 4.2.0.
    
    * gnu/packages/bioconductor.scm (r-biostrings)[arguments]: Add build phase
    'patch-for-R-4.2.0.
---
 gnu/packages/bioconductor.scm | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/gnu/packages/bioconductor.scm b/gnu/packages/bioconductor.scm
index bf371a970a..0410ff8a82 100644
--- a/gnu/packages/bioconductor.scm
+++ b/gnu/packages/bioconductor.scm
@@ -3104,6 +3104,19 @@ objects.")
     (properties
      `((upstream-name . "Biostrings")))
     (build-system r-build-system)
+    (arguments
+     '(#:phases
+       (modify-phases %standard-phases
+         ;; See commit c3340745870a88d1558e093a7f892c1aeac784ef in
+         ;; https://github.com/Bioconductor/Biostrings/
+         (add-after 'unpack 'patch-for-R-4.2.0
+           (lambda _
+             (substitute* '("src/BitMatrix.c"
+                            "src/RoSeqs_utils.c"
+                            "src/match_pdict_utils.c"
+                            "src/xscat.c")
+               (("#include <S.h>.*")
+                "#define Salloc(n,t) (t*)S_alloc(n, sizeof(t))  /* from old 
<S.h> */\n")))))))
     (propagated-inputs
      (list r-biocgenerics
            r-crayon