1 files changed, 31 insertions, 26 deletions

diff --git a/contrib/libf2c/libI77/sfe.c b/contrib/libf2c/libI77/sfe.c
index b67d823..8f05e48 100644
--- a/contrib/libf2c/libI77/sfe.c
+++ b/contrib/libf2c/libI77/sfe.c
@@ -5,35 +5,40 @@
 
 extern char *f__fmtbuf;
 
-integer e_rsfe(Void)
-{	int n;
-	f__init = 1;
-	n=en_fio();
-	f__fmtbuf=NULL;
-	return(n);
+integer
+e_rsfe (void)
+{
+  int n;
+  f__init = 1;
+  n = en_fio ();
+  f__fmtbuf = NULL;
+  return (n);
 }
-#ifdef KR_headers
-c_sfe(a) cilist *a; /* check */
-#else
-c_sfe(cilist *a) /* check */
-#endif
-{	unit *p;
-	if(a->ciunit >= MXUNIT || a->ciunit<0)
-		err(a->cierr,101,"startio");
-	p = &f__units[a->ciunit];
-	if(p->ufd==NULL && fk_open(SEQ,FMT,a->ciunit)) err(a->cierr,114,"sfe");
-	if(!p->ufmt) err(a->cierr,102,"sfe");
-	return(0);
+
+int
+c_sfe (cilist * a)		/* check */
+{
+  unit *p;
+  if (a->ciunit >= MXUNIT || a->ciunit < 0)
+    err (a->cierr, 101, "startio");
+  p = &f__units[a->ciunit];
+  if (p->ufd == NULL && fk_open (SEQ, FMT, a->ciunit))
+    err (a->cierr, 114, "sfe");
+  if (!p->ufmt)
+    err (a->cierr, 102, "sfe");
+  return (0);
 }
-integer e_wsfe(Void)
+
+integer
+e_wsfe (void)
 {
-	int n;
-	f__init = 1;
-	n = en_fio();
-	f__fmtbuf=NULL;
+  int n;
+  f__init = 1;
+  n = en_fio ();
+  f__fmtbuf = NULL;
 #ifdef ALWAYS_FLUSH
-	if (!n && fflush(f__cf))
-		err(f__elist->cierr, errno, "write end");
+  if (!n && fflush (f__cf))
+    err (f__elist->cierr, errno, "write end");
 #endif
-	return n;
+  return n;
 }