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/] [bgeu.cgs] - Blame information for rev 280

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

Line No. Rev Author Line
1 24 jeremybenn 
# sh testcase for bgeu$likely $rm, $rn, $tra -*- Asm -*-
2 
# mach: all
3 
# as: -isa=shmedia
4 
# ld: -m shelf64
5 
 
6 
        .include "media/testutils.inc"
7 
 
8 
        start
9 
 
10 
        .global bgeu
11 
init:
12 
        movi 0, r0
13 
 
14 
bgeu1:
15 
        # Compare r0 with itself.
16 
        pta bgeu2, tr0
17 
        bgeu/l r0, r0, tr0
18 
        # We should branch here.
19 
        fail
20 
 
21 
bgeu2:
22 
        movi 1, r1
23 
        movi 1, r2
24 
        pta bge3, tr0
25 
        bgeu r1, r2, tr0
26 
        # We should branch here.
27 
        fail
28 
 
29 
bge3:
30 
        movi -1, r1
31 
        movi 1, r2
32 
        # We SHOULD branch here.
33 
        pta bge4, tr0
34 
        bgeu r1, r2, tr0
35 
        fail
36 
 
37 
bge4:
38 
        movi 1, r1
39 
        movi -1, r2
40 
        # We should not branch here.
41 
        pta wrong, tr0
42 
        bgeu r1, r2, tr0
43 
okay:
44 
        pass
45 
 
46 
wrong:
47 
        fail

powered by: WebSVN 2.1.0

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