OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [xor.cgs] - Blame information for rev 225

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 24 jeremybenn 
# sh testcase for xor $rm, $rn, $rd -*- Asm -*-
2 
# mach: all
3 
# as: -isa=shmedia
4 
# ld: -m shelf64
5 
 
6 
        .include "media/testutils.inc"
7 
 
8 
        start
9 
init:
10 
        pta wrong, tr0
11 
 
12 
xor1:
13 
        # 0 xor 0 = 0.
14 
        movi 0, r0
15 
        movi 0, r1
16 
        xor r0, r1, r2
17 
        bnei r2, 0, tr0
18 
 
19 
xor2:
20 
        # 0 xor 1 = 1.
21 
        movi 0, r0
22 
        movi 1, r1
23 
        xor r0, r1, r2
24 
        bnei r2, 1, tr0
25 
 
26 
xor3:
27 
        # 1 xor 0 = 1.
28 
        movi 1, r0
29 
        movi 0, r1
30 
        xor r0, r1, r2
31 
        bnei r2, 1, tr0
32 
 
33 
xor4:
34 
        # 1 xor 1 = 0.
35 
        movi 1, r0
36 
        movi 1, r1
37 
        xor r0, r1, r2
38 
        bnei r2, 0, tr0
39 
 
40 
xor5:
41 
        movi 1, r0
42 
        shlli r0, 63, r0
43 
        ori r0, 1, r0
44 
        movi 3, r1
45 
        xor r0, r1, r2
46 
        andi r2, 255, r2
47 
        bnei r2, 2, tr0
48 
 
49 
okay:
50 
        pass
51 
 
52 
wrong:
53 
        fail
54 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.