repo.or.cz
/
qemu
/
ar7.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
block: Make auto-read-only=on default for -drive
[qemu/ar7.git]
/
tests
/
tcg
/
arm
/
test-arm-iwmmxt.S
blob
d647f9404ae90d12028696a9042e277a5d5cde53
1
@ Checks whether iwMMXt is functional.
2
.code 32
3
.globl main
4
5
main:
6
ldr r0, =data0
7
ldr r1, =data1
8
ldr r2, =data2
9
#ifndef FPA
10
wldrd wr0, [r0, #0]
11
wldrd wr1, [r0, #8]
12
wldrd wr2, [r1, #0]
13
wldrd wr3, [r1, #8]
14
wsubb wr2, wr2, wr0
15
wsubb wr3, wr3, wr1
16
wldrd wr0, [r2, #0]
17
wldrd wr1, [r2, #8]
18
waddb wr0, wr0, wr2
19
waddb wr1, wr1, wr3
20
wstrd wr0, [r2, #0]
21
wstrd wr1, [r2, #8]
22
#else
23
ldfe f0, [r0, #0]
24
ldfe f1, [r0, #8]
25
ldfe f2, [r1, #0]
26
ldfe f3, [r1, #8]
27
adfdp f2, f2, f0
28
adfdp f3, f3, f1
29
ldfe f0, [r2, #0]
30
ldfe f1, [r2, #8]
31
adfd f0, f0, f2
32
adfd f1, f1, f3
33
stfe f0, [r2, #0]
34
stfe f1, [r2, #8]
35
#endif
36
mov r0, #1
37
mov r1, r2
38
mov r2, #0x11
39
swi #0x900004
40
mov r0, #0
41
swi #0x900001
42
43
.data
44
data0:
45
.string "aaaabbbbccccdddd"
46
data1:
47
.string "bbbbccccddddeeee"
48
data2:
49
.string "hvLLWs\x1fsdrs9\x1fNJ-\n"