Ver Fonte

Fix ExitCode readout if temp directory is used by postponing temp directory cleanup

git-svn-id: trunk@36313 -
pierre há 8 anos atrás
pai
commit
87bb473780
1 ficheiros alterados com 2 adições e 2 exclusões
  1. 2 2
      tests/utils/dosbox/dosbox_wrapper.pas

+ 2 - 2
tests/utils/dosbox/dosbox_wrapper.pas

@@ -347,8 +347,6 @@ begin
     ExecuteDosBox(DosBoxBinaryPath, DosBoxDir);
   finally
     ExitProc;
-    if use_temp_dir then
-      Cleanup(DosBoxDir);
   end;
 {$ifdef UseSignals}
   if SignalCalled then
@@ -358,5 +356,7 @@ begin
 {$endif def UseSignals}
   ExitProc;
   ExitCode:=ReadExitCode(DosBoxDir);
+  if use_temp_dir then
+    Cleanup(DosBoxDir);
   halt(ExitCode);
 end.