diff options
| author | Steve Hay <SteveHay@planit.com> | 2009-05-08 11:08:02 +0100 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2009-05-08 12:16:41 +0100 |
| commit | 5f1c7092739bf7bb81e301f20fd4c428602d6f9b (patch) | |
| tree | 013d5b9cccfaa75e8c198a0adcf661db40a394cd /ext | |
| parent | 52f75a8770b4af0ffa1a094cc15d77f1ede582df (diff) | |
| download | perl-5f1c7092739bf7bb81e301f20fd4c428602d6f9b.tar.gz | |
Silence Win32 compiler warning in IO.xs
The ioctl() function on Win32 is really win32_ioctl(), the third argument
of which is a char*.
Diffstat (limited to 'ext')
| -rw-r--r-- | ext/IO/IO.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/IO/IO.xs b/ext/IO/IO.xs index 7d0d4db7c9..d3dff557a2 100644 --- a/ext/IO/IO.xs +++ b/ext/IO/IO.xs @@ -122,7 +122,7 @@ io_blocking(pTHX_ InputStream f, int block) return RETVAL; #else # ifdef WIN32 - unsigned long flags = block; + char flags = (char)block; return ioctl(PerlIO_fileno(f), FIONBIO, &flags); # else return -1; |