X-Git-Url: http://www.lcore.org/git/lcore.git/blobdiff_plain/e6290c8bee34fc9a6fdbce30a9dd85faffeaac5a..1a863b8d4ef10ffb7424401ef65a39e3090f41a9:/lsocket.pas diff --git a/lsocket.pas b/lsocket.pas index 72ef891..6a1ce0b 100755 --- a/lsocket.pas +++ b/lsocket.pas @@ -449,6 +449,9 @@ begin end; end; + {$else} + SetSockOpt(fdhandlein, SOL_SOCKET, SO_REUSEADDR, 'TRUE', Length('TRUE')); + {$endif} localaddr := addr; localport := port; @@ -587,7 +590,7 @@ begin destx := {$ifdef win32}winsock.pSockAddr{$else}pInetSockAddrV{$endif}(@dest) end; {$else} - destx := {$ifdef win32}winsock.pSockAddr{$else}pInetSockAddrV{$endif}(@dest) + destx := {$ifdef win32}winsock.pSockAddr{$else}pInetSockAddrV{$endif}(@dest); {$endif} result := {$ifdef win32}winsock.sendto{$else}system_sendto{$endif}(self.fdhandleout,data^,len,0,destx^,destlen);