Re: useless use of void context work-around

[p5sagit/p5-mst-13.2.git] / perlio.h

diff --git a/perlio.h b/perlio.h
index 76fff38..0c6b26a 100644 (file)
--- a/perlio.h
+++ b/perlio.h
@@ -82,7 +82,7 @@ typedef PerlIOl *PerlIO;
 
 extern void    PerlIO_define_layer     (PerlIO_funcs *tab);
 extern SV *    PerlIO_find_layer       (const char *name, STRLEN len);
-extern PerlIO *        PerlIO_push             (PerlIO *f,PerlIO_funcs *tab,const char *mode);
+extern PerlIO *        PerlIO_push             (PerlIO *f,PerlIO_funcs *tab,const char *mode,const char *arg,STRLEN len);
 extern void    PerlIO_pop              (PerlIO *f);
 
 #endif /* PerlIO */
@@ -161,6 +161,8 @@ extern void PerlIO_pop              (PerlIO *f);
 
 /* --------------------- Now prototypes for functions --------------- */
 
+START_EXTERN_C
+
 #ifndef NEXT30_NO_ATTRIBUTE
 #ifndef HASATTRIBUTE       /* disable GNU-cc attribute checking? */
 #ifdef  __attribute__      /* Avoid possible redefinition errors */
@@ -297,21 +299,35 @@ extern PerlIO *   PerlIO_stdout           (void);
 extern PerlIO *        PerlIO_stderr           (void);
 #endif
 #ifndef PerlIO_getpos
-extern int     PerlIO_getpos           (PerlIO *,Fpos_t *);
+extern int     PerlIO_getpos           (PerlIO *,SV *);
 #endif
 #ifndef PerlIO_setpos
-extern int     PerlIO_setpos           (PerlIO *,const Fpos_t *);
+extern int     PerlIO_setpos           (PerlIO *,SV *);
 #endif
 #ifndef PerlIO_fdupopen
-extern PerlIO *        PerlIO_fdupopen         (PerlIO *);
+extern PerlIO *        PerlIO_fdupopen         (pTHX_ PerlIO *);
+#endif
+#if !defined(PerlIO_modestr) && !defined(PERLIO_IS_STDIO)
+extern char *PerlIO_modestr            (PerlIO *,char *buf);
 #endif
 #ifndef PerlIO_isutf8
 extern int     PerlIO_isutf8           (PerlIO *);
 #endif
-#ifndef PerlIO_isutf8
-extern int     PerlIO_apply_layers     (pTHX_ PerlIO *f,const char *mode, const char *names);
+#ifndef PerlIO_apply_layers
+extern int     PerlIO_apply_layers     (pTHX_ PerlIO *f, const char *mode, const char *names);
 #endif
+#ifndef PerlIO_binmode
+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 */