# frv testcase to generate interrupt for st $GRk,@($GRi,$GRj)
# mach: fr550
	.include "testutils.inc"

	start

	.global align
align:
	and_spr_immed	-4081,tbr		; clear tbr.tt
	set_gr_spr	tbr,gr17
	inc_gr_immed	0x100,gr17		; address of exception handler
	set_bctrlr_0_0  gr17
	set_spr_immed	128,lcr
	set_psr_et	1
	set_gr_immed	0xdeadbeef,gr17
	set_gr_immed	0,gr15
	inc_gr_immed	2,sp		; out of alignment

	test_spr_bits	1,0,0,isr	; ISR.EMAM always clear (not used)
	sti		gr17,@(sp,0)	; no exception
	sti		gr17,@(sp,4)	; no exception
	ldi		@(sp,0),gr18	; stored at unaligned address
	test_gr_immed	0xdeadbeef,gr18
	ldi		@(sp,0),gr19	; no exception
	test_gr_immed	0xdeadbeef,gr19

	and_spr_immed	0xfffffffe,isr	; turn off ISR.EMAM
	sti		gr17,@(sp,0)	; misaligned -- no exception
	test_gr_immed	0,gr15

	set_gr_gr	sp,gr20
	set_gr_immed	1,gr21
	set_gr_immed	0x10101010,gr10
	nop.p
	ldu		@(sp,gr21),gr10	; misaligned read  no exception
	test_gr_immed	0,gr15		; handler was not called
	test_gr_immed	0xadbeefde,gr10	; gr10 updated
	test_gr_immed	1,gr21		; gr21 not updated
	inc_gr_immed	1,gr20
	test_gr_gr	gr20,sp		; sp updated

	pass