mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 12:29:25 +02:00
* fixed dos.getftime returning a wrong value for 'time' on i8086-msdos
git-svn-id: trunk@27159 -
This commit is contained in:
parent
ee34761646
commit
238c4f91d8
@ -874,7 +874,7 @@ begin
|
||||
dosregs.ax:=$5700;
|
||||
msdos(dosregs);
|
||||
loaddoserror;
|
||||
time:=(dosregs.dx shl 16)+dosregs.cx;
|
||||
time:=(longint(dosregs.dx) shl 16)+dosregs.cx;
|
||||
end;
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user