mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
gnu: r-sapa: Patch call of dstebz routine.
* gnu/packages/patches/r-sapa-lapack.patch: New patch. * gnu/local.mk (dist_patch_DATA): Add it. * gnu/packages/cran.scm (r-sapa)[source]: Add it. Change-Id: I17354c4e8b3a0f322e17c9a1e17bc37c93630105
This commit is contained in:
parent
a874d44053
commit
a4e75305e2
3 changed files with 27 additions and 1 deletions
23
gnu/packages/patches/r-sapa-lapack.patch
Normal file
23
gnu/packages/patches/r-sapa-lapack.patch
Normal file
|
@ -0,0 +1,23 @@
|
|||
From 5eb1faf8ee2eac3057ef55c99dd3083242559b9e Mon Sep 17 00:00:00 2001
|
||||
From: dbpercival <dbpercival@gmail.com>
|
||||
Date: Sat, 8 Jul 2023 16:26:35 -0700
|
||||
Subject: [PATCH] Update sapa_lapack.c
|
||||
|
||||
Stephen's suggested change
|
||||
---
|
||||
src/sapa_lapack.c | 2 +-
|
||||
1 file changed, 1 insertion(+), 1 deletion(-)
|
||||
|
||||
diff --git a/src/sapa_lapack.c b/src/sapa_lapack.c
|
||||
index eff4851..a520e33 100644
|
||||
--- a/src/sapa_lapack.c
|
||||
+++ b/src/sapa_lapack.c
|
||||
@@ -102,7 +102,7 @@ SEXP R_sapa_dpss(SEXP nsample, SEXP ntaper, SEXP bandwidth)
|
||||
ISPLIT,
|
||||
WORK1,
|
||||
IWORK1,
|
||||
- &INFO);
|
||||
+ &INFO FCONE FCONE);
|
||||
// if (INFO != 0)
|
||||
// error(_("error code %d from LAPACK routine '%s'"), info, "dstebz");
|
||||
|
Loading…
Add table
Add a link
Reference in a new issue