90 lines
1.4 KiB
ArmAsm
90 lines
1.4 KiB
ArmAsm
# sh testcase for prnd
|
|
# mach: shdsp
|
|
# as(shdsp): -defsym sim_cpu=1 -dsp
|
|
|
|
# FIXME: opcode table ambiguity in ignored bits 4-7.
|
|
|
|
.include "testutils.inc"
|
|
|
|
start
|
|
set_grs_a5a5
|
|
lds r0, a0
|
|
pcopy a0, a1
|
|
lds r0, x0
|
|
lds r0, x1
|
|
lds r0, y0
|
|
lds r0, y1
|
|
pcopy x0, m0
|
|
pcopy y1, m1
|
|
|
|
# prnd(0xa5a5a5a5) = 0xa5a60000
|
|
prnd x0, x0
|
|
prnd y0, y0
|
|
assert_sreg 0xa5a60000, x0
|
|
assert_sreg 0xa5a60000, y0
|
|
|
|
# prnd(1) = 1
|
|
mov #1, r0
|
|
shll16 r0
|
|
lds r0, x0
|
|
pcopy x0, y0
|
|
prnd x0, x0
|
|
prnd y0, y0
|
|
assert_sreg 0x10000, x0
|
|
assert_sreg 0x10000, y0
|
|
|
|
# prnd(1.4999999) = 1
|
|
mov #1, r0
|
|
shll8 r0
|
|
or #0x7f, r0
|
|
shll8 r0
|
|
or #0xff, r0
|
|
lds r0, x0
|
|
pcopy x0, y0
|
|
prnd x0, x0
|
|
prnd y0, y0
|
|
assert_sreg 0x10000, x0
|
|
assert_sreg 0x10000, y0
|
|
|
|
# prnd(1.5) = 2
|
|
mov #1, r0
|
|
shll8 r0
|
|
or #0x80, r0
|
|
shll8 r0
|
|
lds r0, x0
|
|
pcopy x0, y0
|
|
prnd x0, x0
|
|
prnd y0, y0
|
|
assert_sreg 0x20000, x0
|
|
assert_sreg 0x20000, y0
|
|
|
|
# dct prnd
|
|
set_dcfalse
|
|
dct prnd x0, x1
|
|
dct prnd y0, y1
|
|
assert_sreg2 0xa5a5a5a5, x1
|
|
assert_sreg2 0xa5a5a5a5, y1
|
|
set_dctrue
|
|
dct prnd x0, x1
|
|
dct prnd y0, y1
|
|
assert_sreg2 0x20000, x1
|
|
assert_sreg2 0x20000, y1
|
|
|
|
# dcf prnd
|
|
set_dctrue
|
|
dcf prnd x0, m0
|
|
dcf prnd y0, m1
|
|
assert_sreg2 0xa5a5a5a5, m0
|
|
assert_sreg2 0xa5a5a5a5, m1
|
|
set_dcfalse
|
|
dcf prnd x0, m0
|
|
dcf prnd y0, m1
|
|
assert_sreg2 0x20000, m0
|
|
assert_sreg2 0x20000, m1
|
|
|
|
set_greg 0xa5a5a5a5, r0
|
|
test_grs_a5a5
|
|
assert_sreg 0xa5a5a5a5, a0
|
|
assert_sreg2 0xa5a5a5a5, a1
|
|
pass
|
|
exit 0
|