OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [cr16/] [sbitb.cgs] - Rev 227

Compare with Previous | Blame | View Log

# cr16 testcase for sbitb $count, reg/regp/mem
# mach:  cr16

        .include "testutils.inc"

        start

        .global sbitb
sbitb:
        sbitb   $0,_y
        loadw   _y, r1
        cmpb    $0xf1, r1
        beq ok1
not_ok:
        fail

ok1:
        movd   $_y, (r1,r0)
        sbitb   $1,0(r1,r0)
        loadw   _y, r1
        cmpb    $0xf3, r1
        beq ok2
        br not_ok
ok2:

        movw   $_y, r1
        sbitb   $2,0(r1)
        loadw   _y, r1
        cmpb    $0xf7, r1
        beq ok3
        br not_ok
ok3:
        pass

_y:     .word   0xf0

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.