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");
 
9b2d01a5d015a4c5'/><select name='h' onchange='this.form.submit();'>
<option value='koszko' selected='selected'>koszko</option>
<option value='koszko-scripts'>koszko-scripts</option>
</select> <input type='submit' value='switch'/></form></td></tr>
<tr><td class='sub'>Wojtek's customized Guix</td><td class='sub right'></td></tr></table>
<table class='tabs'><tr><td>
<a href='/guix/about/'>about</a><a href='/guix/'>summary</a><a href='/guix/refs/?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>refs</a><a class='active' href='/guix/log/tests/combinators.scm'>log</a><a href='/guix/tree/tests/combinators.scm?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>tree</a><a href='/guix/commit/tests/combinators.scm?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>commit</a><a href='/guix/diff/tests/combinators.scm?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>diff</a></td><td class='form'><form class='right' method='get' action='/guix/log/tests/combinators.scm'>
<input type='hidden' name='id' value='5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/guix/log/?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>root</a>/<a href='/guix/log/tests?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>tests</a>/<a href='/guix/log/tests/combinators.scm?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5'>combinators.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/tests/combinators.scm?id=5c610d4f7f46593782c88e0f9b2d01a5d015a4c5&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2016-05-04 23:35:55 +0200'>2016-05-04</span></td><td><a href='/guix/commit/tests/combinators.scm?id=958dd3ce68733bcd5c1231424c7e4ad39e67594a'>utils: Move combinators to (guix combinators).</a><span class='msg-avail'>...<span class='msg-tooltip'>* guix/utils.scm (compile-time-value, memoize, fold2)
(fold-tree, fold-tree-leaves): Move to...
* guix/combinators: ... here.  New file.
* tests/utils.scm ("fold2, 1 list", "fold2, 2 lists")
(fold-tree tests): Move to...
* tests/combinators.scm: ... here.  New file.
* Makefile.am (MODULES, SCM_TESTS): Add them.
* gnu/packages.scm, gnu/packages/bootstrap.scm,
gnu/services/herd.scm, guix/build-system/gnu.scm,
guix/build-system/python.scm, guix/derivations.scm,
guix/gnu-maintenance.scm, guix/import/elpa.scm,
guix/scripts/archive.scm, guix/scripts/build.scm,
guix/scripts/graph.scm, guix/scripts/lint.scm,
guix/scripts/size.scm, guix/scripts/substitute.scm,
guix/serialization.scm, guix/store.scm, guix/ui.scm: Adjust imports
accordingly.
</span></span></td><td>Ludovic Courtès</td></tr>