# 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 |