1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
|
;; xstormy16
;; Copyright (C) 2001 by Red Hat, Incorporated. All rights reserved.
;;
;; Permission to use, copy, modify, and distribute this software
;; is freely granted, provided that this notice is preserved.
;;
.file "setjmp.S"
.section .text
.align 1
.global setjmp
.type setjmp,@function
setjmp:
mov r0,r10
mov (r2++),r0
mov r0,r11
mov (r2++),r0
mov r0,r12
mov (r2++),r0
mov r0,r13
mov (r2++),r0
pop r0 ; PC high word
pop r1 ; PC low word
mov (r2++), r0
mov (r2++), r1
mov r3,sp
mov (r2++),r3
mov.w r2,#0
mov r8, r0
mov r9, r1
jmp r8, r9
.size setjmp,.-setjmp
.global longjmp
.type longjmp,@function
longjmp:
mov r0,(r2++)
mov r10,r0
mov r0,(r2++)
mov r11,r0
mov r0,(r2++)
mov r12,r0
mov r0,(r2++)
mov r13,r0
mov r0,(r2++)
mov r8, r0
mov r1,(r2++)
mov r9, r1
mov r4,(r2++)
mov sp,r4
;; status arg (r3) to longjmp is return value
;; if it's zero, return 1
bnz r3, #0, 0f
mov.w r3,#1
0: mov r2, r3
jmp r8,r9
.size longjmp,.-longjmp
|
