extern void PerlIO_define_layer (pTHX_ PerlIO_funcs *tab);
extern SV * PerlIO_find_layer (pTHX_ const char *name, STRLEN len);
-extern PerlIO * PerlIO_push (pTHX_ PerlIO *f,PerlIO_funcs *tab,const char *mode,const char *arg,STRLEN len);
+extern PerlIO * PerlIO_push (pTHX_ PerlIO *f,PerlIO_funcs *tab,const char *mode,SV *arg);
extern void PerlIO_pop (pTHX_ PerlIO *f);
#endif /* PerlIO */