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