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 fsqrt.s $frgh, $frf -*- Asm -*-
|
# sh testcase for fsqrt.s $frgh, $frf -*- Asm -*-
|
# mach: all
|
# mach: all
|
# as: -isa=shmedia
|
# as: -isa=shmedia
|
# ld: -m shelf64
|
# ld: -m shelf64
|
|
|
.include "media/testutils.inc"
|
.include "media/testutils.inc"
|
|
|
start
|
start
|
init:
|
init:
|
pta wrong, tr0
|
pta wrong, tr0
|
movi 9, r0
|
movi 9, r0
|
fmov.ls r0, fr7
|
fmov.ls r0, fr7
|
float.ls fr7, fr0
|
float.ls fr7, fr0
|
movi 3, r1
|
movi 3, r1
|
fmov.ls r1, fr7
|
fmov.ls r1, fr7
|
float.ls fr7, fr2
|
float.ls fr7, fr2
|
|
|
fsqrts:
|
fsqrts:
|
fsqrt.s fr0, fr1
|
fsqrt.s fr0, fr1
|
fcmpeq.s fr1, fr2, r7
|
fcmpeq.s fr1, fr2, r7
|
bnei r7, 1, tr0
|
bnei r7, 1, tr0
|
|
|
okay:
|
okay:
|
pass
|
pass
|
|
|
wrong:
|
wrong:
|
fail
|
fail
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.