apply upstream fix for accidental removal of deprecated symbols from header file
This commit is contained in:
parent
1f32ae9480
commit
2b14903831
138
87536aa3c8bb0af00f66088fb6ac05d87509e011.patch
Normal file
138
87536aa3c8bb0af00f66088fb6ac05d87509e011.patch
Normal file
@ -0,0 +1,138 @@
|
||||
From 87536aa3c8bb0af00f66088fb6ac05d87509e011 Mon Sep 17 00:00:00 2001
|
||||
From: =?UTF-8?q?S=C3=A9bastien=20Villemot?= <sebastien@debian.org>
|
||||
Date: Sat, 23 Nov 2019 12:22:20 +0100
|
||||
Subject: [PATCH] Restore missing prototypes for deprecated LAPACK functions
|
||||
|
||||
Some LAPACK functions prototypes were inadvertedly dropped in 3.9.0. As a
|
||||
consequence, LAPACKE has several unresolved symbols.
|
||||
|
||||
Closes #365
|
||||
---
|
||||
LAPACKE/include/lapack.h | 100 +++++++++++++++++++++++++++++++++++++++
|
||||
1 file changed, 100 insertions(+)
|
||||
|
||||
diff --git a/LAPACKE/include/lapack.h b/LAPACKE/include/lapack.h
|
||||
index 3f425325f..5c131d844 100644
|
||||
--- a/LAPACKE/include/lapack.h
|
||||
+++ b/LAPACKE/include/lapack.h
|
||||
@@ -1842,6 +1842,28 @@ void LAPACK_zgeqlf(
|
||||
lapack_complex_double* work, lapack_int const* lwork,
|
||||
lapack_int* info );
|
||||
|
||||
+#define LAPACK_sgeqpf LAPACK_GLOBAL(sgeqpf,SGEQPF)
|
||||
+void LAPACK_sgeqpf( lapack_int* m, lapack_int* n, float* a, lapack_int* lda,
|
||||
+ lapack_int* jpvt, float* tau, float* work,
|
||||
+ lapack_int *info );
|
||||
+
|
||||
+#define LAPACK_dgeqpf LAPACK_GLOBAL(dgeqpf,DGEQPF)
|
||||
+void LAPACK_dgeqpf( lapack_int* m, lapack_int* n, double* a, lapack_int* lda,
|
||||
+ lapack_int* jpvt, double* tau, double* work,
|
||||
+ lapack_int *info );
|
||||
+
|
||||
+#define LAPACK_cgeqpf LAPACK_GLOBAL(cgeqpf,CGEQPF)
|
||||
+void LAPACK_cgeqpf( lapack_int* m, lapack_int* n, lapack_complex_float* a,
|
||||
+ lapack_int* lda, lapack_int* jpvt,
|
||||
+ lapack_complex_float* tau, lapack_complex_float* work,
|
||||
+ float* rwork, lapack_int *info );
|
||||
+
|
||||
+#define LAPACK_zgeqpf LAPACK_GLOBAL(zgeqpf,ZGEQPF)
|
||||
+void LAPACK_zgeqpf( lapack_int* m, lapack_int* n, lapack_complex_double* a,
|
||||
+ lapack_int* lda, lapack_int* jpvt,
|
||||
+ lapack_complex_double* tau, lapack_complex_double* work,
|
||||
+ double* rwork, lapack_int *info );
|
||||
+
|
||||
#define LAPACK_cgeqp3 LAPACK_GLOBAL(cgeqp3,CGEQP3)
|
||||
void LAPACK_cgeqp3(
|
||||
lapack_int const* m, lapack_int const* n,
|
||||
@@ -3617,6 +3639,47 @@ void LAPACK_zggrqf(
|
||||
lapack_complex_double* work, lapack_int const* lwork,
|
||||
lapack_int* info );
|
||||
|
||||
+#define LAPACK_sggsvd LAPACK_GLOBAL(sggsvd,SGGSVD)
|
||||
+lapack_int LAPACKE_sggsvd( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int n, lapack_int p,
|
||||
+ lapack_int* k, lapack_int* l, float* a,
|
||||
+ lapack_int lda, float* b, lapack_int ldb,
|
||||
+ float* alpha, float* beta, float* u, lapack_int ldu,
|
||||
+ float* v, lapack_int ldv, float* q, lapack_int ldq,
|
||||
+ lapack_int* iwork );
|
||||
+
|
||||
+#define LAPACK_dggsvd LAPACK_GLOBAL(dggsvd,DGGSVD)
|
||||
+lapack_int LAPACKE_dggsvd( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int n, lapack_int p,
|
||||
+ lapack_int* k, lapack_int* l, double* a,
|
||||
+ lapack_int lda, double* b, lapack_int ldb,
|
||||
+ double* alpha, double* beta, double* u,
|
||||
+ lapack_int ldu, double* v, lapack_int ldv, double* q,
|
||||
+ lapack_int ldq, lapack_int* iwork );
|
||||
+
|
||||
+#define LAPACK_cggsvd LAPACK_GLOBAL(cggsvd,CGGSVD)
|
||||
+lapack_int LAPACKE_cggsvd( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int n, lapack_int p,
|
||||
+ lapack_int* k, lapack_int* l,
|
||||
+ lapack_complex_float* a, lapack_int lda,
|
||||
+ lapack_complex_float* b, lapack_int ldb,
|
||||
+ float* alpha, float* beta, lapack_complex_float* u,
|
||||
+ lapack_int ldu, lapack_complex_float* v,
|
||||
+ lapack_int ldv, lapack_complex_float* q,
|
||||
+ lapack_int ldq, lapack_int* iwork );
|
||||
+
|
||||
+#define LAPACK_zggsvd LAPACK_GLOBAL(zggsvd,ZGGSVD)
|
||||
+lapack_int LAPACKE_zggsvd( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int n, lapack_int p,
|
||||
+ lapack_int* k, lapack_int* l,
|
||||
+ lapack_complex_double* a, lapack_int lda,
|
||||
+ lapack_complex_double* b, lapack_int ldb,
|
||||
+ double* alpha, double* beta,
|
||||
+ lapack_complex_double* u, lapack_int ldu,
|
||||
+ lapack_complex_double* v, lapack_int ldv,
|
||||
+ lapack_complex_double* q, lapack_int ldq,
|
||||
+ lapack_int* iwork );
|
||||
+
|
||||
#define LAPACK_cggsvd3 LAPACK_GLOBAL(cggsvd3,CGGSVD3)
|
||||
void LAPACK_cggsvd3(
|
||||
char const* jobu, char const* jobv, char const* jobq,
|
||||
@@ -3679,6 +3742,43 @@ void LAPACK_zggsvd3(
|
||||
lapack_int* iwork,
|
||||
lapack_int* info );
|
||||
|
||||
+#define LAPACK_sggsvp LAPACK_GLOBAL(sggsvp,SGGSVP)
|
||||
+lapack_int LAPACKE_sggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int p, lapack_int n, float* a,
|
||||
+ lapack_int lda, float* b, lapack_int ldb, float tola,
|
||||
+ float tolb, lapack_int* k, lapack_int* l, float* u,
|
||||
+ lapack_int ldu, float* v, lapack_int ldv, float* q,
|
||||
+ lapack_int ldq );
|
||||
+
|
||||
+#define LAPACK_dggsvp LAPACK_GLOBAL(dggsvp,DGGSVP)
|
||||
+lapack_int LAPACKE_dggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int p, lapack_int n, double* a,
|
||||
+ lapack_int lda, double* b, lapack_int ldb,
|
||||
+ double tola, double tolb, lapack_int* k,
|
||||
+ lapack_int* l, double* u, lapack_int ldu, double* v,
|
||||
+ lapack_int ldv, double* q, lapack_int ldq );
|
||||
+
|
||||
+#define LAPACK_cggsvp LAPACK_GLOBAL(cggsvp,CGGSVP)
|
||||
+lapack_int LAPACKE_cggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int p, lapack_int n,
|
||||
+ lapack_complex_float* a, lapack_int lda,
|
||||
+ lapack_complex_float* b, lapack_int ldb, float tola,
|
||||
+ float tolb, lapack_int* k, lapack_int* l,
|
||||
+ lapack_complex_float* u, lapack_int ldu,
|
||||
+ lapack_complex_float* v, lapack_int ldv,
|
||||
+ lapack_complex_float* q, lapack_int ldq );
|
||||
+
|
||||
+#define LAPACK_zggsvp LAPACK_GLOBAL(zggsvp,ZGGSVP)
|
||||
+lapack_int LAPACKE_zggsvp( int matrix_layout, char jobu, char jobv, char jobq,
|
||||
+ lapack_int m, lapack_int p, lapack_int n,
|
||||
+ lapack_complex_double* a, lapack_int lda,
|
||||
+ lapack_complex_double* b, lapack_int ldb,
|
||||
+ double tola, double tolb, lapack_int* k,
|
||||
+ lapack_int* l, lapack_complex_double* u,
|
||||
+ lapack_int ldu, lapack_complex_double* v,
|
||||
+ lapack_int ldv, lapack_complex_double* q,
|
||||
+ lapack_int ldq );
|
||||
+
|
||||
#define LAPACK_cggsvp3 LAPACK_GLOBAL(cggsvp3,CGGSVP3)
|
||||
void LAPACK_cggsvp3(
|
||||
char const* jobu, char const* jobv, char const* jobq,
|
@ -10,7 +10,7 @@
|
||||
Summary: Numerical linear algebra package libraries
|
||||
Name: lapack
|
||||
Version: %{mediumver}.0
|
||||
Release: 2%{?dist}
|
||||
Release: 3%{?dist}
|
||||
License: BSD
|
||||
URL: http://www.netlib.org/lapack/
|
||||
Source0: https://github.com/Reference-LAPACK/lapack/archive/v%{version}.tar.gz
|
||||
@ -25,6 +25,8 @@ Patch4: lapack-3.9.0-lapacke-shared.patch
|
||||
Patch5: lapack-3.4.1-lapacke-disable-testing-functions.patch
|
||||
Patch6: lapack-3.5.0-lapacke-matgenobj.patch
|
||||
Patch7: lapack-3.9.0-lapacke-tmglib.patch
|
||||
# Bugzilla 1814756
|
||||
Patch8: https://github.com/Reference-LAPACK/lapack/commit/87536aa3c8bb0af00f66088fb6ac05d87509e011.patch
|
||||
BuildRequires: gcc-gfortran, gawk
|
||||
Requires: blas%{?_isa} = %{version}-%{release}
|
||||
|
||||
@ -146,6 +148,7 @@ BLAS static libraries (64bit INTEGER).
|
||||
# %patch5 -p1 -b .disable-functions
|
||||
# %patch6 -p1 -b .matgenobj
|
||||
%patch7 -p1 -b .tmglib
|
||||
%patch8 -p1 -b .bz1814756
|
||||
|
||||
mkdir manpages
|
||||
mv man/ manpages/
|
||||
@ -520,6 +523,9 @@ sed -i 's|Requires.private: blas|Requires.private: blas64|g' %{buildroot}%{_libd
|
||||
%endif
|
||||
|
||||
%changelog
|
||||
* Thu Mar 19 2020 Tom Callaway <spot@fedoraproject.org> - 3.9.0-3
|
||||
- apply upstream fix for accidental removal of deprecated symbols from header file
|
||||
|
||||
* Wed Jan 29 2020 Fedora Release Engineering <releng@fedoraproject.org> - 3.9.0-2
|
||||
- Rebuilt for https://fedoraproject.org/wiki/Fedora_32_Mass_Rebuild
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user