URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [frv/] [rett.cgs] - Rev 840
Compare with Previous | Blame | View Log
# 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