BASE only used when INCORE

diff --git a/modules/src/em_code/io.c b/modules/src/em_code/io.c
index 91b975b..ba67278 100644 (file)
--- a/modules/src/em_code/io.c
+++ b/modules/src/em_code/io.c
@@ -17,7 +17,9 @@ Part
 long
        C_current_out;
 
+#ifdef INCORE
 static char    *BASE;
+#endif
 static File    *ofp;
 
 #ifndef INCORE