paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 02:49:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use WINSOCK_VERSION in sockets init in windows

Browse Source 
git-svn-id: trunk@9430 -
This commit is contained in:
Almindor 2007-12-11 20:34:46 +00:00
parent 0a53dddc99
commit a6d8590dc1
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/win/sockets.pp
View File

@ -265,7 +265,7 @@ var
wsadata : twsadata; wsadata : twsadata;
initialization initialization
WSAStartUp($2,wsadata); WSAStartUp(WINSOCK_VERSION,wsadata);
finalization finalization
WSACleanUp; WSACleanUp;
end. end.

1
rtl/wince/winsock.pp
View File

@ -86,6 +86,7 @@ unit winsock;
const const
winsockdll = 'ws2.dll'; winsockdll = 'ws2.dll';
WINSOCK_VERSION = $0101; // hopefully is right for winCE too
{ {
Default maximium number of sockets. Default maximium number of sockets.