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/] [sh64/] [media/] [fdivs.cgs] - Blame information for rev 280

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

Line No. Rev Author Line
1 24 jeremybenn
# sh testcase for fdiv.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
init:
10
        pta wrong, tr0
11
 
12
fdivs1:
13
        movi 1, r0
14
        fmov.ls r0, fr0
15
        float.ls fr0, fr0
16
        movi 2, r1
17
        fmov.ls r1, fr1
18
        float.ls fr1, fr1
19
        fdiv.s fr0, fr1, fr2
20
 
21
fdvis2:
22
        movi 6, r0
23
        fmov.ls r0, fr0
24
        float.ls fr0, fr0
25
        movi 2, r1
26
        fmov.ls r1, fr1
27
        float.ls fr1, fr1
28
        fdiv.s fr0, fr1, fr2
29
        movi 3, r3
30
        fmov.ls r3, fr3
31
        float.ls fr3, fr3
32
        fcmpeq.s fr2, fr3, r7
33
        bnei r7, 1, tr0
34
 
35
okay:
36
        pass
37
 
38
wrong:
39
        fail

powered by: WebSVN 2.1.0

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