mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-18 15:09:20 +02:00
* upper constant limits for "for" loops are now also converted to the
type of the counter var ('merged')
This commit is contained in:
parent
5422994cdb
commit
a3455b27a4
@ -537,8 +537,7 @@ implementation
|
|||||||
|
|
||||||
resulttypepass(right);
|
resulttypepass(right);
|
||||||
set_varstate(right,true);
|
set_varstate(right,true);
|
||||||
if right.nodetype<>ordconstn then
|
inserttypeconv(right,t2.resulttype);
|
||||||
inserttypeconv(right,t2.resulttype);
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
@ -1178,7 +1177,11 @@ begin
|
|||||||
end.
|
end.
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.26 2001-11-02 22:58:02 peter
|
Revision 1.27 2001-11-19 14:21:30 jonas
|
||||||
|
* upper constant limits for "for" loops are now also converted to the
|
||||||
|
type of the counter var ('merged')
|
||||||
|
|
||||||
|
Revision 1.26 2001/11/02 22:58:02 peter
|
||||||
* procsym definition rewrite
|
* procsym definition rewrite
|
||||||
|
|
||||||
Revision 1.25 2001/10/16 15:10:35 jonas
|
Revision 1.25 2001/10/16 15:10:35 jonas
|
||||||
|
Loading…
Reference in New Issue
Block a user