Explorar el Código

* fix by Guilio Bernardi for DosExitCode always 0 under Go32v2

git-svn-id: trunk@10781 -
Tomas Hajny hace 17 años
padre
commit
17f3d9fcf7
Se han modificado 1 ficheros con 1 adiciones y 1 borrados
  1. 1 1
      rtl/go32v2/dos.pp

+ 1 - 1
rtl/go32v2/dos.pp

@@ -275,7 +275,7 @@ begin
   dosregs.ax:=$4b00;
   msdos(dosregs);
   LoadDosError;
-  if DosError<>0 then
+  if DosError=0 then
    begin
      dosregs.ax:=$4d00;
      msdos(dosregs);