paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 13:39:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* a_load_ref_ref isn't allowed to be used in g_stackframe_entry

Browse Source
This commit is contained in:
florian 2003-12-07 21:59:21 +00:00
parent 18f527a614
commit e63ae3ffee
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/powerpc/cgcpu.pas
View File

@ -1238,7 +1238,11 @@ const
internalerror(200310011); internalerror(200310011);
reference_reset_base(href,tvarsym(hp.parasym).localloc.reference.index,tvarsym(hp.parasym).localloc.reference.offset); reference_reset_base(href,tvarsym(hp.parasym).localloc.reference.index,tvarsym(hp.parasym).localloc.reference.offset);
reference_reset_base(href2,NR_R12,hp.paraloc[callerside].reference.offset); reference_reset_base(href2,NR_R12,hp.paraloc[callerside].reference.offset);
cg.a_load_ref_ref(list,hp.paraloc[calleeside].size,hp.paraloc[calleeside].size,href2,href); { we can't use functions here which allocate registers (FK)
cg.a_load_ref_ref(list,hp.paraloc[calleeside].size,hp.paraloc[calleeside].size,href2,href);
}
cg.a_load_ref_reg(list,hp.paraloc[calleeside].size,hp.paraloc[calleeside].size,href2,NR_R0);
cg.a_load_reg_ref(list,hp.paraloc[calleeside].size,hp.paraloc[calleeside].size,NR_R0,href);
end end
{$ifdef dummy} {$ifdef dummy}
else if (hp.calleeparaloc.loc in [LOC_REGISTER,LOC_CREGISTER]) then else if (hp.calleeparaloc.loc in [LOC_REGISTER,LOC_CREGISTER]) then
@ -2467,7 +2471,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.142 2003-12-06 22:13:53 jonas Revision 1.143 2003-12-07 21:59:21 florian
* a_load_ref_ref isn't allowed to be used in g_stackframe_entry
Revision 1.142 2003/12/06 22:13:53 jonas
* another fix to a_load_ref_reg() * another fix to a_load_ref_reg()
+ implemented uses_registers() method + implemented uses_registers() method