From 7e1d6bb247c617120e76ea922192f84830594386 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Sun, 30 Apr 2023 10:57:10 +0200
Subject: gnu: r-ffbase: Fix build with R 4.3.0.

* gnu/packages/cran.scm (r-ffbase)[arguments]: Add phase 'r-compatibility.
---
 gnu/packages/cran.scm | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/gnu/packages/cran.scm b/gnu/packages/cran.scm
index 5e0c74aa44..bdb3603942 100644
--- a/gnu/packages/cran.scm
+++ b/gnu/packages/cran.scm
@@ -5963,6 +5963,16 @@ (define-public r-ffbase
         (base32
          "1dp6lblfq2j7r1b4b8ls47jlx8j27n88d5vp8w116lb8pa01zxmk"))))
     (build-system r-build-system)
+    (arguments
+     (list
+      #:phases
+      '(modify-phases %standard-phases
+         ;; R 4.3.0 removed the typedef for Sint, which used to be just int.
+         (add-after 'unpack 'r-compatibility
+           (lambda _
+             (substitute* '("src/grouprunningcumsum.c"
+                            "src/grouprunningcumsumindex.c")
+               (("\\bSint ") "int ")))))))
     (propagated-inputs
      (list r-bit r-fastmatch r-ff))
     (home-page "https://github.com/edwindj/ffbase")
-- 
cgit v1.2.3