paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-14 09:19:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ add missing SHUT_* constants for fpshutdown() (aliases from winsock2)

Browse Source 
git-svn-id: trunk@11939 -
This commit is contained in:
Almindor 2008-10-20 16:57:32 +00:00
parent 19f8aede99
commit 4972ec0ae5
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/win/sockets.pp
View File

@ -41,6 +41,10 @@ const
EsockEPROTONOSUPPORT = WSAEPROTONOSUPPORT;
EsockEWOULDBLOCK = WSAEWOULDBLOCK;
SHUT_RD = SD_RECEIVE; // aliases so we are cross-platform
SHUT_WR = SD_SEND;
SHUT_RDWR = SD_BOTH;
{$i socketsh.inc}
{$i fpwinsockh.inc}