Explorar el Código

Merged revisions 10781 via svnmerge from
http://svn.freepascal.org/svn/fpc/trunk

........
r10781 | hajny | 2008-04-24 08:17:40 -0700 | 1 line

* fix by Giulio Bernardi for DosExitCode always 0 under Go32v2
........

git-svn-id: branches/fixes_2_2@10782 -

Tomas Hajny hace 17 años
padre
commit
5374eb5ff4
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);