paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-25 11:37:16 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed -currency after r5896

Browse Source 
git-svn-id: trunk@5914 -
This commit is contained in:
Jonas Maebe 2007-01-12 09:52:07 +00:00
parent 157e5eb02e
commit 198a0008d0
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/powerpc/nppcmat.pas
View File

@ -555,7 +555,7 @@ end;
begin begin
secondpass(left); secondpass(left);
if is_64bitint(left.resultdef) then if is_64bit(left.resultdef) then
begin begin
location_force_reg(current_asmdata.CurrAsmList,left.location,def_cgsize(left.resultdef),true); location_force_reg(current_asmdata.CurrAsmList,left.location,def_cgsize(left.resultdef),true);
location_copy(location,left.location); location_copy(location,left.location);