math/blas, math/cblas, math/lapack, math/lapacke: upgrade to 3.12.1

Release notes at https://github.com/Reference-LAPACK/lapack/releases/tag/v3.12.1

Remark: many patches are needed, see
https://github.com/Reference-LAPACK/lapack/pull/1093
This commit is contained in:
Thierry Thomas 2025-01-23 18:44:11 +01:00
parent f23a3db1c4
commit c2c034b9f8
15 changed files with 267 additions and 19 deletions

View file

@ -1,9 +1,9 @@
PORTNAME?= lapack
PORTVERSION= 3.12.0
PORTVERSION= 3.12.1
.if !(defined(BLAS_SLAVEPORT) || defined(CBLAS_SLAVEPORT) || defined(XLAPACK_SLAVEPORT) || defined(LAPACKE_SLAVEPORT))
PORTREVISION= 2
PORTREVISION= 0
.else
PORTREVISION?= 1 # Never remove this line, keep PORTREVISION?=0 in case.
PORTREVISION?= 0 # Never remove this line, keep PORTREVISION?=0 in case.
.endif
CATEGORIES= math
MASTER_SITES= https://github.com/Reference-LAPACK/lapack/archive/refs/tags/:src \
@ -30,7 +30,8 @@ CPE_VENDOR= lapack_project
CPE_PRODUCT= lapack
SVERSION= ${PORTVERSION:R:R}
PLIST_SUB= SVERSION="${SVERSION}" VER=${PORTVERSION}
LIBVERSION= ${PORTVERSION:C/1$/0/}
PLIST_SUB= SVERSION="${SVERSION}" VER=${LIBVERSION}
.include <bsd.port.options.mk>

View file

@ -1,5 +1,5 @@
TIMESTAMP = 1703076157
SHA256 (lapack-3.12.0/v3.12.0.tar.gz) = eac9570f8e0ad6f30ce4b963f4f033f0f643e7c3912fc9ee6cd99120675ad48b
SIZE (lapack-3.12.0/v3.12.0.tar.gz) = 7933607
SHA256 (lapack-3.12.0/manpages.tgz) = 342db80461de2c0f10848a3f338ee6e7511b417f459600a7e75ad4dc4bf05f5a
SIZE (lapack-3.12.0/manpages.tgz) = 5396817
TIMESTAMP = 1737190889
SHA256 (lapack-3.12.1/v3.12.1.tar.gz) = 2ca6407a001a474d4d4d35f3a61550156050c48016d949f0da0529c0aa052422
SIZE (lapack-3.12.1/v3.12.1.tar.gz) = 8067087
SHA256 (lapack-3.12.1/manpages.tgz) = f5991ee1ab5402ba6fa70bed7a292ea3e4507a0cc78f575d9eff72d561597cb8
SIZE (lapack-3.12.1/manpages.tgz) = 4700814

View file

