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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [fadds.cgs] - Blame information for rev 828

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


# sh testcase for fadd.s $frg, $frh, $frf -*- Asm -*-
# mach: all
# as: -isa=shmedia
# ld: -m shelf64
 
        .include "media/testutils.inc"
 
        start
 
        .global fadds
init:
        pta wrong, tr0
        movi 2, r0
        movi 3, r1
 
fadd0:
        # Add 2 and 3.
        fmov.ls r0, fr7
        float.ls fr7, fr0
        fmov.ls r1, fr7
        float.ls fr7, fr1
        fadd.s fr0, fr1, fr2
        # Check to make sure we got 5.
        movi 5, r2
        fmov.ls r2, fr7
        float.ls fr7, fr3
        fcmpeq.s fr2, fr3, r7
        bnei r7, 1, tr0
 
okay:
        pass
 
wrong:
        fail

Line No.	Rev	Author	Line
1	227	jeremybenn	`# sh testcase for fadd.s $frg, $frh, $frf -- Asm --`
2			`# mach: all`
3			`# as: -isa=shmedia`
4			`# ld: -m shelf64`
5
6			`.include "media/testutils.inc"`
7
8			`start`
9
10			`.global fadds`
11			`init:`
12			`pta wrong, tr0`
13			`movi 2, r0`
14			`movi 3, r1`
15
16			`fadd0:`
17			`# Add 2 and 3.`
18			`fmov.ls r0, fr7`
19			`float.ls fr7, fr0`
20			`fmov.ls r1, fr7`
21			`float.ls fr7, fr1`
22			`fadd.s fr0, fr1, fr2`
23			`# Check to make sure we got 5.`
24			`movi 5, r2`
25			`fmov.ls r2, fr7`
26			`float.ls fr7, fr3`
27			`fcmpeq.s fr2, fr3, r7`
28			`bnei r7, 1, tr0`
29
30			`okay:`
31			`pass`
32
33			`wrong:`
34			`fail`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [fadds.cgs] - Blame information for rev 828