fix, dcd integration, possible case of "goto declaration" failure.

This commit is contained in:
Basile Burg 2016-07-15 05:14:37 +02:00
parent c054723122
commit cd3f73fdf3
1 changed files with 2 additions and 2 deletions

View File

@ -527,8 +527,8 @@ begin
fClient.Execute; fClient.Execute;
writeSourceToInput; writeSourceToInput;
// //
setlength(str, 256); setlength(str, MAX_PATH);
i := fClient.Output.Read(str[1], 256); i := fClient.Output.Read(str[1], MAX_PATH);
if i = 0 then if i = 0 then
updateServerlistening; updateServerlistening;
setLength(str, i); setLength(str, i);