pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

debugging big!!!

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@512 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
inoussa
2008-07-28 17:43:01 +00:00
parent 056046f530
commit 50977a8f9f
1 changed files with 1 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
wst/trunk/library_protocol.pas
View File

@ -147,6 +147,7 @@ begin
i := AResponse.Position; i := AResponse.Position;
SetLength(s,AResponse.Size); SetLength(s,AResponse.Size);
AResponse.Read(s[1],AResponse.Size); AResponse.Read(s[1],AResponse.Size);
AResponse.Position := i;
if IsConsole then if IsConsole then
WriteLn(s); WriteLn(s);
{$ENDIF WST_DBG} {$ENDIF WST_DBG}