OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [tags/] [gdb/] [gdb-6.8/] [gdb-6.8.openrisc-2.1/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [fmac.cgs] - Diff between revs 24 and 33

Only display areas with differences | Details | Blame | View Log

Rev 24 Rev 33
# sh testcase for fmac -*- Asm -*-
# sh testcase for fmac -*- Asm -*-
# mach: all
# mach: all
# as: -isa=shcompact
# as: -isa=shcompact
# ld: -m shelf32
# ld: -m shelf32
        .include "compact/testutils.inc"
        .include "compact/testutils.inc"
        start
        start
        # 0.0 * x + y = y.
        # 0.0 * x + y = y.
        fldi0 fr0
        fldi0 fr0
        fldi1 fr1
        fldi1 fr1
        fldi1 fr2
        fldi1 fr2
        fmac fr0, fr1, fr2
        fmac fr0, fr1, fr2
        # check result.
        # check result.
        fldi1 fr0
        fldi1 fr0
        fcmp/eq fr0, fr2
        fcmp/eq fr0, fr2
        bf wrong
        bf wrong
        # x * y + 0.0 = x * y.
        # x * y + 0.0 = x * y.
        fldi1 fr0
        fldi1 fr0
        fldi1 fr1
        fldi1 fr1
        fldi0 fr2
        fldi0 fr2
        # double it.
        # double it.
        fadd fr1, fr2
        fadd fr1, fr2
        fmac fr0, fr1, fr2
        fmac fr0, fr1, fr2
        # check result.
        # check result.
        fldi1 fr0
        fldi1 fr0
        fadd fr0, fr0
        fadd fr0, fr0
        fcmp/eq fr0, fr2
        fcmp/eq fr0, fr2
        bf wrong
        bf wrong
        # x * 0.0 + y = y.
        # x * 0.0 + y = y.
        fldi1 fr0
        fldi1 fr0
        fldi0 fr1
        fldi0 fr1
        fldi1 fr2
        fldi1 fr2
        fadd fr2, fr2
        fadd fr2, fr2
        fmac fr0, fr1, fr2
        fmac fr0, fr1, fr2
        # check result.
        # check result.
        fldi1 fr0
        fldi1 fr0
        # double fr0.
        # double fr0.
        fadd fr0, fr0
        fadd fr0, fr0
        fcmp/eq fr0, fr2
        fcmp/eq fr0, fr2
        bf wrong
        bf wrong
        # x * 0.0 + 0.0 = 0.0
        # x * 0.0 + 0.0 = 0.0
        fldi1 fr0
        fldi1 fr0
        fadd fr0, fr0
        fadd fr0, fr0
        fldi0 fr1
        fldi0 fr1
        fldi0 fr2
        fldi0 fr2
        fmac fr0, fr1, fr2
        fmac fr0, fr1, fr2
        # check result.
        # check result.
        fldi0 fr0
        fldi0 fr0
        fcmp/eq fr0, fr2
        fcmp/eq fr0, fr2
        bf wrong
        bf wrong
        # 0.0 * x + 0.0 = 0.0.
        # 0.0 * x + 0.0 = 0.0.
        fldi0 fr0
        fldi0 fr0
        fldi1 fr1
        fldi1 fr1
        # double it.
        # double it.
        fadd fr1, fr1
        fadd fr1, fr1
        fldi0 fr2
        fldi0 fr2
        fmac fr0, fr1, fr2
        fmac fr0, fr1, fr2
        # check result.
        # check result.
        fldi0 fr0
        fldi0 fr0
        fcmp/eq fr0, fr2
        fcmp/eq fr0, fr2
        bf wrong
        bf wrong
okay:
okay:
        pass
        pass
wrong:
wrong:
        fail
        fail
 
 

powered by: WebSVN 2.1.0

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