paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-18 04:49:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

* merged fixes

Browse Source
This commit is contained in:
peter 2000-07-30 17:09:55 +00:00
parent 5e9284972c
commit 1b04862b8c
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/go32v2/dos.pp
View File

@ -221,7 +221,6 @@ begin
dosregs.dl:=day; dosregs.dl:=day;
dosregs.ah:=$2b; dosregs.ah:=$2b;
msdos(dosregs); msdos(dosregs);
DosError:=0;
end; end;
@ -233,7 +232,6 @@ begin
minute:=dosregs.cl; minute:=dosregs.cl;
second:=dosregs.dh; second:=dosregs.dh;
sec100:=dosregs.dl; sec100:=dosregs.dl;
DosError:=0;
end; end;
@ -245,7 +243,6 @@ begin
dosregs.dl:=sec100; dosregs.dl:=sec100;
dosregs.ah:=$2d; dosregs.ah:=$2d;
msdos(dosregs); msdos(dosregs);
DosError:=0;
end; end;
@ -1143,7 +1140,10 @@ End;
end. end.
{ {
$Log$ $Log$
Revision 1.4 2000-07-22 12:24:55 jonas Revision 1.5 2000-07-30 17:09:55 peter
* merged fixes
Revision 1.4 2000/07/22 12:24:55 jonas
* merged dossearchrec2searchrec() fix from fixes branch * merged dossearchrec2searchrec() fix from fixes branch
Revision 1.3 2000/07/14 10:33:09 michael Revision 1.3 2000/07/14 10:33:09 michael
@ -1151,5 +1151,4 @@ end.
Revision 1.2 2000/07/13 11:33:39 michael Revision 1.2 2000/07/13 11:33:39 michael
+ removed logs + removed logs
} }