From: Nicholas Clark Date: Mon, 29 Oct 2001 21:52:35 +0000 (+0000) Subject: PerlIOBuf_dup X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=62d2ec24858d98c7cac34211067c703869254a17;p=p5sagit%2Fp5-mst-13.2.git PerlIOBuf_dup Message-ID: <20011029215235.K41204@plum.flirble.org> Add prototype. p4raw-id: //depot/perl@12779 --- diff --git a/perliol.h b/perliol.h index c14e823..a84d1c6 100644 --- a/perliol.h +++ b/perliol.h @@ -158,6 +158,7 @@ extern PerlIO *PerlIOBuf_open(pTHX_ PerlIO_funcs *self, const char *mode, int fd, int imode, int perm, PerlIO *old, int narg, SV **args); extern IV PerlIOBuf_pushed(PerlIO *f, const char *mode, SV *arg); +extern PerlIO *PerlIOBuf_dup(pTHX_ PerlIO *f, PerlIO *o, CLONE_PARAMS *param); extern SSize_t PerlIOBuf_read(PerlIO *f, void *vbuf, Size_t count); extern SSize_t PerlIOBuf_unread(PerlIO *f, const void *vbuf, Size_t count); extern SSize_t PerlIOBuf_write(PerlIO *f, const void *vbuf, Size_t count);