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

+ Add ifdef USE_MIPS_STK2_ASM to disable assmebler code using alterante stack with r23 by default

Browse Source 
git-svn-id: trunk@20377 -
This commit is contained in:
pierre 2012-02-19 19:00:21 +00:00
parent eda5511ef9
commit 9576664f20
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/mips/mips.inc
View File

@ -82,6 +82,7 @@ function Sptr:Pointer;assembler;nostackframe;
end; end;
{$ifdef USE_MIPS_STK2_ASM}
{$ifndef FPC_SYSTEM_HAS_MOVE} {$ifndef FPC_SYSTEM_HAS_MOVE}
{$define FPC_SYSTEM_HAS_MOVE} {$define FPC_SYSTEM_HAS_MOVE}
procedure Move(const source;var dest;count:longint);[public, alias: 'FPC_MOVE'];assembler; procedure Move(const source;var dest;count:longint);[public, alias: 'FPC_MOVE'];assembler;
@ -420,6 +421,7 @@ asm
lw $14,-40($23) lw $14,-40($23)
end; end;
{$endif def USE_MIPS_STK2_ASM}
function InterLockedDecrement (var Target: longint) : longint; assembler; nostackframe; function InterLockedDecrement (var Target: longint) : longint; assembler; nostackframe;
asm asm