diff options
author | Andy Dougherty <doughera@lafayette.edu> | 1999-05-26 10:49:52 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-05-26 19:55:52 +0000 |
commit | ce72088916dcda8278192dacefb0dcaf01be131c (patch) | |
tree | f562d75500e68b22301e451ecfa6cfb59f982958 /util.c | |
parent | c347f2776c91e4d555d0016f00573135979547eb (diff) | |
download | perl-ce72088916dcda8278192dacefb0dcaf01be131c.tar.gz |
Re: BUG -> [19990526.004] perl5.005_57 error in util.c on sun4-solaris2.6
To: perl5-porters@perl.org
Message-Id: <Pine.GSU.4.05.9905261448310.19172-100000@newton.phys>
p4raw-id: //depot/cfgperl@3486
Diffstat (limited to 'util.c')
-rw-r--r-- | util.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3329,7 +3329,7 @@ I32 my_fflush_all(void) { #ifdef FFLUSH_NULL - return fflush(NULL); + return PerlIO_flush(NULL); #else long open_max = -1; # if defined(FFLUSH_ALL) && defined(HAS_STDIO_STREAM_ARRAY) @@ -3351,7 +3351,7 @@ my_fflush_all(void) if (open_max > 0) { long i; for (i = 0; i < open_max; i++) - fflush(&STDIO_STREAM_ARRAY[i]); + PerlIO_flush(&STDIO_STREAM_ARRAY[i]); return 0; } # endif |