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

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 24 jeremybenn
# frv testcase for mrotri $FRinti,$s6,$FRintk
2
# mach: all
3
 
4
        .include "testutils.inc"
5
 
6
        start
7
 
8
        .global mrotri
9
mrotri:
10
        set_fr_iimmed   0x8000,0x0000,fr8
11
        mrotri          fr8,0x20,fr8    ; Shift by 0
12
        test_fr_iimmed  0x80000000,fr8
13
 
14
        set_fr_iimmed   0x8000,0x0000,fr8
15
        mrotri          fr8,0,fr8       ; Shift by 0
16
        test_fr_iimmed  0x80000000,fr8
17
 
18
        set_fr_iimmed   0x8000,0x0000,fr8
19
        mrotri          fr8,1,fr8       ; Shift by 1
20
        test_fr_iimmed  0x40000000,fr8
21
 
22
        set_fr_iimmed   0x8000,0x0000,fr8
23
        mrotri          fr8,31,fr8      ; Shift by 31
24
        test_fr_iimmed  1,fr8
25
 
26
        set_fr_iimmed   0x4000,0x0000,fr8
27
        mrotri          fr8,31,fr8      ; max shift
28
        test_fr_iimmed  0x80000000,fr8
29
 
30
        set_fr_iimmed   0xdead,0xbeef,fr8
31
        mrotri          fr8,16,fr8      ; max shift
32
        test_fr_iimmed  0xbeefdead,fr8
33
 
34
        pass

powered by: WebSVN 2.1.0

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