Subversion Repositories scarts

# 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