16 lines
284 B
ArmAsm
16 lines
284 B
ArmAsm
|
TEXT setjmp(SB), 1, $0
|
||
|
MOVL b+0(FP), A0
|
||
|
MOVL A7, (A0)+
|
||
|
MOVL (A7), (A0)
|
||
|
CLRL R0
|
||
|
RTS
|
||
|
|
||
|
TEXT longjmp(SB), 1, $0
|
||
|
MOVL b+0(FP), A0
|
||
|
MOVL r+4(FP), R0
|
||
|
BNE ok /* ansi: "longjmp(0) => longjmp(1)" */
|
||
|
MOVL $1, R0 /* bless their pointed heads */
|
||
|
ok: MOVL (A0)+, A7
|
||
|
MOVL (A0), (A7)
|
||
|
RTS
|