diff --git a/SRC/clacon2.c b/SRC/clacon2.c
index 107bb64..39deb83 100644
--- a/SRC/clacon2.c
+++ b/SRC/clacon2.c
@@ -106,6 +106,11 @@ clacon2_(int *n, complex *v, complex *x, float *est, int *kase, int isave[3])
     extern float smach(char *);
     extern int icmax1_slu(int *, complex *, int *);
     extern double scsum1_slu(int *, complex *, int *);
+#ifdef _CRAY
+    extern int CCOPY(int *, complex *, int *, complex [], int *);
+#else
+    extern int ccopy_(int *, complex *, int *, complex [], int *);
+#endif
 
     safmin = smach("Safe minimum");  /* lamch_("Safe minimum"); */
     if ( *kase == 0 ) {
diff --git a/SRC/dmach.c b/SRC/dmach.c
index 73beacb..cafdf1c 100644
--- a/SRC/dmach.c
+++ b/SRC/dmach.c
@@ -11,6 +11,7 @@ at the top-level directory.
 #include <float.h>
 #include <math.h>
 #include <stdio.h>
+#include <string.h>
 
 double dmach(char *cmach)
 {
diff --git a/SRC/ilu_cdrop_row.c b/SRC/ilu_cdrop_row.c
index 4987548..09b8a93 100644
--- a/SRC/ilu_cdrop_row.c
+++ b/SRC/ilu_cdrop_row.c
@@ -28,6 +28,7 @@ extern void caxpy_(int *, complex *, complex [], int *, complex [], int *);
 extern void ccopy_(int *, complex [], int *, complex [], int *);
 extern float scasum_(int *, complex *, int *);
 extern float scnrm2_(int *, complex *, int *);
+extern void scopy_(int *, float [], int *, float [], int *);
 extern double dnrm2_(int *, double [], int *);
 extern int icamax_(int *, complex [], int *);
 
diff --git a/SRC/ilu_zdrop_row.c b/SRC/ilu_zdrop_row.c
index f434dd9..2de1226 100644
--- a/SRC/ilu_zdrop_row.c
+++ b/SRC/ilu_zdrop_row.c
@@ -29,6 +29,7 @@ extern void zcopy_(int *, doublecomplex [], int *, doublecomplex [], int *);
 extern double dzasum_(int *, doublecomplex *, int *);
 extern double dznrm2_(int *, doublecomplex *, int *);
 extern double dnrm2_(int *, double [], int *);
+extern void dcopy_(int *, double [], int *, double [], int *);
 extern int izamax_(int *, doublecomplex [], int *);
 
 static double *A;  /* used in _compare_ only */
diff --git a/SRC/slacon2.c b/SRC/slacon2.c
index 7c93341..50efe78 100644
--- a/SRC/slacon2.c
+++ b/SRC/slacon2.c
@@ -157,7 +157,7 @@ L40:
 #ifdef _CRAY
     isave[1] = ISAMAX(n, &x[0], &c__1);   /* j */
 #else
-    isave[1] = idamax_(n, &x[0], &c__1);  /* j */
+    isave[1] = isamax_(n, &x[0], &c__1);  /* j */
 #endif
     --isave[1];  /* --j; */
     isave[2] = 2;  /* iter = 2; */
diff --git a/SRC/smach.c b/SRC/smach.c
index fff6c5f..0b69991 100644
--- a/SRC/smach.c
+++ b/SRC/smach.c
@@ -11,6 +11,7 @@ at the top-level directory.
 #include <float.h>
 #include <math.h>
 #include <stdio.h>
+#include <string.h>
 
 float smach(char *cmach)
 {
diff --git a/SRC/sp_ienv.c b/SRC/sp_ienv.c
index 855d901..ce2865e 100644
--- a/SRC/sp_ienv.c
+++ b/SRC/sp_ienv.c
@@ -24,6 +24,7 @@ at the top-level directory.
  * History:             Modified from lapack routine ILAENV
  */
 #include "slu_Cnames.h"
+extern int input_error(char *, int *);
 
 /*! \brief
 
diff --git a/SRC/zlacon2.c b/SRC/zlacon2.c
index b43c619..ed5f2b7 100644
--- a/SRC/zlacon2.c
+++ b/SRC/zlacon2.c
@@ -106,6 +106,11 @@ zlacon2_(int *n, doublecomplex *v, doublecomplex *x, double *est, int *kase, int
     extern double dmach(char *);
     extern int izmax1_slu(int *, doublecomplex *, int *);
     extern double dzsum1_slu(int *, doublecomplex *, int *);
+#ifdef _CRAY
+    extern int CCOPY(int *, doublecomplex *, int *, doublecomplex *, int *);
+#else
+    extern int zcopy_(int *, doublecomplex *, int *, doublecomplex *, int *);
+#endif
 
     safmin = dmach("Safe minimum");  /* lamch_("Safe minimum"); */
     if ( *kase == 0 ) {
diff --git a/TESTING/zdrive.c b/TESTING/zdrive.c
index 23e96fc..1e7d0aa 100644
--- a/TESTING/zdrive.c
+++ b/TESTING/zdrive.c
@@ -21,6 +21,7 @@ at the top-level directory.
  * Purpose:             MAIN test program
  */
 #include <string.h>
+#include <unistd.h>
 #include "slu_zdefs.h"
 
 #define NTESTS    5      /* Number of test types */
diff --git a/TESTING/cdrive.c b/TESTING/cdrive.c
index 8bc8d10..00fe0d8 100644
--- a/TESTING/cdrive.c
+++ b/TESTING/cdrive.c
@@ -21,6 +21,7 @@ at the top-level directory.
  * Purpose:             MAIN test program
  */
 #include <string.h>
+#include <unistd.h>
 #include "slu_cdefs.h"
 
 #define NTESTS    5      /* Number of test types */
diff --git a/TESTING/sdrive.c b/TESTING/sdrive.c
index 5b98038..cba0c83 100644
--- a/TESTING/sdrive.c
+++ b/TESTING/sdrive.c
@@ -21,6 +21,7 @@ at the top-level directory.
  * Purpose:             MAIN test program
  */
 #include <string.h>
+#include <unistd.h>
 #include "slu_sdefs.h"
 
 #define NTESTS    5      /* Number of test types */
diff --git a/TESTING/ddrive.c b/TESTING/ddrive.c
index 2c3f6fe..35685c5 100644
--- a/TESTING/ddrive.c
+++ b/TESTING/ddrive.c
@@ -21,6 +21,7 @@ at the top-level directory.
  * Purpose:             MAIN test program
  */
 #include <string.h>
+#include <unistd.h>
 #include "slu_ddefs.h"
 
 #define NTESTS    5      /* Number of test types */