Subversion Repositories openrisc

# m32r testcase for st $src1,@-$src2
# mach(): m32r m32rx

        .include "testutils.inc"

        start

        .global st_minus
st_minus:
        mvaddr_h_gr r4, data_loc2
        mvi_h_gr    r5, 1

        st r5, @-r4

        mvaddr_h_gr r5, data_loc

        bne r4, r5, not_ok
        ld r4, @r4
        test_h_gr r4, 1

        pass
not_ok:
        fail

data_loc:
        .word 0
data_loc2:
        .word 0