diff options
| author | Daniel Dragan <bulk88@hotmail.com> | 2013-11-18 23:26:05 -0500 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2013-11-20 11:21:54 +1100 |
| commit | 2c2a0333a3ed741936061d62c34841ac818962dc (patch) | |
| tree | 88197b10aedbc1c8244f1c729c2e4f4c02d90d45 | |
| parent | f02f05df122ba1cf155b1bfda0f1ef96615f2278 (diff) | |
| download | perl-2c2a0333a3ed741936061d62c34841ac818962dc.tar.gz | |
ioctl on perlhost platforms take a char*, not void*
As of commit 0cb9638729 IOCtl from perlhost is prototyped to take a char *.
In the later commit 2986a63f7e5 the netware commit is introduced that adds
a void* cast without explination, but today PerlLIOIOCtl is prototyped as
char* in nwperlhost.h (nwperlhost.h didnt exist at 2986a63f7e5 ). In
commit 6e22d04617 Win32 starts to use the void * cast from netware.
Using a void * cast breaks a VC 2003 C++ mode build of IO.xs because of
different types. Switch to a char * cast that matches the vtable prototype.
| -rw-r--r-- | dist/IO/IO.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dist/IO/IO.xs b/dist/IO/IO.xs index efb0ed6695..360b067af2 100644 --- a/dist/IO/IO.xs +++ b/dist/IO/IO.xs @@ -540,7 +540,7 @@ sockatmark (sock) int flag = 0; # ifdef SIOCATMARK # if defined(NETWARE) || defined(WIN32) - if (ioctl(fd, SIOCATMARK, (void*)&flag) != 0) + if (ioctl(fd, SIOCATMARK, (char*)&flag) != 0) # else if (ioctl(fd, SIOCATMARK, &flag) != 0) # endif |