From 5c514c7ad5828bc5047594ff001d11334f8f5670 Mon Sep 17 00:00:00 2001 From: Athan Reines Date: Sat, 27 Apr 2024 14:36:45 -0700 Subject: [PATCH] fix: specify integer type to match CBLAS --- .../blas/base/ccopy/include/stdlib/blas/base/ccopy_fortran.h | 2 +- .../blas/base/cswap/include/stdlib/blas/base/cswap_fortran.h | 2 +- .../blas/base/dasum/include/stdlib/blas/base/dasum_fortran.h | 2 +- .../blas/base/daxpy/include/stdlib/blas/base/daxpy_fortran.h | 2 +- .../blas/base/dcopy/include/stdlib/blas/base/dcopy_fortran.h | 2 +- .../blas/base/ddot/include/stdlib/blas/base/ddot_fortran.h | 2 +- .../blas/base/dnrm2/include/stdlib/blas/base/dnrm2_fortran.h | 2 +- .../blas/base/drot/include/stdlib/blas/base/drot_fortran.h | 2 +- .../blas/base/dscal/include/stdlib/blas/base/dscal_fortran.h | 2 +- .../blas/base/dsdot/include/stdlib/blas/base/dsdot_fortran.h | 2 +- .../blas/base/dswap/include/stdlib/blas/base/dswap_fortran.h | 2 +- 11 files changed, 11 insertions(+), 11 deletions(-) diff --git a/lib/node_modules/@stdlib/blas/base/ccopy/include/stdlib/blas/base/ccopy_fortran.h b/lib/node_modules/@stdlib/blas/base/ccopy/include/stdlib/blas/base/ccopy_fortran.h index b470f63f6db..d9d34a47e8a 100644 --- a/lib/node_modules/@stdlib/blas/base/ccopy/include/stdlib/blas/base/ccopy_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/ccopy/include/stdlib/blas/base/ccopy_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Copies values from one complex single-precision floating-point vector to another complex single-precision floating-point vector. */ -void ccopy( const int *, const void *, const int *, void *, const int * ); +void ccopy( const CBLAS_INT *, const void *, const CBLAS_INT *, void *, const CBLAS_INT * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/cswap/include/stdlib/blas/base/cswap_fortran.h b/lib/node_modules/@stdlib/blas/base/cswap/include/stdlib/blas/base/cswap_fortran.h index 965077de13e..fe72bf3f53a 100644 --- a/lib/node_modules/@stdlib/blas/base/cswap/include/stdlib/blas/base/cswap_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/cswap/include/stdlib/blas/base/cswap_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Interchanges two complex single-precision floating-point vectors. */ -void cswap( const int *, void *, const int *, void *, const int * ); +void cswap( const CBLAS_INT *, void *, const CBLAS_INT *, void *, const CBLAS_INT * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/dasum/include/stdlib/blas/base/dasum_fortran.h b/lib/node_modules/@stdlib/blas/base/dasum/include/stdlib/blas/base/dasum_fortran.h index 85150a96acf..fd3b2ae7863 100644 --- a/lib/node_modules/@stdlib/blas/base/dasum/include/stdlib/blas/base/dasum_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/dasum/include/stdlib/blas/base/dasum_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Computes the sum of absolute values. */ -void dasumsub( const int *, const double *, const int *, double * ); +void dasumsub( const CBLAS_INT *, const double *, const CBLAS_INT *, double * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/daxpy/include/stdlib/blas/base/daxpy_fortran.h b/lib/node_modules/@stdlib/blas/base/daxpy/include/stdlib/blas/base/daxpy_fortran.h index 5b2ee2fadf4..74093dc65f4 100644 --- a/lib/node_modules/@stdlib/blas/base/daxpy/include/stdlib/blas/base/daxpy_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/daxpy/include/stdlib/blas/base/daxpy_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Multiplies a vector `X` by a constant and adds the result to `Y`. */ -void daxpy( const int *, const double *, const double *, const int *, double *, const int * ); +void daxpy( const CBLAS_INT *, const double *, const double *, const CBLAS_INT *, double *, const CBLAS_INT * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/dcopy/include/stdlib/blas/base/dcopy_fortran.h b/lib/node_modules/@stdlib/blas/base/dcopy/include/stdlib/blas/base/dcopy_fortran.h index cfd562c84a5..941df891814 100644 --- a/lib/node_modules/@stdlib/blas/base/dcopy/include/stdlib/blas/base/dcopy_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/dcopy/include/stdlib/blas/base/dcopy_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Copies values from `X` into `Y`. */ -void dcopy( const int *, const double *, const int *, double *, const int * ); +void dcopy( const CBLAS_INT *, const double *, const CBLAS_INT *, double *, const CBLAS_INT * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/ddot/include/stdlib/blas/base/ddot_fortran.h b/lib/node_modules/@stdlib/blas/base/ddot/include/stdlib/blas/base/ddot_fortran.h index 062733079c5..b2e2d51401b 100644 --- a/lib/node_modules/@stdlib/blas/base/ddot/include/stdlib/blas/base/ddot_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/ddot/include/stdlib/blas/base/ddot_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Computes the dot product of two double-precision floating-point vectors. */ -void ddotsub( const int *, const double *, const int *, const double *, const int *, double * ); +void ddotsub( const CBLAS_INT *, const double *, const CBLAS_INT *, const double *, const CBLAS_INT *, double * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/dnrm2/include/stdlib/blas/base/dnrm2_fortran.h b/lib/node_modules/@stdlib/blas/base/dnrm2/include/stdlib/blas/base/dnrm2_fortran.h index 26692eecfd8..abd78649f64 100644 --- a/lib/node_modules/@stdlib/blas/base/dnrm2/include/stdlib/blas/base/dnrm2_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/dnrm2/include/stdlib/blas/base/dnrm2_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Computes the L2-norm of a double-precision floating-point vector. */ -void dnrm2sub( const int *, const double *, const int *, double * ); +void dnrm2sub( const CBLAS_INT *, const double *, const CBLAS_INT *, double * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/drot/include/stdlib/blas/base/drot_fortran.h b/lib/node_modules/@stdlib/blas/base/drot/include/stdlib/blas/base/drot_fortran.h index eedb94b808b..71641991e33 100644 --- a/lib/node_modules/@stdlib/blas/base/drot/include/stdlib/blas/base/drot_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/drot/include/stdlib/blas/base/drot_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Applies a plane rotation. */ -void drot( const int *, double *, const int *, double *, const int *, const double *, const double * ); +void drot( const CBLAS_INT *, double *, const CBLAS_INT *, double *, const CBLAS_INT *, const double *, const double * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/dscal/include/stdlib/blas/base/dscal_fortran.h b/lib/node_modules/@stdlib/blas/base/dscal/include/stdlib/blas/base/dscal_fortran.h index bb19cbe3123..2d74e0e8ea5 100644 --- a/lib/node_modules/@stdlib/blas/base/dscal/include/stdlib/blas/base/dscal_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/dscal/include/stdlib/blas/base/dscal_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Multiplies each element of a double-precision floating-point vector by a constant. */ -void dscal( const int *, const double *, double *, const int * ); +void dscal( const CBLAS_INT *, const double *, double *, const CBLAS_INT * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/dsdot/include/stdlib/blas/base/dsdot_fortran.h b/lib/node_modules/@stdlib/blas/base/dsdot/include/stdlib/blas/base/dsdot_fortran.h index 20034d0c1c1..746e3995ee7 100644 --- a/lib/node_modules/@stdlib/blas/base/dsdot/include/stdlib/blas/base/dsdot_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/dsdot/include/stdlib/blas/base/dsdot_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Computes the dot product of two single-precision floating-point vectors with extended accumulation and result. */ -void dsdotsub( const int *, const float *, const int *, const float *, const int *, double * ); +void dsdotsub( const CBLAS_INT *, const float *, const CBLAS_INT *, const float *, const CBLAS_INT *, double * ); #ifdef __cplusplus } diff --git a/lib/node_modules/@stdlib/blas/base/dswap/include/stdlib/blas/base/dswap_fortran.h b/lib/node_modules/@stdlib/blas/base/dswap/include/stdlib/blas/base/dswap_fortran.h index 0ae49520662..a25d9f1ca40 100644 --- a/lib/node_modules/@stdlib/blas/base/dswap/include/stdlib/blas/base/dswap_fortran.h +++ b/lib/node_modules/@stdlib/blas/base/dswap/include/stdlib/blas/base/dswap_fortran.h @@ -32,7 +32,7 @@ extern "C" { /** * Interchanges two double-precision floating-point vectors. */ -void dswap( const int *, double *, const int *, double *, const int * ); +void dswap( const CBLAS_INT *, double *, const CBLAS_INT *, double *, const CBLAS_INT * ); #ifdef __cplusplus }