URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [rotl.cgs] - Rev 816
Go to most recent revision | 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
Go to most recent revision | Compare with Previous | Blame | View Log