Got rid of warnings on windows.

ext/f2c_libs/f2c.h

@@ -22,6 +22,7 @@ typedef __int64 ulongint;  /* HACK ALERT */
 // warning C4101:  'xxx' : unreferenced local variable
 #pragma warning(disable:4244)
 #pragma warning(disable:4101)
+#pragma warning(disable:4554)
 #endif
 
 //typedef long int integer;

ext/f2c_libs/fio.h

@@ -108,7 +108,9 @@ extern void f_init(void);
 extern int (*f__donewrec)(void), t_putc(int), x_wSL(void);
 extern void b_char(char*,char*,ftnlen), g_char(char*,ftnlen,char*);
 extern int c_sfe(cilist*), z_rnew(void);
+#ifndef WIN32
 extern int isatty(int);
+#endif
 extern int err__fl(int,int,char*);
 extern int xrd_SL(void);
 extern int f__putbuf(int);

ext/f2c_libs/getenv_.c

@@ -3,6 +3,8 @@
 #ifdef KR_headers
 extern char *F77_aloc(), *getenv();
 #else
+#undef min
+#undef max
 #include <stdlib.h>
 #include <string.h>
 #ifdef __cplusplus

ext/f2c_libs/lread.c

@@ -75,8 +75,10 @@ un_getc(int x, FILE *f__cf)
 #ifdef KR_headers
  extern int ungetc();
 #else
+#ifndef WIN32
 extern int ungetc(int, FILE*);	/* for systems with a buggy stdio.h */
 #endif
+#endif
 #endif
 
  int

ext/f2c_libs/rsne.c

@@ -66,8 +66,10 @@ un_getc(int x, FILE *f__cf)
 { return ungetc(x,f__cf); }
 #else
 #define un_getc ungetc
+#ifndef WIN32
 extern int ungetc(int, FILE*);	/* for systems with a buggy stdio.h */
 #endif
+#endif
 #endif
 
  static Vardesc *

ext/f2c_libs/s_paus.c

@@ -19,7 +19,11 @@ extern "C" {
 #ifdef __cplusplus
 extern "C" {
 #endif
-extern int getpid(void), isatty(int), pause(void);
+extern int getpid(void); 
+#ifndef WIN32
+extern int isatty(int); 
+#endif
+extern int pause(void);
 #endif
 
 extern VOID f_exit(Void);