2
0
Эх сурвалжийг харах

Merged revisions 11939-11940 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

........
r11939 | Almindor | 2008-10-20 18:57:32 +0200 (Po, 20 okt 2008) | 2 lines

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

........
r11940 | Almindor | 2008-10-20 18:59:58 +0200 (Po, 20 okt 2008) | 2 lines

+ add missing SHUT_* constants to openbsd

........

git-svn-id: branches/fixes_2_2@11941 -

Almindor 17 жил өмнө
parent
commit
42b3141e1a

+ 5 - 0
rtl/openbsd/unxsockh.inc

@@ -119,3 +119,8 @@ const
      PF_BLUETOOTH = AF_BLUETOOTH;
      PF_MAX = AF_MAX;
 
+        SHUT_RD         =0;             { shut down the reading side }
+        SHUT_WR         =1;             { shut down the writing side }
+        SHUT_RDWR       =2;             { shut down both sides }
+
+

+ 4 - 0
rtl/win/sockets.pp

@@ -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}