Skeleton of "PerlIO_dup" coded.

Still-passes all tests non-threaded (well it would wouldn't it!)

p4raw-id: //depot/perlio@12451

1 files changed, 1 insertions, 1 deletions

diff --git a/perlio.h b/perlio.h
index 4b7ec88752..1921a52957 100644
--- a/perlio.h
+++ b/perlio.h
@@ -324,7 +324,7 @@ extern int PerlIO_getpos(PerlIO *, SV *);
 extern int PerlIO_setpos(PerlIO *, SV *);
 #endif
 #ifndef PerlIO_fdupopen
-extern PerlIO *PerlIO_fdupopen(pTHX_ PerlIO *);
+extern PerlIO *PerlIO_fdupopen(pTHX_ PerlIO *, CLONE_PARAMS *);
 #endif
 #if !defined(PerlIO_modestr) && !defined(PERLIO_IS_STDIO)
 extern char *PerlIO_modestr(PerlIO *, char *buf);