diff options
author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-07-27 01:16:53 +0000 |
---|---|---|
committer | Charles Bailey <bailey@genetics.upenn.edu> | 1996-07-27 01:16:53 +0000 |
commit | d825a42e0a67d546192c470c4cca7da269ab90b1 (patch) | |
tree | e072e0570d2fd7148df5d8646b4166155b418121 /ext | |
parent | f75e77c7ab132742fcbf797d7186eb143939446e (diff) | |
download | perl-d825a42e0a67d546192c470c4cca7da269ab90b1.tar.gz |
perl 5.003_01: ext/FileHandle/FileHandle.xs
Don't repeat inclusion of stdio.h
Use Fflush() macro to allow for OS-specific overrides
Diffstat (limited to 'ext')
-rw-r--r-- | ext/FileHandle/FileHandle.xs | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/ext/FileHandle/FileHandle.xs b/ext/FileHandle/FileHandle.xs index 3a99cf1dc8..8b1c60eb25 100644 --- a/ext/FileHandle/FileHandle.xs +++ b/ext/FileHandle/FileHandle.xs @@ -1,7 +1,6 @@ #include "EXTERN.h" #include "perl.h" #include "XSUB.h" -#include <stdio.h> typedef int SysRet; typedef FILE * InputStream; @@ -137,7 +136,7 @@ fflush(handle) OutputStream handle CODE: if (handle) - RETVAL = fflush(handle); + RETVAL = Fflush(handle); else { RETVAL = -1; errno = EINVAL; |