diff --git a/include/stdlib/blas/base/dswap.h b/include/stdlib/blas/base/dswap.h
index 90d6e4f..36cab65 100644
--- a/include/stdlib/blas/base/dswap.h
+++ b/include/stdlib/blas/base/dswap.h
@@ -34,7 +34,7 @@ extern "C" {
 /**
 * Interchanges two double-precision floating-point vectors.
 */
-void c_dswap( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY );
+void API_SUFFIX(c_dswap)( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY );
 
 #ifdef __cplusplus
 }
diff --git a/include/stdlib/blas/base/dswap_cblas.h b/include/stdlib/blas/base/dswap_cblas.h
index a7b0234..9429db1 100644
--- a/include/stdlib/blas/base/dswap_cblas.h
+++ b/include/stdlib/blas/base/dswap_cblas.h
@@ -34,7 +34,7 @@ extern "C" {
 /**
 * Interchanges two double-precision floating-point vectors.
 */
-void cblas_dswap( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY );
+void API_SUFFIX(cblas_dswap)( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY );
 
 #ifdef __cplusplus
 }
diff --git a/include/stdlib/blas/base/dswap_fortran.h b/include/stdlib/blas/base/dswap_fortran.h
index 0ae4952..a25d9f1 100644
--- a/include/stdlib/blas/base/dswap_fortran.h
+++ b/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
 }
diff --git a/src/addon.c b/src/addon.c
index 74ff209..53520f7 100644
--- a/src/addon.c
+++ b/src/addon.c
@@ -18,6 +18,7 @@
 
 
 #include "stdlib/blas/base/dswap.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 );
-	c_dswap( N, X, strideX, Y, strideY );
+	API_SUFFIX(c_dswap)( N, X, strideX, Y, strideY );
 	return NULL;
 }
 
diff --git a/src/dswap.c b/src/dswap.c
index 55c93c2..fcfacf2 100644
--- a/src/dswap.c
+++ b/src/dswap.c
@@ -28,7 +28,7 @@
 * @param Y        second input array
 * @param strideY  Y stride length
 */
-void c_dswap( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY ) {
+void API_SUFFIX(c_dswap)( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY ) {
 	double tmp;
 	CBLAS_INT ix;
 	CBLAS_INT iy;
diff --git a/src/dswap_cblas.c b/src/dswap_cblas.c
index 0a99cc0..3076bbc 100644
--- a/src/dswap_cblas.c
+++ b/src/dswap_cblas.c
@@ -29,6 +29,6 @@
 * @param Y        second input array
 * @param strideY  Y stride length
 */
-void c_dswap( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY ) {
-	cblas_dswap( N, X, strideX, Y, strideY );
+void API_SUFFIX(c_dswap)( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY ) {
+	API_SUFFIX(cblas_dswap)( N, X, strideX, Y, strideY );
 }
diff --git a/src/dswap_f.c b/src/dswap_f.c
index 4a77475..01d8b9a 100644
--- a/src/dswap_f.c
+++ b/src/dswap_f.c
@@ -29,6 +29,6 @@
 * @param Y        second input array
 * @param strideY  Y stride length
 */
-void c_dswap( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY ) {
+void API_SUFFIX(c_dswap)( const CBLAS_INT N, double *X, const CBLAS_INT strideX, double *Y, const CBLAS_INT strideY ) {
 	dswap( &N, X, &strideX, Y, &strideY );
 }