diff options
Diffstat (limited to 'contrib/libf2c/libI77/sfe.c')
| -rw-r--r-- | contrib/libf2c/libI77/sfe.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/contrib/libf2c/libI77/sfe.c b/contrib/libf2c/libI77/sfe.c index f7c3b83b734f..77ade5b5a7f5 100644 --- a/contrib/libf2c/libI77/sfe.c +++ b/contrib/libf2c/libI77/sfe.c @@ -30,5 +30,9 @@ integer e_wsfe(Void) f__init = 1; n = en_fio(); f__fmtbuf=NULL; +#ifdef ALWAYS_FLUSH + if (!n && fflush(f__cf)) + err(f__elist->cierr, errno, "write end"); +#endif return n; } |