paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-31 07:31:49 +01:00
Code Issues Packages Projects Releases Wiki Activity

* use explicit typecast when generating the high value

Browse Source
This commit is contained in:
peter 2003-11-01 16:17:48 +00:00
parent 39a6c7db45
commit 9168d87b35
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/ncal.pas
View File

@ -279,7 +279,8 @@ type
begin
if not assigned(hightree) then
internalerror(200304071);
hightree:=ctypeconvnode.create(hightree,s32bittype);
{ Need to use explicit, because it can also be a enum }
hightree:=ctypeconvnode.create_explicit(hightree,s32bittype);
end;
result:=hightree;
end;
@ -2595,7 +2596,10 @@ begin
end.
{
$Log$
Revision 1.203 2003-10-31 15:52:58 peter
Revision 1.204 2003-11-01 16:17:48 peter
* use explicit typecast when generating the high value
Revision 1.203 2003/10/31 15:52:58 peter
* support creating classes using <class of tobject>.create
Revision 1.202 2003/10/30 16:23:13 peter