]> gitweb.factorcode.org Git - factor.git/blob - basis/cpu/arm/assembler/assembler-tests.factor
a30ab9f7970646930340f9f2325f7b0759449fc9
[factor.git] / basis / cpu / arm / assembler / assembler-tests.factor
1 IN: cpu.arm.assembler.tests
2 USING: assembler-arm math test namespaces sequences kernel
3 quotations ;
4
5 : test-opcode [ { } make first ] curry unit-test ;
6
7 [ HEX: ea000000 ] [ 0 B ] test-opcode
8 [ HEX: eb000000 ] [ 0 BL ] test-opcode
9 ! [ HEX: e12fff30 ] [ R0 BLX ] test-opcode
10
11 [ HEX: e24cc004 ] [ IP IP 4 SUB ] test-opcode
12 [ HEX: e24cb004 ] [ FP IP 4 SUB ] test-opcode
13 [ HEX: e087e3ac ] [ LR R7 IP 7 <LSR> ADD ] test-opcode
14 [ HEX: e08c0109 ] [ R0 IP R9 2 <LSL> ADD ] test-opcode
15 [ HEX: 02850004 ] [ R0 R5 4 EQ ADD ] test-opcode
16 [ HEX: 00000000 ] [ R0 R0 R0 EQ AND ] test-opcode
17
18 [ HEX: e1a0c00c ] [ IP IP MOV ] test-opcode
19 [ HEX: e1a0c00d ] [ IP SP MOV ] test-opcode
20 [ HEX: e3a03003 ] [ R3 3 MOV ] test-opcode
21 [ HEX: e1a00003 ] [ R0 R3 MOV ] test-opcode
22 [ HEX: e1e01c80 ] [ R1 R0 25 <LSL> MVN ] test-opcode
23 [ HEX: e1e00ca1 ] [ R0 R1 25 <LSR> MVN ] test-opcode
24 [ HEX: 11a021ac ] [ R2 IP 3 <LSR> NE MOV ] test-opcode
25
26 [ HEX: e3530007 ] [ R3 7 CMP ] test-opcode
27
28 [ HEX: e008049a ] [ R8 SL R4 MUL ] test-opcode
29
30 [ HEX: e5151004 ] [ R1 R5 4 <-> LDR ] test-opcode
31 [ HEX: e41c2004 ] [ R2 IP 4 <-!> LDR ] test-opcode
32 [ HEX: e50e2004 ] [ R2 LR 4 <-> STR ] test-opcode
33
34 [ HEX: e7910002 ] [ R0 R1 R2 <+> LDR ] test-opcode
35 [ HEX: e7910102 ] [ R0 R1 R2 2 <LSL> <+> LDR ] test-opcode
36
37 [ HEX: e1d310bc ] [ R1 R3 12 <+> LDRH ] test-opcode
38 [ HEX: e1d310fc ] [ R1 R3 12 <+> LDRSH ] test-opcode
39 [ HEX: e1d310dc ] [ R1 R3 12 <+> LDRSB ] test-opcode
40 [ HEX: e1c310bc ] [ R1 R3 12 <+> STRH ] test-opcode
41 [ HEX: e19310b4 ] [ R1 R3 R4 <+> LDRH ] test-opcode
42 [ HEX: e1f310fc ] [ R1 R3 12 <!+> LDRSH ] test-opcode
43 [ HEX: e1b310d4 ] [ R1 R3 R4 <!+> LDRSB ] test-opcode
44 [ HEX: e0c317bb ] [ R1 R3 123 <+!> STRH ] test-opcode
45 [ HEX: e08310b4 ] [ R1 R3 R4 <+!> STRH ] test-opcode