Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Index: compiler/nmat.pas
- ===================================================================
- --- compiler/nmat.pas (revision 35669)
- +++ compiler/nmat.pas (working copy)
- @@ -345,9 +345,9 @@
- else
- begin
- { Make everything always default singed int }
- - if not(rd.ordtype in [torddef(sinttype).ordtype,torddef(uinttype).ordtype]) then
- + if not(rd.ordtype in [torddef(sinttype).ordtype,torddef(uinttype).ordtype{$ifdef X86_64},u32bit,s32bit{$endif}]) then
- inserttypeconv(right,sinttype);
- - if not(ld.ordtype in [torddef(sinttype).ordtype,torddef(uinttype).ordtype]) then
- + if not(ld.ordtype in [torddef(sinttype).ordtype,torddef(uinttype).ordtype{$ifdef X86_64},u32bit,s32bit{$endif}]) then
- inserttypeconv(left,sinttype);
- resultdef:=right.resultdef;
- end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement