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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [fabsd.cgs] - Blame information for rev 816

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


# sh testcase for fabs.d $drgh, $drf -*- Asm -*-
# mach: all
# as: -isa=shmedia
# ld: -m shelf64
 
        .include "media/testutils.inc"
 
        start
init:
        pta wrong, tr0
        movi 0, r0
        movi 1, r1
 
fabs0:
        # Ensure fabs(-1) = 1.
        fmov.ls r0, fr7
        float.ld fr7, dr0
        fmov.ls r1, fr7
        float.ld fr7, dr2
        fsub.d dr0, dr2, dr4
        fabs.d dr4, dr6
        fcmpeq.d dr6, dr2, r7
        bnei r7, 1, tr0
 
fabs1:
        # Ensure fabs(1) = 1.
        fmov.ls r0, fr7
        float.ld fr7, dr0
        fmov.ls r1, fr7
        float.ld fr7, dr2
        fabs.d dr2, dr4
        fcmpeq.d dr2, dr4, r7
        bnei r7, 1, tr0
 
okay:
        pass
 
wrong:
        fail

Line No.	Rev	Author	Line
1	24	jeremybenn	`# sh testcase for fabs.d $drgh, $drf -- Asm --`
2			`# mach: all`
3			`# as: -isa=shmedia`
4			`# ld: -m shelf64`
5
6			`.include "media/testutils.inc"`
7
8			`start`
9			`init:`
10			`pta wrong, tr0`
11			`movi 0, r0`
12			`movi 1, r1`
13
14			`fabs0:`
15			`# Ensure fabs(-1) = 1.`
16			`fmov.ls r0, fr7`
17			`float.ld fr7, dr0`
18			`fmov.ls r1, fr7`
19			`float.ld fr7, dr2`
20			`fsub.d dr0, dr2, dr4`
21			`fabs.d dr4, dr6`
22			`fcmpeq.d dr6, dr2, r7`
23			`bnei r7, 1, tr0`
24
25			`fabs1:`
26			`# Ensure fabs(1) = 1.`
27			`fmov.ls r0, fr7`
28			`float.ld fr7, dr0`
29			`fmov.ls r1, fr7`
30			`float.ld fr7, dr2`
31			`fabs.d dr2, dr4`
32			`fcmpeq.d dr2, dr4, r7`
33			`bnei r7, 1, tr0`
34
35			`okay:`
36			`pass`
37
38			`wrong:`
39			`fail`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [media/] [fabsd.cgs] - Blame information for rev 816