summaryrefslogtreecommitdiff
path: root/perlio.h
diff options
context:
space:
mode:
authorCraig A. Berry <craigberry@mac.com>2000-12-16 18:18:35 -0600
committerJarkko Hietaniemi <jhi@iki.fi>2000-12-19 17:03:08 +0000
commit11ae941d53150932debe70c539ca1248bb0869c2 (patch)
tree7d17d5ffff8d5b4b0baafd78b95b4b47babd750b /perlio.h
parent733271b51cb808b667b461e771c0df10f59dfaba (diff)
downloadperl-11ae941d53150932debe70c539ca1248bb0869c2.tar.gz
finding PerlIO symbols for VMS
Message-Id: <p04330102b661bc01daba@[172.16.52.1]> p4raw-id: //depot/perl@8190
Diffstat (limited to 'perlio.h')
-rw-r--r--perlio.h6
1 files changed, 5 insertions, 1 deletions
diff --git a/perlio.h b/perlio.h
index b2e5179470..0c6b26ab1d 100644
--- a/perlio.h
+++ b/perlio.h
@@ -307,7 +307,7 @@ extern int PerlIO_setpos (PerlIO *,SV *);
#ifndef PerlIO_fdupopen
extern PerlIO * PerlIO_fdupopen (pTHX_ PerlIO *);
#endif
-#ifndef PerlIO_modestr
+#if !defined(PerlIO_modestr) && !defined(PERLIO_IS_STDIO)
extern char *PerlIO_modestr (PerlIO *,char *buf);
#endif
#ifndef PerlIO_isutf8
@@ -320,10 +320,14 @@ 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
+#ifndef PERLIO_IS_STDIO
+
extern void PerlIO_cleanup();
extern void PerlIO_debug(const char *fmt,...);
+#endif
+
END_EXTERN_C
#endif /* _PERLIO_H */