paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-10 12:29:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

* (d)allocallcpuregisters must not handle fpu registers on avr

Browse Source 
git-svn-id: branches/avr@17025 -
This commit is contained in:
florian 2011-02-26 20:59:09 +00:00
parent f419966f06
commit 726b24c591
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/cgobj.pas
View File

@ -755,12 +755,12 @@ implementation
procedure tcg.allocallcpuregisters(list:TAsmList);
begin
alloccpuregisters(list,R_INTREGISTER,paramanager.get_volatile_registers_int(pocall_default));
{$ifndef i386}
{$if not(defined(i386)) and not(defined(avr))}
alloccpuregisters(list,R_FPUREGISTER,paramanager.get_volatile_registers_fpu(pocall_default));
{$ifdef cpumm}
alloccpuregisters(list,R_MMREGISTER,paramanager.get_volatile_registers_mm(pocall_default));
{$endif cpumm}
{$endif i386}
{$endif not(defined(i386)) and not(defined(avr))}
end;
@ -776,12 +776,12 @@ implementation
procedure tcg.deallocallcpuregisters(list:TAsmList);
begin
dealloccpuregisters(list,R_INTREGISTER,paramanager.get_volatile_registers_int(pocall_default));
{$ifndef i386}
{$if not(defined(i386)) and not(defined(avr))}
dealloccpuregisters(list,R_FPUREGISTER,paramanager.get_volatile_registers_fpu(pocall_default));
{$ifdef cpumm}
dealloccpuregisters(list,R_MMREGISTER,paramanager.get_volatile_registers_mm(pocall_default));
{$endif cpumm}
{$endif i386}
{$endif not(defined(i386)) and not(defined(avr))}
end;