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

* fix for bug in fixref that Peter found during the Sparc conversion

Browse Source
This commit is contained in:
Jonas Maebe 2003-06-01 13:42:18 +00:00
parent 7b3095fe27
commit abc1c5bf2f
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/powerpc/cgcpu.pas
View File

@ -2191,7 +2191,10 @@ const
begin
result := false;
if (ref.base.number = NR_NO) then
ref.base := ref.index;
begin
ref.base := ref.index;
ref.base.number := NR_NO;
end;
if (ref.base.number <> NR_NO) then
begin
if (ref.index.number <> NR_NO) and
@ -2540,7 +2543,10 @@ begin
end.
{
$Log$
Revision 1.101 2003-05-30 18:52:10 jonas
Revision 1.102 2003-06-01 13:42:18 jonas
* fix for bug in fixref that Peter found during the Sparc conversion
Revision 1.101 2003/05/30 18:52:10 jonas
* fixed bug with intregvars
* locapara.loc can also be LOC_CFPUREGISTER -> also fixed
rcgppc.a_param_ref, which previously got bogus size values