From c649450f1264a6446499d405d21979bd022a0b61 Mon Sep 17 00:00:00 2001
From: stdlib-bot <noreply@stdlib.io>
Date: Sat, 27 Apr 2024 23:06:00 +0000
Subject: [PATCH] Auto-generated commit

---
 include/stdlib/blas/base/ddot.h         | 2 +-
 include/stdlib/blas/base/ddot_cblas.h   | 2 +-
 include/stdlib/blas/base/ddot_fortran.h | 2 +-
 src/addon.c                             | 3 ++-
 src/ddot.c                              | 2 +-
 src/ddot_cblas.c                        | 4 ++--
 src/ddot_f.c                            | 2 +-
 7 files changed, 9 insertions(+), 8 deletions(-)

diff --git a/include/stdlib/blas/base/ddot.h b/include/stdlib/blas/base/ddot.h
index 3026b74..2368577 100644
--- a/include/stdlib/blas/base/ddot.h
+++ b/include/stdlib/blas/base/ddot.h
@@ -34,7 +34,7 @@ extern "C" {
 /**
 * Computes the dot product of two double-precision floating-point vectors.
 */
-double c_ddot( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY );
+double API_SUFFIX(c_ddot)( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY );
 
 #ifdef __cplusplus
 }
diff --git a/include/stdlib/blas/base/ddot_cblas.h b/include/stdlib/blas/base/ddot_cblas.h
index 479c5e5..cd5719d 100644
--- a/include/stdlib/blas/base/ddot_cblas.h
+++ b/include/stdlib/blas/base/ddot_cblas.h
@@ -34,7 +34,7 @@ extern "C" {
 /**
 * Computes the dot product of two double-precision floating-point vectors.
 */
-double cblas_ddot( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY );
+double API_SUFFIX(cblas_ddot)( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY );
 
 #ifdef __cplusplus
 }
diff --git a/include/stdlib/blas/base/ddot_fortran.h b/include/stdlib/blas/base/ddot_fortran.h
index 0627330..b2e2d51 100644
--- a/include/stdlib/blas/base/ddot_fortran.h
+++ b/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/src/addon.c b/src/addon.c
index e36f668..c7b15a2 100644
--- a/src/addon.c
+++ b/src/addon.c
@@ -17,6 +17,7 @@
 */
 
 #include "stdlib/blas/base/ddot.h"
+#include "stdlib/blas/base/shared.h"
 #include "stdlib/napi/export.h"
 #include "stdlib/napi/argv.h"
 #include "stdlib/napi/argv_int64.h"
@@ -39,7 +40,7 @@ static napi_value addon( napi_env env, napi_callback_info info ) {
 	STDLIB_NAPI_ARGV_INT64( env, strideY, argv, 4 );
 	STDLIB_NAPI_ARGV_STRIDED_FLOAT64ARRAY( env, X, N, strideX, argv, 1 );
 	STDLIB_NAPI_ARGV_STRIDED_FLOAT64ARRAY( env, Y, N, strideY, argv, 3 );
-	STDLIB_NAPI_CREATE_DOUBLE( env, c_ddot( N, X, strideX, Y, strideY ), v );
+	STDLIB_NAPI_CREATE_DOUBLE( env, API_SUFFIX(c_ddot)( N, X, strideX, Y, strideY ), v );
 	return v;
 }
 
diff --git a/src/ddot.c b/src/ddot.c
index 755f64d..d139591 100644
--- a/src/ddot.c
+++ b/src/ddot.c
@@ -29,7 +29,7 @@
 * @param strideY  Y stride length
 * @return         the dot product
 */
-double c_ddot( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY ) {
+double API_SUFFIX(c_ddot)( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY ) {
 	double dot;
 	CBLAS_INT ix;
 	CBLAS_INT iy;
diff --git a/src/ddot_cblas.c b/src/ddot_cblas.c
index 899c4d5..53b5dce 100644
--- a/src/ddot_cblas.c
+++ b/src/ddot_cblas.c
@@ -30,6 +30,6 @@
 * @param strideY  Y stride length
 * @return         the dot product
 */
-double c_ddot( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY ) {
-	return cblas_ddot( N, X, strideX, Y, strideY );
+double API_SUFFIX(c_ddot)( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY ) {
+	return API_SUFFIX(cblas_ddot)( N, X, strideX, Y, strideY );
 }
diff --git a/src/ddot_f.c b/src/ddot_f.c
index 8a80f1a..9184cc3 100644
--- a/src/ddot_f.c
+++ b/src/ddot_f.c
@@ -30,7 +30,7 @@
 * @param strideY  Y stride length
 * @return         the dot product
 */
-double c_ddot( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY ) {
+double API_SUFFIX(c_ddot)( const CBLAS_INT N, const double *X, const CBLAS_INT strideX, const double *Y, const CBLAS_INT strideY ) {
 	double dot;
 	ddotsub( &N, X, &strideX, Y, &strideY, &dot );
 	return dot;