Auto-generated commit

Author: stdlib-bot

include/stdlib/blas/base/cswap.h

@@ -34,7 +34,7 @@ extern "C" {
 /**
 * Interchanges two complex single-precision floating-point vectors.
 */
-void c_cswap( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY );
+void API_SUFFIX(c_cswap)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY );
 
 #ifdef __cplusplus
 }

include/stdlib/blas/base/cswap_cblas.h

@@ -34,7 +34,7 @@ extern "C" {
 /**
 * Interchanges two complex single-precision floating-point vectors.
 */
-void cblas_cswap( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY );
+void API_SUFFIX(cblas_cswap)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY );
 
 #ifdef __cplusplus
 }

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
 }

src/addon.c

@@ -17,6 +17,7 @@
 */
 
 #include "stdlib/blas/base/cswap.h"
+#include "stdlib/blas/base/shared.h"
 #include "stdlib/napi/export.h"
 #include "stdlib/napi/argv.h"
 #include "stdlib/napi/argv_int64.h"
@@ -38,7 +39,7 @@ static napi_value addon( napi_env env, napi_callback_info info ) {
 	STDLIB_NAPI_ARGV_INT64( env, strideY, argv, 4 );
 	STDLIB_NAPI_ARGV_STRIDED_COMPLEX64ARRAY( env, X, N, strideX, argv, 1 );
 	STDLIB_NAPI_ARGV_STRIDED_COMPLEX64ARRAY( env, Y, N, strideY, argv, 3 );
-	c_cswap( N, (void *)X, strideX, (void *)Y, strideY );
+	API_SUFFIX(c_cswap)( N, (void *)X, strideX, (void *)Y, strideY );
 	return NULL;
 }
 

src/cswap.c

@@ -28,7 +28,7 @@
 * @param Y        second input array
 * @param strideY  Y stride length
 */
-void c_cswap( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
+void API_SUFFIX(c_cswap)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
 	float *x = (float *)X;
 	float *y = (float *)Y;
 	float tmp;

src/cswap_cblas.c

@@ -29,6 +29,6 @@
 * @param Y        second input array
 * @param strideY  Y stride length
 */
-void c_cswap( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
-	cblas_cswap( N, X, strideX, Y, strideY );
+void API_SUFFIX(c_cswap)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
+	API_SUFFIX(cblas_cswap)( N, X, strideX, Y, strideY );
 }

src/cswap_f.c

@@ -29,6 +29,6 @@
 * @param Y        second input array
 * @param strideY  Y stride length
 */
-void c_cswap( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
+void API_SUFFIX(c_cswap)( const CBLAS_INT N, void *X, const CBLAS_INT strideX, void *Y, const CBLAS_INT strideY ) {
 	cswap( &N, X, &strideX, Y, &strideY );
 }