[no reason given] is not good.

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

diff --git a/perlio.c b/perlio.c
index 4d05303..2c9e7a8 100644 (file)
--- a/perlio.c
+++ b/perlio.c
@@ -251,7 +251,7 @@ Perl_boot_core_PerlIO(pTHX)
 #ifdef PERLIO_IS_STDIO
 
 void
-PerlIO_init(void)
+PerlIO_init(pTHX)
 {
     /*
      * Does nothing (yet) except force this file to be included in perl
@@ -288,7 +288,7 @@ PerlIO_tmpfile(void)
 }
 
 void
-PerlIO_init(void)
+PerlIO_init(pTHX)
 {
     /*
      * Force this file to be included in perl binary. Which allows this