URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [rotcr.cgs] - Rev 157
Compare with Previous | Blame | View Log
# sh testcase for rotcr $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
.include "compact/testutils.inc"
start
.global rotcr
rotcr:
clrt
mov #1, r1
rotcr r1
bf wrong
assert r1, #0
sett
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
assert r1, #1
rotcr r1
bf wrong
trotcr:
sett
mov #1, r1
rotcr r1
bf wrong
sett
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
rotcr r1
bf wrong
assert r1, #1
rotcr r1
bf wrong
rotcr r1
okay:
pass
wrong:
fail