# frv testcase for fstoi $FRj,$FRk
# mach: fr500 fr550 frv

	.include "testutils.inc"

	float_constants
	start
	load_float_constants

	.global fstoi
fstoi:
	fstoi		fr16,fr1
	test_fr_iimmed	0,fr1
	fstoi		fr20,fr1
	test_fr_iimmed	0,fr1

	fstoi		fr32,fr1
	test_fr_iimmed	0x00000002,fr1

	set_fr_iimmed	0xce05,0x4904,fr1
	fstoi		fr1,fr1
	test_fr_iimmed	0xdeadbf00,fr1

	pass