URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [tags/] [gnu-src/] [gdb-7.2/] [gdb-7.2-or32-1.0rc1/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [rotl.cgs] - Rev 341
Compare with Previous | Blame | View Log
# sh testcase for rotl $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
.include "compact/testutils.inc"
start
.global rotl
rotl:
mov #1, r1
rotl r1
assert r1, #2
rotl r1
assert r1, #4
rotl r1
assert r1, #8
rotl r1
assert r1, #16
rotl r1
assert r1, #32
rotl r1
assert r1, #64
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
rotl r1
bf wrong
assert r1, #1
rotl r1
rotl r1
rotl r1
assert r1, #8
okay:
pass
wrong:
fail