summaryrefslogtreecommitdiff
path: root/perlio.h
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>2000-12-04 23:27:43 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>2000-12-04 23:27:43 +0000
commit5f1a76d08cedee4f2888d077fe9593b03dd9bd13 (patch)
treef44d84684c3c4358e30a11cb705f8151996e3b54 /perlio.h
parentb4748376b6239962bd75b743e5a7b14788a2970c (diff)
downloadperl-5f1a76d08cedee4f2888d077fe9593b03dd9bd13.tar.gz
PERL_IMPLICIT_SYS (almost) works - something odd with "signal"
p4raw-id: //depot/perlio@7983
Diffstat (limited to 'perlio.h')
-rw-r--r--perlio.h8
1 files changed, 5 insertions, 3 deletions
diff --git a/perlio.h b/perlio.h
index b2aa0aad97..574b741c79 100644
--- a/perlio.h
+++ b/perlio.h
@@ -305,8 +305,10 @@ extern int PerlIO_getpos (PerlIO *,Fpos_t *);
extern int PerlIO_setpos (PerlIO *,const Fpos_t *);
#endif
#ifndef PerlIO_fdupopen
-#define PerlIO_fdupopen(f) (f)
-/* extern PerlIO * PerlIO_fdupopen (PerlIO *); */
+extern PerlIO * PerlIO_fdupopen (pTHX_ PerlIO *);
+#endif
+#ifndef PerlIO_modestr
+extern char *PerlIO_modestr (PerlIO *,char *buf);
#endif
#ifndef PerlIO_isutf8
extern int PerlIO_isutf8 (PerlIO *);
@@ -318,7 +320,7 @@ extern int PerlIO_apply_layers (pTHX_ PerlIO *f, const char *mode, const char *n
extern int PerlIO_binmode (pTHX_ PerlIO *f, int iotype, int omode, const char *names);
#endif
-extern void PerlIO_cleanup(void);
+extern void PerlIO_cleanup();
extern void PerlIO_debug(const char *fmt,...);