1 files changed, 6 insertions, 11 deletions
diff --git a/contrib/libf2c/libU77/gerror_.c b/contrib/libf2c/libU77/gerror_.c
index 6f5943c..252440d 100644
--- a/contrib/libf2c/libU77/gerror_.c
+++ b/contrib/libf2c/libU77/gerror_.c
@@ -29,21 +29,16 @@ Boston, MA 02111-1307, USA.  */
 #include "f2c.h"
 
 #ifndef HAVE_STRERROR
-     extern char *sys_errlist [];
+extern char *sys_errlist[];
 #    define strerror(i) (sys_errlist[i])
 #endif
-#ifdef KR_headers
-extern void s_copy ();
-/* Subroutine */ int G77_gerror_0 (str, Lstr)
-     char *str; ftnlen Lstr;
-#else
-extern void s_copy(register char *a, register char *b, ftnlen la, ftnlen lb);
-/* Subroutine */ int G77_gerror_0 (char *str, ftnlen Lstr)
-#endif
+extern void s_copy (register char *a, register char *b, ftnlen la, ftnlen lb);
+/* Subroutine */ int
+G77_gerror_0 (char *str, ftnlen Lstr)
 {
-  char * s;
+  char *s;
 
-  s = strerror(errno);
+  s = strerror (errno);
   s_copy (str, s, Lstr, strlen (s));
   return 0;
 }