mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-12 10:49:31 +02:00
* insert it statements for arm thumb2 in syscall assembler procedures
git-svn-id: trunk@25342 -
This commit is contained in:
parent
3dd8673212
commit
7df123aa1e
@ -235,6 +235,7 @@ asm
|
||||
swi #0x0
|
||||
cmn r0,#126
|
||||
ldr r7,[sp],#4
|
||||
it ls
|
||||
movls pc,lr
|
||||
stmfd sp!,{lr}
|
||||
rsb r0,r0,#0
|
||||
@ -255,6 +256,7 @@ asm
|
||||
swi #0x0
|
||||
cmn r0,#126
|
||||
ldr r7,[sp],#4
|
||||
it ls
|
||||
movls pc,lr
|
||||
stmfd sp!,{lr}
|
||||
rsb r0,r0,#0
|
||||
@ -276,6 +278,7 @@ asm
|
||||
swi #0x0
|
||||
cmn r0,#126
|
||||
ldr r7,[sp],#4
|
||||
it ls
|
||||
movls pc,lr
|
||||
stmfd sp!,{lr}
|
||||
rsb r0,r0,#0
|
||||
@ -298,6 +301,7 @@ asm
|
||||
swi #0x0
|
||||
cmn r0,#126
|
||||
ldr r7,[sp],#4
|
||||
it ls
|
||||
movls pc,lr
|
||||
stmfd sp!,{lr}
|
||||
rsb r0,r0,#0
|
||||
|
Loading…
Reference in New Issue
Block a user