Explorar o código

* pas2jni: Fixed reading of the ppudump's output in some cases.

git-svn-id: trunk@32083 -
yury %!s(int64=9) %!d(string=hai) anos
pai
achega
ab4c8623ec
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      utils/pas2jni/ppuparser.pas

+ 1 - 1
utils/pas2jni/ppuparser.pas

@@ -219,7 +219,7 @@ begin
     repeat
     repeat
       _ReadOutput(p.Output, s);
       _ReadOutput(p.Output, s);
       _ReadOutput(p.Stderr, err);
       _ReadOutput(p.Stderr, err);
-    until not p.Running;
+    until not p.Running and (p.Output.NumBytesAvailable = 0) and (p.Stderr.NumBytesAvailable = 0);
     ec:=p.ExitStatus;
     ec:=p.ExitStatus;
     if Copy(s, 1, 1) <> '[' then begin
     if Copy(s, 1, 1) <> '[' then begin
       ec:=-1;
       ec:=-1;