eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Code Formatting

This commit is contained in:
mysticbbs 2012-09-23 00:59:19 -04:00
parent bca312b26a
commit 495f0a1d6b
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
mdl/m_io_sockets.pas
View File

@ -188,6 +188,7 @@ Begin
Result := fpSend(FSocketHandle, @Buf, Len, FPSENDOPT); Result := fpSend(FSocketHandle, @Buf, Len, FPSENDOPT);
While (Result = -1) and (SocketError = ESOCKEWOULDBLOCK) Do Begin While (Result = -1) and (SocketError = ESOCKEWOULDBLOCK) Do Begin
{$IFDEF SOCKETLOG} sLog('WriteBuf Blocking'); {$ENDIF} {$IFDEF SOCKETLOG} sLog('WriteBuf Blocking'); {$ENDIF}
WaitMS(10); WaitMS(10);