diff options
Diffstat (limited to 'ext/IO')
| -rw-r--r-- | ext/IO/IO.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ext/IO/IO.xs b/ext/IO/IO.xs index a798813f14..9cefe08be5 100644 --- a/ext/IO/IO.xs +++ b/ext/IO/IO.xs @@ -55,7 +55,7 @@ not_here(char *s) #endif static int -io_blocking(InputStream f, int block) +io_blocking(pTHX_ InputStream f, int block) { int RETVAL; if(!f) { @@ -261,7 +261,7 @@ io_blocking(handle,blk=-1) PROTOTYPE: $;$ CODE: { - int ret = io_blocking(handle, items == 1 ? -1 : blk ? 1 : 0); + int ret = io_blocking(aTHX_ handle, items == 1 ? -1 : blk ? 1 : 0); if(ret >= 0) XSRETURN_IV(ret); else |