URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [fiprs.cgs] - Blame information for rev 26

Details | Compare with Previous | View Log


# sh testcase for fipr.s $fvg, $fvh, $frf -*- Asm -*-
# mach: all
# as: -isa=shmedia
# ld: -m shelf64
 
        .include "media/testutils.inc"
 
        .macro _load val, fpreg
        # This macro clobbers r0.
        movi \val, r0
        fmov.ls r0, \fpreg
        float.ls \fpreg, \fpreg
        .endm
 
        start
 
        .global fiprs
init:
        pta wrong, tr0
 
        _load 1, fr0
        _load 2, fr1
        _load 3, fr2
        _load 4, fr3
        _load 1, fr4
        _load 2, fr5
        _load 3, fr6
        _load 4, fr7
 
fiprs:
        fipr.s fv0, fv4, fr9
 
check:
        _load 30, fr10
        fcmpeq.s fr9, fr10, r7
        bnei r7, 1, tr0
 
okay:
        pass
 
wrong:
        fail

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for fipr.s $fvg, $fvh, $frf -- Asm --`
2			`# mach: all`
3			`# as: -isa=shmedia`
4			`# ld: -m shelf64`
5
6			`.include "media/testutils.inc"`
7
8			`.macro _load val, fpreg`
9			`# This macro clobbers r0.`
10			`movi \val, r0`
11			`fmov.ls r0, \fpreg`
12			`float.ls \fpreg, \fpreg`
13			`.endm`
14
15			`start`
16
17			`.global fiprs`
18			`init:`
19			`pta wrong, tr0`
20
21			`_load 1, fr0`
22			`_load 2, fr1`
23			`_load 3, fr2`
24			`_load 4, fr3`
25			`_load 1, fr4`
26			`_load 2, fr5`
27			`_load 3, fr6`
28			`_load 4, fr7`
29
30			`fiprs:`
31			`fipr.s fv0, fv4, fr9`
32
33			`check:`
34			`_load 30, fr10`
35			`fcmpeq.s fr9, fr10, r7`
36			`bnei r7, 1, tr0`
37
38			`okay:`
39			`pass`
40
41			`wrong:`
42			`fail`

Browse

Tools

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [fiprs.cgs] - Blame information for rev 26