# 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