URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [sim/] [testsuite/] [sim/] [sh/] [shlr.s] - Rev 842
Compare with Previous | Blame | View Log
# sh testcase for shlr # mach: all # as(sh): -defsym sim_cpu=0 # as(shdsp): -defsym sim_cpu=1 -dsp .include "testutils.inc" start shlr: set_grs_a5a5 mov #0, r0 or #192, r0 shlr r0 assertreg0 96 shlr r0 assertreg0 48 shlr r0 assertreg0 24 shlr r0 assertreg0 12 shlr r0 assertreg0 6 shlr r0 assertreg0 3 # Make sure a bit is shifted into T. shlr r0 bf wrong assertreg0 1 # Ditto. shlr r0 bf wrong assertreg0 0 set_greg 0xa5a5a5a5, r0 test_grs_a5a5 pass exit 0 wrong: fail