From: Steve Hay <SteveHay@planit.com>
Date: Wed, 30 Mar 2005 08:36:50 +0000 (+0000)
Subject: A couple more Win32 compilation clean-ups
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=47660177f659a8fbe5e2bac72a2bdfad9744a453;p=p5sagit%2Fp5-mst-13.2.git

A couple more Win32 compilation clean-ups

p4raw-id: //depot/perl@24099
---

diff --git a/win32/win32sck.c b/win32/win32sck.c
index 58b13e0..6b3d354 100644
--- a/win32/win32sck.c
+++ b/win32/win32sck.c
@@ -312,11 +312,11 @@ win32_select(int nfds, Perl_fd_set* rd, Perl_fd_set* wr, Perl_fd_set* ex, const
     for (i = 0; i < nfds; i++) {
 	fd = TO_SOCKET(i);
 	if (PERL_FD_ISSET(i,rd))
-	    FD_SET(fd, &nrd);
+	    FD_SET((unsigned)fd, &nrd);
 	if (PERL_FD_ISSET(i,wr))
-	    FD_SET(fd, &nwr);
+	    FD_SET((unsigned)fd, &nwr);
 	if (PERL_FD_ISSET(i,ex))
-	    FD_SET(fd, &nex);
+	    FD_SET((unsigned)fd, &nex);
     }
 
     errno = save_errno;