# sh testcase for lds $rn, macl | |
# mach: all | |
# as: -isa=shcompact | |
# ld: -m shelf32 | |
.include "compact/testutils.inc" | |
start | |
.global lds_macl | |
lds_macl: | |
mov #42, r0 | |
shll8 r0 | |
lds r0, macl | |
readback: | |
sts macl, r1 | |
cmp/eq r0, r1 | |
bf wrong | |
okay: | |
pass | |
wrong: | |
fail |