Find{BLAS,LAPACK}: Specify integer type in tests

2 files changed, 14 insertions, 9 deletions

diff --git a/Tests/FindBLAS/Test/main.c b/Tests/FindBLAS/Test/main.c
index e61b02c..8e58559 100644
--- a/Tests/FindBLAS/Test/main.c
+++ b/Tests/FindBLAS/Test/main.c
@@ -1,16 +1,18 @@
 #include <assert.h>
 #include <string.h>
 
+typedef int blas_int;
+
 // declare what parts of the blas C-API we need
-void dswap_(int* N, double* X, int* incX, double* Y, int* incY);
+void dswap_(blas_int* N, double* X, blas_int* incX, double* Y, blas_int* incY);
 
 int main()
 {
   double x[4] = { 1, 2, 3, 4 };
   double y[4] = { 8, 7, 7, 6 };
-  int N = 4;
-  int incX = 1;
-  int incY = 1;
+  blas_int N = 4;
+  blas_int incX = 1;
+  blas_int incY = 1;
   dswap_(&N, x, &incX, y, &incY);
   return 0;
 }
diff --git a/Tests/FindLAPACK/Test/main.c b/Tests/FindLAPACK/Test/main.c
index 5873e7b..04eedea 100644
--- a/Tests/FindLAPACK/Test/main.c
+++ b/Tests/FindLAPACK/Test/main.c
@@ -1,8 +1,11 @@
 #include <assert.h>
 #include <string.h>
 
+typedef int blas_int;
+
 // declare what parts of the lapack C-API we need
-void dgesv_(int*, int*, double*, int*, int*, double*, int*, int*);
+void dgesv_(blas_int*, blas_int*, double*, blas_int*, blas_int*, double*,
+            blas_int*, blas_int*);
 
 int main()
 {
@@ -10,11 +13,11 @@ int main()
     0, 1, 2, 3, 4, 5, 6, 7,
   };
   double B[2] = { 0, 5 };
-  int ipiv[2] = { 0, 0 };
-  int info = 0;
+  blas_int ipiv[2] = { 0, 0 };
+  blas_int info = 0;
 
-  int dim = 2;
-  int numCols = 1;
+  blas_int dim = 2;
+  blas_int numCols = 1;
   dgesv_(&dim, &numCols, A, &dim, ipiv, B, &dim, &info);
   return 0;
 }