amaharaneko/guix-mirrors
1
1
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2025-10-02 02:15:12 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: kaldi-for-vosk: Update to 0-1.bc5baf1.

Browse source 
* gnu/packages/patches/kaldi-openblas-0.3.29-compatibility.patch: Add patch.
* gnu/local.mk: Record patch.
* gnu/packages/machine-learning.scm (kaldi-for-vosk): Update to 0-1.bc5baf1.
  [origin]: Record patch.

Signed-off-by: Christopher Baines <mail@cbaines.net>
This commit is contained in:
Nicolas Graves 2025-04-24 01:08:05 +02:00 • committed by Christopher Baines
parent 06ec680418
commit b4e018dda5
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
3 changed files with 77 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

70
gnu/packages/patches/kaldi-openblas-0.3.29-compatibility.patch Normal file
View file

@ -0,0 +1,70 @@
From c8febca41cecf68f468f346409735c90ed340a5e Mon Sep 17 00:00:00 2001
Message-ID: <c8febca41cecf68f468f346409735c90ed340a5e.1745338218.git.ngraves@ngraves.fr>
From: Nicolas Graves <ngraves@ngraves.fr>
Date: Tue, 22 Apr 2025 17:57:34 +0200
Subject: [PATCH] Openblas@0.3.29 compatibility.
---
src/matrix/cblas-wrappers.h | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/src/matrix/cblas-wrappers.h b/src/matrix/cblas-wrappers.h
index f869ab7e0..bcc2c2b75 100644
--- a/src/matrix/cblas-wrappers.h
+++ b/src/matrix/cblas-wrappers.h
@@ -383,10 +383,10 @@ inline void mul_elements(
// add clapack here
#if !defined(HAVE_ATLAS)
inline void clapack_Xtptri(KaldiBlasInt *num_rows, float *Mdata, KaldiBlasInt *result) {
- stptri_(const_cast<char *>("U"), const_cast<char *>("N"), num_rows, Mdata, result);
+ stptri_(const_cast<char *>("U"), const_cast<char *>("N"), num_rows, Mdata, result, 1, 1);
}
inline void clapack_Xtptri(KaldiBlasInt *num_rows, double *Mdata, KaldiBlasInt *result) {
- dtptri_(const_cast<char *>("U"), const_cast<char *>("N"), num_rows, Mdata, result);
+ dtptri_(const_cast<char *>("U"), const_cast<char *>("N"), num_rows, Mdata, result, 1, 1);
}
//
inline void clapack_Xgetrf2(KaldiBlasInt *num_rows, KaldiBlasInt *num_cols,
@@ -420,7 +420,7 @@ inline void clapack_Xgesvd(char *v, char *u, KaldiBlasInt *num_cols,
sgesvd_(v, u,
num_cols, num_rows, Mdata, stride,
sv, Vdata, vstride, Udata, ustride,
- p_work, l_work, result);
+ p_work, l_work, result, 1, 1);
}
inline void clapack_Xgesvd(char *v, char *u, KaldiBlasInt *num_cols,
KaldiBlasInt *num_rows, double *Mdata, KaldiBlasInt *stride,
@@ -430,25 +430,25 @@ inline void clapack_Xgesvd(char *v, char *u, KaldiBlasInt *num_cols,
dgesvd_(v, u,
num_cols, num_rows, Mdata, stride,
sv, Vdata, vstride, Udata, ustride,
- p_work, l_work, result);
+ p_work, l_work, result, 1, 1);
}
//
void inline clapack_Xsptri(KaldiBlasInt *num_rows, float *Mdata,
KaldiBlasInt *ipiv, float *work, KaldiBlasInt *result) {
- ssptri_(const_cast<char *>("U"), num_rows, Mdata, ipiv, work, result);
+ ssptri_(const_cast<char *>("U"), num_rows, Mdata, ipiv, work, result, 1);
}
void inline clapack_Xsptri(KaldiBlasInt *num_rows, double *Mdata,
KaldiBlasInt *ipiv, double *work, KaldiBlasInt *result) {
- dsptri_(const_cast<char *>("U"), num_rows, Mdata, ipiv, work, result);
+ dsptri_(const_cast<char *>("U"), num_rows, Mdata, ipiv, work, result, 1);
}
//
void inline clapack_Xsptrf(KaldiBlasInt *num_rows, float *Mdata,
KaldiBlasInt *ipiv, KaldiBlasInt *result) {
- ssptrf_(const_cast<char *>("U"), num_rows, Mdata, ipiv, result);
+ ssptrf_(const_cast<char *>("U"), num_rows, Mdata, ipiv, result, 1);
}
void inline clapack_Xsptrf(KaldiBlasInt *num_rows, double *Mdata,
KaldiBlasInt *ipiv, KaldiBlasInt *result) {
- dsptrf_(const_cast<char *>("U"), num_rows, Mdata, ipiv, result);
+ dsptrf_(const_cast<char *>("U"), num_rows, Mdata, ipiv, result, 1);
}
#else
inline void clapack_Xgetrf(MatrixIndexT num_rows, MatrixIndexT num_cols,
--
2.49.0