mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 14:29:14 +02:00
* Range check error fix
This commit is contained in:
parent
842dd17eb1
commit
8cdf9a2625
@ -271,7 +271,7 @@ end;
|
|||||||
|
|
||||||
function dosversion : word;
|
function dosversion : word;
|
||||||
begin
|
begin
|
||||||
dosversion:=GetVersion;
|
dosversion:=GetVersion and $ffff;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -1011,7 +1011,10 @@ begin
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.10 2001-11-23 00:36:26 carl
|
Revision 1.11 2001-11-23 01:35:09 carl
|
||||||
|
* Range check error fix
|
||||||
|
|
||||||
|
Revision 1.10 2001/11/23 00:36:26 carl
|
||||||
* updated behavior of some routines to conform to docs
|
* updated behavior of some routines to conform to docs
|
||||||
|
|
||||||
Revision 1.9 2001/06/13 22:21:53 hajny
|
Revision 1.9 2001/06/13 22:21:53 hajny
|
||||||
|
Loading…
Reference in New Issue
Block a user