summaryrefslogtreecommitdiffstats
path: root/lib/libI77/sfe.c
diff options
context:
space:
mode:
Diffstat (limited to 'lib/libI77/sfe.c')
-rw-r--r--lib/libI77/sfe.c17
1 files changed, 3 insertions, 14 deletions
diff --git a/lib/libI77/sfe.c b/lib/libI77/sfe.c
index eea9078..cade56a 100644
--- a/lib/libI77/sfe.c
+++ b/lib/libI77/sfe.c
@@ -7,10 +7,6 @@ extern char *f__fmtbuf;
integer e_rsfe(Void)
{ int n;
n=en_fio();
- if (f__cf == stdout)
- fflush(stdout);
- else if (f__cf == stderr)
- fflush(stderr);
f__fmtbuf=NULL;
return(n);
}
@@ -20,23 +16,16 @@ c_sfe(a) cilist *a; /* check */
c_sfe(cilist *a) /* check */
#endif
{ unit *p;
+ f__curunit = p = &f__units[a->ciunit];
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)
{
-#ifdef ALWAYS_FLUSH
- int n;
- n = en_fio();
- f__fmtbuf=NULL;
- if (!n && fflush(f__cf))
- err(f__elist->cierr, errno, "write end");
+ int n = en_fio();
+ f__fmtbuf = NULL;
return n;
-#else
- return(e_rsfe());
-#endif
}
OpenPOWER on IntegriCloud