# mips test sanity, expected to pass.
|
# mips test sanity, expected to pass.
|
# mach: sb1
|
# mach: sb1
|
# as: -mabi=eabi
|
# as: -mabi=eabi
|
# ld: -N -Ttext=0x80010000
|
# ld: -N -Ttext=0x80010000
|
# output: *\\npass\\n
|
# output: *\\npass\\n
|
|
|
.include "testutils.inc"
|
.include "testutils.inc"
|
|
|
.macro check_ps psval, upperval, lowerval
|
.macro check_ps psval, upperval, lowerval
|
.set push
|
.set push
|
.set noreorder
|
.set noreorder
|
cvt.s.pu $f0, \psval # upper
|
cvt.s.pu $f0, \psval # upper
|
cvt.s.pl $f2, \psval # lower
|
cvt.s.pl $f2, \psval # lower
|
li.s $f4, \upperval
|
li.s $f4, \upperval
|
li.s $f6, \lowerval
|
li.s $f6, \lowerval
|
c.eq.s $fcc0, $f0, $f4
|
c.eq.s $fcc0, $f0, $f4
|
bc1f $fcc0, _fail
|
bc1f $fcc0, _fail
|
c.eq.s $fcc0, $f2, $f6
|
c.eq.s $fcc0, $f2, $f6
|
bc1f $fcc0, _fail
|
bc1f $fcc0, _fail
|
nop
|
nop
|
.set pop
|
.set pop
|
.endm
|
.endm
|
|
|
setup
|
setup
|
|
|
.set noreorder
|
.set noreorder
|
|
|
.ent DIAG
|
.ent DIAG
|
DIAG:
|
DIAG:
|
|
|
# make sure that Status.FR, .CU1, and .SBX are set.
|
# make sure that Status.FR, .CU1, and .SBX are set.
|
mfc0 $2, $12
|
mfc0 $2, $12
|
or $2, $2, (1 << 26) | (1 << 29) | (1 << 16)
|
or $2, $2, (1 << 26) | (1 << 29) | (1 << 16)
|
mtc0 $2, $12
|
mtc0 $2, $12
|
|
|
|
|
li.s $f10, 4.0
|
li.s $f10, 4.0
|
li.s $f12, 16.0
|
li.s $f12, 16.0
|
cvt.ps.s $f20, $f10, $f12 # $f20: u=4.0, l=16.0
|
cvt.ps.s $f20, $f10, $f12 # $f20: u=4.0, l=16.0
|
|
|
li.s $f10, -1.0
|
li.s $f10, -1.0
|
li.s $f12, 2.0
|
li.s $f12, 2.0
|
cvt.ps.s $f22, $f10, $f12 # $f22: u=-1.0, l=2.0
|
cvt.ps.s $f22, $f10, $f12 # $f22: u=-1.0, l=2.0
|
|
|
|
|
writemsg "div.ps"
|
writemsg "div.ps"
|
|
|
div.ps $f8, $f20, $f22
|
div.ps $f8, $f20, $f22
|
check_ps $f8, -4.0, 8.0
|
check_ps $f8, -4.0, 8.0
|
|
|
|
|
writemsg "recip.ps"
|
writemsg "recip.ps"
|
|
|
recip.ps $f8, $f20
|
recip.ps $f8, $f20
|
check_ps $f8, 0.25, 0.0625
|
check_ps $f8, 0.25, 0.0625
|
|
|
|
|
writemsg "rsqrt.ps"
|
writemsg "rsqrt.ps"
|
|
|
rsqrt.ps $f8, $f20
|
rsqrt.ps $f8, $f20
|
check_ps $f8, 0.5, 0.25
|
check_ps $f8, 0.5, 0.25
|
|
|
|
|
writemsg "sqrt.ps"
|
writemsg "sqrt.ps"
|
|
|
sqrt.ps $f8, $f20
|
sqrt.ps $f8, $f20
|
check_ps $f8, 2.0, 4.0
|
check_ps $f8, 2.0, 4.0
|
|
|
|
|
pass
|
pass
|
|
|
.end DIAG
|
.end DIAG
|
|
|
