Subversion Repositories openrisc

# frv testcase for munpackh $FRi,$FRj
# mach: all

        .include "testutils.inc"

        start

        .global munpackh
munpackh:
        set_fr_iimmed   0xdead,0xbeef,fr10
        set_fr_iimmed   0x1234,0x5678,fr11
        munpackh        fr10,fr12
        test_fr_limmed  0xdead,0xdead,fr12
        test_fr_limmed  0xbeef,0xbeef,fr13

        set_fr_iimmed   0x1234,0x5678,fr10
        set_fr_iimmed   0xdead,0xbeef,fr11
        munpackh        fr10,fr12
        test_fr_limmed  0x1234,0x1234,fr12
        test_fr_limmed  0x5678,0x5678,fr13

        pass