43 lines
508 B
ArmAsm
43 lines
508 B
ArmAsm
|
# 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
|