|
@@ -243,7 +243,7 @@ implementation
|
|
|
{ Additionally, do the same for cardinal/qwords and other positive types, but }
|
|
|
{ always in a way that a smaller type is converted to a bigger type }
|
|
|
{ (webtbs/tw8870) }
|
|
|
- if (rd.ordtype in [u16bit,u32bit,u64bit]) and
|
|
|
+ if (rd.ordtype in [u8bit,u16bit,u32bit,u64bit]) and
|
|
|
((is_constintnode(left) and
|
|
|
(tordconstnode(left).value >= 0)) or
|
|
|
(not is_signed(ld) and
|
|
@@ -252,7 +252,7 @@ implementation
|
|
|
inserttypeconv(left,right.resultdef);
|
|
|
ld:=torddef(left.resultdef);
|
|
|
end;
|
|
|
- if (ld.ordtype in [u16bit,u32bit,u64bit]) and
|
|
|
+ if (ld.ordtype in [u8bit,u16bit,u32bit,u64bit]) and
|
|
|
((is_constintnode(right) and
|
|
|
(tordconstnode(right).value >= 0)) or
|
|
|
(not is_signed(rd) and
|