paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-24 09:21:38 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed range error

Browse Source
This commit is contained in:
Jonas Maebe 2003-11-22 00:31:52 +00:00
parent b3086d3122
commit 3c33590a80
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/ncnv.pas
View File

@ -275,7 +275,7 @@ implementation
htype : ttype; htype : ttype;
constset : Pconstset; constset : Pconstset;
constsetlo, constsetlo,
constsethi : longint; constsethi : TConstExprInt;
procedure update_constsethi(t:ttype); procedure update_constsethi(t:ttype);
begin begin
@ -2388,7 +2388,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.130 2003-11-04 22:30:15 florian Revision 1.131 2003-11-22 00:31:52 jonas
* fixed range error
Revision 1.130 2003/11/04 22:30:15 florian
+ type cast variant<->enum + type cast variant<->enum
* cnv. node second pass uses now as well helper wrappers * cnv. node second pass uses now as well helper wrappers