Subversion Repositories scarts

# frv testcase for mhsetlos $s12,$FRk
# mach: all

        .include "../testutils.inc"

        start

        .global mhsetlos
mhsetlos:
        set_fr_immed    0,fr1
        mhsetlos        0,fr1
        test_fr_iimmed  0,fr1
        mhsetlos        1,fr1
        test_fr_iimmed  0x00000001,fr1
        mhsetlos        0x7ff,fr1
        test_fr_iimmed  0x000007ff,fr1
        mhsetlos        -2048,fr1
        test_fr_iimmed  0x0000f800,fr1

        ; Try parallel set of hi and lo at the same time
        mhsethis.p      1,fr1
        mhsetlos        2,fr1
        test_fr_iimmed  0x00010002,fr1

        pass