OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [frv/] [branch.pcgs] - Rev 24

Go to most recent revision | Compare with Previous | Blame | View Log

# frv parallel testcase for branching
# mach: fr500 fr550 frv

        .include "testutils.inc"

        start

        .global branch
branch: ; All insns in VLIW execute
        setlos.p        1,gr1
        setlos          0,gr2
        setlos.p        0,gr3
        bra             ok1
        setlos.p        2,gr2
        setlos          3,gr3
        fail
ok1:
        test_gr_immed   1,gr1
        test_gr_immed   0,gr2
        test_gr_immed   0,gr3

        ; 1st branch is taken
        bra.p           ok5
        bra             ok4
        bra.p           ok3
        bra             ok2
        fail
ok2:
        fail
ok3:
        fail
ok4:
        fail
ok5:
        ; 1st true branch is taken
        set_icc         0x4 1
        bne.p           icc1,1,ok6
        blt             icc1,1,ok7
        beq.p           icc1,1,ok9
        ble             icc1,1,ok8
        fail
ok6:
        fail
ok7:
        fail
ok8:
        fail
ok9:
        ; combination of the above
        set_icc         0x4 1
        setlos.p        4,gr4
        setlos.p        0,gr5
        bne.p           icc1,1,oka
        beq             icc1,1,okb
        setlos          5,gr5
        fail
oka:
        fail
okb:
        test_gr_immed   4,gr4
        test_gr_immed   0,gr5

        pass

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.