HCoop
/
bpt
/
guile.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
blame
|
history
|
raw
|
HEAD
Use $(GCC_CFLAGS) for `-Werror' et al. so that it's not used to compile
[bpt/guile.git]
/
qt
/
md
/
arm.s
1
.text
2
.align 2
3
.global qt_abort
4
.global qt_block
5
.global qt_blocki
6
7
# r0: helper
8
# r1: arg1
9
# r2: arg2
10
# r3: new_sp
11
qt_abort
:
12
qt_block
:
13
qt_blocki
:
14
stmfd sp
!, {
r4-
r11
,
lr
}
15
mov ip
,
r0
16
mov
r0
,
sp
17
mov sp
,
r3
18
mov
lr
,
pc
19
mov pc
,
ip
20
ldmfd sp
!, {
r4-
r11
,
pc
}
21
22
23
.global qt_start
24
.global qt_error
25
.type qt_start,function
26
qt_start
:
27
ldr
r0
, [
sp
]
28
ldr
r1
, [
sp
,
#4]
29
ldr
r2
, [
sp
,
#8]
30
ldr
lr
,
qt_error_loc
31
ldr pc
, [
sp
,
#12]
32
33
qt_error_loc
:
34
.word qt_error