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/] [frv/] [fblt.cgs] - Blame information for rev 438

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

Line No. Rev Author Line
1 24 jeremybenn
# frv testcase for fblt $FCCi,$hint,$label16
2
# mach: all
3
 
4
        .include "testutils.inc"
5
 
6
        start
7
 
8
        .global fblt
9
fblt:
10
        set_fcc         0x0 0
11
        fblt            fcc0,0,bad
12
        set_fcc         0x1 1
13
        fblt            fcc1,1,bad
14
        set_fcc         0x2 2
15
        fblt            fcc2,2,bad
16
        set_fcc         0x3 3
17
        fblt            fcc3,3,bad
18
        set_fcc         0x4 0
19
        fblt            fcc0,0,ok5
20
        fail
21
ok5:
22
        set_fcc         0x5 1
23
        fblt            fcc1,1,ok6
24
        fail
25
ok6:
26
        set_fcc         0x6 2
27
        fblt            fcc2,2,ok7
28
        fail
29
ok7:
30
        set_fcc         0x7 3
31
        fblt            fcc3,3,ok8
32
        fail
33
ok8:
34
        set_fcc         0x8 0
35
        fblt            fcc0,0,bad
36
        set_fcc         0x9 1
37
        fblt            fcc1,1,bad
38
        set_fcc         0xa 2
39
        fblt            fcc2,2,bad
40
        set_fcc         0xb 3
41
        fblt            fcc3,3,bad
42
        set_fcc         0xc 0
43
        fblt            fcc0,0,okd
44
        fail
45
okd:
46
        set_fcc         0xd 1
47
        fblt            fcc1,1,oke
48
        fail
49
oke:
50
        set_fcc         0xe 2
51
        fblt            fcc2,2,okf
52
        fail
53
okf:
54
        set_fcc         0xf 3
55
        fblt            fcc3,3,okg
56
        fail
57
okg:
58
 
59
        pass
60
bad:
61
        fail

powered by: WebSVN 2.1.0

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