@ -1,10 +0,0 @@
--- CMakeLists.txt.orig 2023-11-24 20:41:15 UTC
+++ CMakeLists.txt
@@ -223,6 +223,7 @@ if(BLAS_LIBRARIES)
# Check the usage of the user provided BLAS libraries
if(BLAS_LIBRARIES)
+ enable_language(Fortran)
include(CheckFortranFunctionExists)
set(CMAKE_REQUIRED_LIBRARIES ${BLAS_LIBRARIES})
CHECK_FORTRAN_FUNCTION_EXISTS("dgemm" BLAS_FOUND)

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/cgelqs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/cgelqs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* COMPLEX A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
COMPLEX A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,13 @@
--- SRC/DEPRECATED/cgelsx.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/cgelsx.f
@@ -364,8 +364,8 @@
*
* B(1:M,1:NRHS) := Q**H * B(1:M,1:NRHS)
*
- CALL CUNM2R( 'Left', 'Conjugate transpose', M, NRHS, MN, A, LDA,
- $ WORK( 1 ), B, LDB, WORK( 2*MN+1 ), INFO )
+ CALL CUNM2R( 'Left', 'Conjugate transpose', M, NRHS, MN, A,
+ $ LDA, WORK( 1 ), B, LDB, WORK( 2*MN+1 ), INFO )
*
* workspace NRHS
*

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/cgeqrs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/cgeqrs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* COMPLEX A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
COMPLEX A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/dgelqs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/dgelqs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* DOUBLE PRECISION A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
DOUBLE PRECISION A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,13 @@
--- SRC/DEPRECATED/dgeqpf.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/dgeqpf.f
@@ -218,8 +218,8 @@
MA = MIN( ITEMP, M )
CALL DGEQR2( M, MA, A, LDA, TAU, WORK, INFO )
IF( MA.LT.N ) THEN
- CALL DORM2R( 'Left', 'Transpose', M, N-MA, MA, A, LDA, TAU,
- $ A( 1, MA+1 ), LDA, WORK, INFO )
+ CALL DORM2R( 'Left', 'Transpose', M, N-MA, MA, A, LDA,
+ $ TAU, A( 1, MA+1 ), LDA, WORK, INFO )
END IF
END IF
*

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/dgeqrs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/dgeqrs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* DOUBLE PRECISION A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
DOUBLE PRECISION A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,26 @@
--- SRC/DEPRECATED/dlahrd.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/dlahrd.f
@@ -231,8 +231,9 @@
*
* w := T**T *w
*
- CALL DTRMV( 'Upper', 'Transpose', 'Non-unit', I-1, T, LDT,
- $ T( 1, NB ), 1 )
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1093
+ CALL DTRMV( 'Upper', 'Transpose', 'Non-unit', I-1,
+ $ T, LDT, T( 1, NB ), 1 )
*
* b2 := b2 - V2*w
*
@@ -270,8 +271,9 @@
* Compute T(1:i,i)
*
CALL DSCAL( I-1, -TAU( I ), T( 1, I ), 1 )
- CALL DTRMV( 'Upper', 'No transpose', 'Non-unit', I-1, T, LDT,
- $ T( 1, I ), 1 )
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1093
+ CALL DTRMV( 'Upper', 'No transpose', 'Non-unit', I-1,
+ $ T, LDT, T( 1, I ), 1 )
T( I, I ) = TAU( I )
*
10 CONTINUE

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/sgelqs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/sgelqs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* REAL A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
REAL A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,13 @@
--- SRC/DEPRECATED/sgeqpf.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/sgeqpf.f
@@ -218,8 +218,8 @@
MA = MIN( ITEMP, M )
CALL SGEQR2( M, MA, A, LDA, TAU, WORK, INFO )
IF( MA.LT.N ) THEN
- CALL SORM2R( 'Left', 'Transpose', M, N-MA, MA, A, LDA, TAU,
- $ A( 1, MA+1 ), LDA, WORK, INFO )
+ CALL SORM2R( 'Left', 'Transpose', M, N-MA, MA, A, LDA,
+ $ TAU, A( 1, MA+1 ), LDA, WORK, INFO )
END IF
END IF
*

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/sgeqrs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/sgeqrs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* REAL A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
REAL A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/zgelqs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/zgelqs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* COMPLEX*16 A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
COMPLEX*16 A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================

View file

@ -0,0 +1,24 @@
--- SRC/DEPRECATED/zgeqrs.f.orig 2024-12-03 11:39:11 UTC
+++ SRC/DEPRECATED/zgeqrs.f
@@ -15,8 +15,9 @@
* INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
* COMPLEX*16 A( LDA, * ), B( LDB, * ), TAU( * ),
-* $ WORK( LWORK )
+* $ WORK( * )
* ..
*
*
@@ -127,8 +128,9 @@
INTEGER INFO, LDA, LDB, LWORK, M, N, NRHS
* ..
* .. Array Arguments ..
+* Patch from https://github.com/Reference-LAPACK/lapack/pull/1094
COMPLEX*16 A( LDA, * ), B( LDB, * ), TAU( * ),
- $ WORK( LWORK )
+ $ WORK( * )
* ..
*
* =====================================================================