perl 5.0 alpha 9perl-5a9

[editor's note: the sparc executables have not been included,
and emacs backup files have been removed]

1 files changed, 9 insertions, 0 deletions

diff --git a/lib/auto/POSIX/tcdrain.al b/lib/auto/POSIX/tcdrain.al
new file mode 100644
index 0000000000..97ea14f0ab
--- /dev/null
+++ b/lib/auto/POSIX/tcdrain.al
@@ -0,0 +1,9 @@
+# NOTE:  Derived from POSIX.pm.  Changes made here will be lost.
+package POSIX;
+
+sub tcdrain {
+    unimpl "tcdrain(xxx)", caller if @_ != 123;
+    tcdrain($_[0]);
+}
+
+1;