# frv testcase for rett $debug | |
# mach: all | |
.include "testutils.inc" | |
start | |
.global rett | |
rett: | |
and_spr_immed -4081,tbr ; clear tbr.tt | |
set_gr_spr tbr,gr7 | |
inc_gr_immed 2112,gr7 ; address of exception handler | |
set_bctrlr_0_0 gr7 | |
set_spr_immed 128,lcr | |
set_gr_immed 0,gr7 | |
set_psr_et 1 | |
set_spr_addr ok1,lr | |
set_icc 0x0 0 | |
tira gr7,4 ; should branch to tbr + (128 + 4)*16 | |
ok0: | |
test_gr_immed 1,gr7 | |
pass | |
fail | |
ok1: | |
inc_gr_immed 1,gr7 | |
rett 1 ; should be a nop | |
rett 0 | |
fail |