URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh/] [shlr.s] - Rev 450
Go to most recent revision | 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
Go to most recent revision | Compare with Previous | Blame | View Log