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/] [fmacs.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 fmac.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
init:
11
        pta wrong, tr0
12
 
13
fmacs:
14
        movi 2, r0
15
        fmov.ls r0, fr0
16
        float.ls fr0, fr0
17
 
18
        movi 3, r1
19
        fmov.ls r1, fr1
20
        float.ls fr1, fr1
21
 
22
        movi 4, r2
23
        fmov.ls r2, fr2
24
        float.ls fr2, fr2
25
 
26
        fmac.s fr0, fr1, fr2
27
 
28
        movi 10, r3
29
        fmov.ls r3, fr3
30
        float.ls fr3, fr3
31
 
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.