Subversion Repositories scarts

# sh testcase for beq$likely $rm, $rn, $tra -*- Asm -*-

# mach: all

# as: -isa=shmedia

# ld: -m shelf64

        .include "media/testutils.inc"

        start

        .global beq

init:

        # Load up the branch target registers.

        pta beq2, tr0

        pta beq3, tr1

        pta wrong, tr2

beq1:

        # Compare r0 with itself.

        # Always true, so branch likely.

        movi 1, r0

        beq/l r0, r0, tr0

        # We should branch over this.

        fail

beq2:

        # Ensure high order bits are compared, too.

        movi 1, r0

        shlli r0, 35, r0

        addi r0, 10, r0

        movi 1, r1

        shlli r1, 35, r1

        addi r1, 10, r1

        beq r0, r1, tr1

        # We should branch over this, too.

        fail

beq3:

        movi 1, r0

        shlli r0, 35, r0

        addi r0, 10, r0

        movi 2, r1

        shlli r1, 35, r1

        addi r1, 9, r1

        # Unlikely we'll branch!

        beq/u r0, r1, tr2

        # We should proceed to pass here.

okay:

        pass

wrong:

        fail