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

* fixed to my previous patch: the hightree must always be converted to a

Browse Source 
longint
This commit is contained in:
Jonas Maebe 2001-12-11 13:21:36 +00:00
parent 1d0f4deffe
commit 479f1a5ce9
1 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
compiler/ncal.pas
View File

@ -585,11 +585,6 @@ implementation
begin
hightree:=caddnode.create(subn,geninlinenode(in_length_x,false,left.getcopy),
cordconstnode.create(1,s32bittype));
{
not necessary (JM)
firstpass(hightree);
}
hightree:=ctypeconvnode.create(hightree,s32bittype);
loadconst:=false;
end;
end;
@ -598,7 +593,9 @@ implementation
len:=0;
end;
if loadconst then
hightree:=cordconstnode.create(len,s32bittype);
hightree:=cordconstnode.create(len,s32bittype)
else
hightree:=ctypeconvnode.create(hightree,s32bittype);
firstpass(hightree);
end;
@ -1758,7 +1755,11 @@ begin
end.
{
$Log$
Revision 1.59 2001-12-10 14:28:47 jonas
Revision 1.60 2001-12-11 13:21:36 jonas
* fixed to my previous patch: the hightree must always be converted to a
longint
Revision 1.59 2001/12/10 14:28:47 jonas
* gen_high_tree now uses an inline node of type in_high_x in most cases
so that it doesn't duplicate any code anymore from ninl.pas (and
dynamic array support was still missing)