This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl 5.0 alpha 9
[perl5.git] / lib / auto / POSIX / fflush.al
1 # NOTE:  Derived from POSIX.pm.  Changes made here will be lost.
2 package POSIX;
3
4 sub fflush {
5     unimpl "fflush(xxx)", caller if @_ != 123;
6     fflush($_[0]);
7 }
8
9 1;