URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 24 |
Rev 33 |
# sh testcase for fipr $fvm, $fvn
|
# sh testcase for fipr $fvm, $fvn
|
# mach: all
|
# mach: all
|
# as: -isa=shcompact
|
# as: -isa=shcompact
|
# ld: -m shelf32
|
# ld: -m shelf32
|
|
|
.include "compact/testutils.inc"
|
.include "compact/testutils.inc"
|
|
|
start
|
start
|
initv1:
|
initv1:
|
fldi1 fr0
|
fldi1 fr0
|
# Load 2 into fr2.
|
# Load 2 into fr2.
|
fldi1 fr1
|
fldi1 fr1
|
fadd fr1, fr1
|
fadd fr1, fr1
|
# Load 4 into fr2.
|
# Load 4 into fr2.
|
fldi1 fr2
|
fldi1 fr2
|
fadd fr2, fr2
|
fadd fr2, fr2
|
fadd fr2, fr2
|
fadd fr2, fr2
|
fldi0 fr3
|
fldi0 fr3
|
|
|
initv2:
|
initv2:
|
fldi1 fr8
|
fldi1 fr8
|
fldi0 fr9
|
fldi0 fr9
|
fldi1 fr10
|
fldi1 fr10
|
fldi0 fr11
|
fldi0 fr11
|
|
|
fipr fv0, fv8
|
fipr fv0, fv8
|
|
|
# Result will be in fr11.
|
# Result will be in fr11.
|
fldi1 fr0
|
fldi1 fr0
|
fldi1 fr1
|
fldi1 fr1
|
# Two.
|
# Two.
|
fadd fr1, fr0
|
fadd fr1, fr0
|
# Four.
|
# Four.
|
fadd fr0, fr0
|
fadd fr0, fr0
|
# Five.
|
# Five.
|
fadd fr1, fr0
|
fadd fr1, fr0
|
fcmp/eq fr0, fr11
|
fcmp/eq fr0, fr11
|
bf wrong
|
bf wrong
|
|
|
okay:
|
okay:
|
pass
|
pass
|
|
|
wrong:
|
wrong:
|
fail
|
fail
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.