Subversion Repositories openrisc

# sh testcase for fdiv.s $frg, $frh, $frf -*- Asm -*-
# mach: all
# as: -isa=shmedia
# ld: -m shelf64

        .include "media/testutils.inc"

        start
init:
        pta wrong, tr0

fdivs1:
        movi 1, r0
        fmov.ls r0, fr0
        float.ls fr0, fr0
        movi 2, r1
        fmov.ls r1, fr1
        float.ls fr1, fr1
        fdiv.s fr0, fr1, fr2

fdvis2:
        movi 6, r0
        fmov.ls r0, fr0
        float.ls fr0, fr0
        movi 2, r1
        fmov.ls r1, fr1
        float.ls fr1, fr1
        fdiv.s fr0, fr1, fr2
        movi 3, r3
        fmov.ls r3, fr3
        float.ls fr3, fr3
        fcmpeq.s fr2, fr3, r7
        bnei r7, 1, tr0

okay:
        pass

wrong:
        fail