ftino.cgs

gdb-6.8 Linux下的调试程序 最新版本

# frv testcase for ftino
# mach: all

	.include "testutils.inc"

	start

	.global ftinev
ftinev:
	and_spr_immed	-4081,tbr		; clear tbr.tt
	set_gr_spr	tbr,gr7
	inc_gr_immed	2112,gr7		; address of exception handler
	set_mem_limmed	0x0038,0x2000,gr7	; bctrlr 0,0

	set_spr_immed	128,lcr
	set_spr_addr	bad,lr
	set_gr_immed	0,gr7

	set_fcc		0x0 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x1 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x2 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x3 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x4 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x5 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x6 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x7 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x8 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0x9 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0xa 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0xb 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0xc 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0xd 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0xe 0
	ftino 			; should branch to tbr + (128 + 4)*16
	set_fcc		0xf 0
	ftino 			; should branch to tbr + (128 + 4)*16
	pass
bad:
	fail