Преглед изворни кода

* fixed dos.getftime returning a wrong value for 'time' on i8086-msdos

git-svn-id: trunk@27159 -
nickysn пре 11 година
родитељ
комит
238c4f91d8
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      rtl/msdos/dos.pp

+ 1 - 1
rtl/msdos/dos.pp

@@ -874,7 +874,7 @@ begin
   dosregs.ax:=$5700;
   dosregs.ax:=$5700;
   msdos(dosregs);
   msdos(dosregs);
   loaddoserror;
   loaddoserror;
-  time:=(dosregs.dx shl 16)+dosregs.cx;
+  time:=(longint(dosregs.dx) shl 16)+dosregs.cx;
 end;
 end;