25 lines
365 B
ArmAsm
25 lines
365 B
ArmAsm
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
|
|
.sect .text
|
|
.define save~,retu~,savearea
|
|
! $Header$
|
|
|
|
save~:
|
|
mov r5,savearea
|
|
mov $[savearea+2],r5
|
|
mov r4,(r5)+
|
|
mov r3,(r5)+
|
|
mov r2,(r5)+
|
|
mov (sp)+,r2
|
|
mov (sp)+,(r5)+
|
|
jmp (r2)
|
|
retu~:
|
|
mov -(r5),-(sp)
|
|
mov -(r5),r2
|
|
mov -(r5),r3
|
|
mov -(r5),r4
|
|
mov -(r5),r5
|
|
rts pc
|
|
|
|
.sect .bss
|
|
savearea:
|
|
.space 12
|