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

* fixed wrong operands of swp

Browse Source 
git-svn-id: trunk@5072 -
This commit is contained in:
florian 2006-10-29 20:51:31 +00:00
parent 81a4547901
commit 69ae03d6bc
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/arm/arm.inc
View File

@ -233,7 +233,8 @@ end;
function InterLockedExchange (var Target: longint;Source : longint) : longint; assembler; nostackframe;
asm
swp r0, r1, [r0]
swp r1, r1, [r0]
mov r0,r1
end;
function InterLockedExchangeAdd (var Target: longint;Source : longint) : longint; assembler; nostackframe;