[svn:parrot] r37774 - trunk/src/io

[Infinoid at svn.parrot.org]

Author: Infinoid
Date: Fri Mar 27 22:07:27 2009
New Revision: 37774
URL: https://trac.parrot.org/parrot/changeset/37774

Log:
[io] Fix an error and a warning in socket_win32.c on mingw.

Modified:
   trunk/src/io/socket_win32.c

Modified: trunk/src/io/socket_win32.c
==============================================================================
--- trunk/src/io/socket_win32.c	Fri Mar 27 22:07:24 2009	(r37773)
+++ trunk/src/io/socket_win32.c	Fri Mar 27 22:07:27 2009	(r37774)
@@ -79,9 +79,9 @@
     int i = 1;
     const int sock = socket(fam, type, proto);
     if (sock >= 0) {
-        setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, &i, sizeof (i));
+        setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (const char*)&i, sizeof (i));
         Parrot_io_set_os_handle(interp, s, sock);
-        SOCKADDR_REMOTE(io)->sin_family = fam;
+        SOCKADDR_REMOTE(s)->sin_family = fam;
         return 0;
     }
     return -1;