From e97e7089583198651b9a047837d35d3327691b70 Mon Sep 17 00:00:00 2001
From: Ricardo Wurmus <rekado@elephly.net>
Date: Fri, 6 Oct 2023 08:54:39 +0200
Subject: [PATCH] gnu: r-biomvrcns: Patch R constants.

* gnu/packages/bioconductor.scm (r-biomvrcns)[arguments]: Add phase
'patch-constants.
---
 gnu/packages/bioconductor.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/packages/bioconductor.scm b/gnu/packages/bioconductor.scm
index 4213d133c0..7972b6e55c 100644
--- a/gnu/packages/bioconductor.scm
+++ b/gnu/packages/bioconductor.scm
@@ -22203,6 +22203,15 @@ design.")
          "0n026b744ah5kcnipsyiqqs7vlz5n5im1kgv35i2pgxyzvf7a8sn"))))
     (properties `((upstream-name . "biomvRCNS")))
     (build-system r-build-system)
+    (arguments
+     (list
+      #:phases
+      '(modify-phases %standard-phases
+         (add-after 'unpack 'patch-constants
+           (lambda _
+             (substitute* "src/biomvRCNS.c"
+               (("DOUBLE_XMIN") "DBL_MIN")
+               (("DOUBLE_XMAX") "DBL_MAX")))))))
     (propagated-inputs
      (list r-genomicranges r-gviz r-iranges r-mvtnorm))
     (home-page "https://bioconductor.org/packages/biomvRCNS")