Преглед на файлове

* fixed #28908 (add alias for ADDRINUSE to sockets) for win,os2,unix

git-svn-id: trunk@32258 -
marco преди 10 години
родител
ревизия
a9ac2abc77
променени са 3 файла, в които са добавени 3 реда и са изтрити 1 реда
  1. 1 0
      packages/rtl-extra/src/os2commn/sockets.pp
  2. 1 1
      packages/rtl-extra/src/unix/sockets.pp
  3. 1 0
      packages/rtl-extra/src/win/sockets.pp

+ 1 - 0
packages/rtl-extra/src/os2commn/sockets.pp

@@ -108,6 +108,7 @@ const
   EsockENOTSOCK = SOCENOTSOCK;
   EsockEPROTONOSUPPORT = SOCEPROTONOSUPPORT;
   EsockEWOULDBLOCK = SOCEWOULDBLOCK;
+  EsockADDRINUSE = SOCEADDRINUSE;
 
 
 (***************************************************************************)

+ 1 - 1
packages/rtl-extra/src/unix/sockets.pp

@@ -59,7 +59,7 @@ const
 {$endif beos}
   EsockEPROTONOSUPPORT  = ESysEProtoNoSupport;
   EsockEWOULDBLOCK      = ESysEWouldBlock;
-
+  EsockADDRINUSE        = ESysEADDRINUSE;
 
 { unix socket specific functions }
 Procedure Str2UnixSockAddr(const addr:string;var t:TUnixSockAddr;var len:longint); deprecated;

+ 1 - 0
packages/rtl-extra/src/win/sockets.pp

@@ -45,6 +45,7 @@ const
   EsockENOTSOCK        = WSAENOTSOCK;
   EsockEPROTONOSUPPORT = WSAEPROTONOSUPPORT;
   EsockEWOULDBLOCK     = WSAEWOULDBLOCK;
+  EsockADDRINUSE       = WSAEADDRINUSE;
 
   SHUT_RD          = SD_RECEIVE; // aliases so we are cross-platform
   SHUT_WR          = SD_SEND;