Subversion Repositories openrisc_me

# frv testcase for clrfr $FRk
# mach: frv

        .include "testutils.inc"

        start

        .global clrfr
clrfr:
        nldfi           @(sp,0),fr20    ; Activate fr20 with nesr.fr==1
        or_spr_immed    0x00100000,fner1
        nldi            @(sp,0),gr20    ; Activate gr20 with nesr.fr==0
        or_spr_immed    0x00200000,fner1
        nldfi           @(sp,0),fr52    ; Activate fr52 with nesr.fr==1
        or_spr_immed    0x00100000,fner0

        clrfr           fr20
        test_spr_immed  0x00200000,fner1
        test_spr_immed  0x00100000,fner0
        test_spr_immed  0,nesr0
        test_spr_immed  0,neear0
        test_spr_immed  0x94800401,nesr1
        test_spr_gr     neear1,sp
        test_spr_immed  0xf4800801,nesr2
        test_spr_gr     neear2,sp

        pass