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

* fixed x86_64 compile

Browse Source
This commit is contained in:
peter 2005-01-29 00:40:18 +00:00
parent f818478945
commit 3dcc711558
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/ncgadd.pas
View File

@ -492,10 +492,10 @@ interface
begin begin
if (right.location.loc = LOC_CONSTANT) then if (right.location.loc = LOC_CONSTANT) then
cg.a_op_const_reg_reg(exprasmlist,op,location.size,right.location.value, cg.a_op_const_reg_reg(exprasmlist,op,location.size,right.location.value,
left.location.register,location.register,checkoverflow,ovloc) left.location.register,location.register)
else else
cg.a_op_reg_reg_reg(exprasmlist,op,location.size,right.location.register, cg.a_op_reg_reg_reg(exprasmlist,op,location.size,right.location.register,
left.location.register,location.register,checkoverflow,ovloc); left.location.register,location.register);
end; end;
subn: subn:
begin begin
@ -777,7 +777,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.39 2005-01-27 20:32:51 florian Revision 1.40 2005-01-29 00:40:18 peter
* fixed x86_64 compile
Revision 1.39 2005/01/27 20:32:51 florian
+ implemented overflow checking for 64 bit types on sparc + implemented overflow checking for 64 bit types on sparc
Revision 1.38 2005/01/20 21:28:52 florian Revision 1.38 2005/01/20 21:28:52 florian