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

* add common socket error constants to all platforms/socket.pp

Browse Source 
git-svn-id: trunk@7022 -
This commit is contained in:
Almindor 2007-03-29 19:29:04 +00:00
parent 7e71a8224e
commit ed8e6b71e3
4 changed files with 53 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
rtl/netware/sockets.pp
View File

@ -36,10 +36,19 @@ Type
tsocklen=cint;
psocklen=^tsocklen;
const EsockEINTR = WSAEINTR;
EsockEBADF = WSAEBADF;
EsockEFAULT = WSAEFAULT;
EsockEINVAL = WSAEINVAL;
const
EsockEINTR = WSAEINTR;
EsockEBADF = WSAEBADF;
EsockEFAULT = WSAEFAULT;
EsockEINVAL = WSAEINVAL;
EsocksEACCESS = WSAEACCES;
EsocksEMFILE = WSAEMFILE;
EsocksEMSGSIZE = WSAEMSGSIZE;
EsocksENOBUFS = WSAENOBUFS;
EsocksENOTCONN = WSAENOTCONN;
EsocksENOTSOCK = WSAENOTSOCK;
EsocksEPROTONOSUPPORT = WSAEPROTONOSUPPORT;
EsocksEWOULDBLOCK = WSAEWOULDBLOCK;
{$i netwsockh.inc}
{$i socketsh.inc}

17
rtl/netwlibc/sockets.pp
View File

@ -35,10 +35,19 @@ Type
tsocklen=cint;
psocklen=^tsocklen;
const EsockEINTR = WSAEINTR;
EsockEBADF = WSAEBADF;
EsockEFAULT = WSAEFAULT;
EsockEINVAL = WSAEINVAL;
const
EsockEINTR = WSAEINTR;
EsockEBADF = WSAEBADF;
EsockEFAULT = WSAEFAULT;
EsockEINVAL = WSAEINVAL;
EsocksEACCESS = WSAEACCES;
EsocksEMFILE = WSAEMFILE;
EsocksEMSGSIZE = WSAEMSGSIZE;
EsocksENOBUFS = WSAENOBUFS;
EsocksENOTCONN = WSAENOTCONN;
EsocksENOTSOCK = WSAENOTSOCK;
EsocksEPROTONOSUPPORT = WSAEPROTONOSUPPORT;
EsocksEWOULDBLOCK = WSAEWOULDBLOCK;
{$i netwsockh.inc}
{$i socketsh.inc}

18
rtl/unix/sockets.pp
View File

@ -37,10 +37,20 @@ type
path:array[0..107] of char; //104 total for freebsd.
end;
const EsockEINTR = EsysEINTR;
EsockEBADF = EsysEBADF;
EsockEFAULT = EsysEFAULT;
EsockEINVAL = EsysEINVAL;
const
EsockEINTR = EsysEINTR;
EsockEBADF = EsysEBADF;
EsockEFAULT = EsysEFAULT;
EsockEINVAL = EsysEINVAL;
EsocksEACCESS = ESysEAcces;
EsocksEMFILE = ESysEmfile;
EsocksEMSGSIZE = ESysEMsgSize;
EsocksENOBUFS = ESysENoBufs;
EsocksENOTCONN = ESysENotConn;
EsocksENOTSOCK = ESysENotSock;
EsocksEPROTONOSUPPORT = ESysEProtoNoSupport;
EsocksEWOULDBLOCK = ESysEWouldBlock;
{ unix socket specific functions }
Procedure Str2UnixSockAddr(const addr:string;var t:TUnixSockAddr;var len:longint);

17
rtl/win/sockets.pp
View File

@ -27,10 +27,19 @@ Type
tsocklen= cint;
psocklen= ^tsocklen;
const EsockEINTR = WSAEINTR;
EsockEBADF = WSAEBADF;
EsockEFAULT = WSAEFAULT;
EsockEINVAL = WSAEINVAL;
const
EsockEINTR = WSAEINTR;
EsockEBADF = WSAEBADF;
EsockEFAULT = WSAEFAULT;
EsockEINVAL = WSAEINVAL;
EsocksEACCESS = WSAEACCES;
EsocksEMFILE = WSAEMFILE;
EsocksEMSGSIZE = WSAEMSGSIZE;
EsocksENOBUFS = WSAENOBUFS;
EsocksENOTCONN = WSAENOTCONN;
EsocksENOTSOCK = WSAENOTSOCK;
EsocksEPROTONOSUPPORT = WSAEPROTONOSUPPORT;
EsocksEWOULDBLOCK = WSAEWOULDBLOCK;
{$i socketsh.inc}
{$i fpwinsockh.inc}