Subversion Repositories scarts

# frv testcase for clrga
# mach: frv

        .include "testutils.inc"

        start

        .global clrga
clrga:
        nldi            @(sp,0),gr20    ; Activate gr20 with nesr.fr==0
        or_spr_immed    0x00100000,gner1
        nldfi           @(sp,0),fr20    ; Activate fr20 with nesr.fr==1
        or_spr_immed    0x00200000,gner1
        nldi            @(sp,0),gr52    ; Activate gr52 with nesr.fr==0
        or_spr_immed    0x00100000,gner0

        clrga
        test_spr_immed  0x00000000,gner1
        test_spr_immed  0x00000000,gner0
        test_spr_immed  0,nesr0
        test_spr_immed  0,neear0
        test_spr_immed  0xd4800401,nesr1
        test_spr_gr     neear1,sp
        test_spr_immed  0,nesr2
        test_spr_immed  0,neear2

        pass