# frv testcase for srl $GRi,$GRj,$GRk# mach: all	.include "testutils.inc"	start	.global srlsrl:	set_gr_limmed   0xdead,0xbee0,gr7	; Shift by 0	set_gr_limmed   0x8000,0x0000,gr8	set_icc         0x05,0		; Set mask opposite of expected	srl      	gr8,gr7,gr8	test_icc	0 1 0 1 icc0	test_gr_limmed 	0x8000,0x0000,gr8	set_gr_limmed   0xdead,0xbee1,gr7	; Shift by 1	set_gr_limmed   0x8000,0x0000,gr8	set_icc         0x0f,0		; Set mask opposite of expected	srl      	gr8,gr7,gr8	test_icc	1 1 1 1 icc0	test_gr_limmed 	0x4000,0x0000,gr8	set_gr_limmed   0xdead,0xbeff,gr7	; Shift by 31	set_gr_limmed   0x8000,0x0000,gr8	set_icc         0x0f,0		; Set mask opposite of expected	srl      	gr8,gr7,gr8	test_icc	1 1 1 1 icc0	test_gr_immed  	1,gr8	set_gr_limmed   0xdead,0xbeff,gr7	; clear register	set_gr_limmed   0x4000,0x0000,gr8	set_icc         0x0a,0		; Set mask opposite of expected	srl      	gr8,gr7,gr8	test_icc	1 0 1 0 icc0	test_gr_immed  	0x00000000,gr8	pass