| #include "macros.inc" |
| |
| test_suite fp0_conv |
| |
| #if XCHAL_HAVE_FP |
| |
| .macro movfp fr, v |
| movi a2, \v |
| wfr \fr, a2 |
| .endm |
| |
| .macro test_ftoi_ex op, r0, fr0, v, c, r |
| movi a2, 0 |
| wur a2, fsr |
| movfp \fr0, \v |
| \op \r0, \fr0, \c |
| dump \r0 |
| movi a3, \r |
| assert eq, \r0, a3 |
| rur a2, fsr |
| assert eqi, a2, 0 |
| .endm |
| |
| .macro test_ftoi op, r0, fr0, v, c, r |
| movi a2, 0 |
| wur a2, fcr |
| test_ftoi_ex \op, \r0, \fr0, \v, \c, \r |
| movi a2, 0x7c |
| wur a2, fcr |
| test_ftoi_ex \op, \r0, \fr0, \v, \c, \r |
| .endm |
| |
| |
| .macro test_itof_ex op, fr0, ar0, v, c, r |
| movi a2, 0 |
| wur a2, fsr |
| movi \ar0, \v |
| \op \fr0, \ar0, \c |
| |
| rfr a2, \fr0 |
| dump a2 |
| movi a3, \r |
| assert eq, a2, a3 |
| rur a2, fsr |
| assert eqi, a2, 0 |
| .endm |
| |
| .macro test_itof_rm op, fr0, ar0, v, c, rm, r |
| movi a2, \rm |
| wur a2, fcr |
| test_itof_ex \op, \fr0, \ar0, \v, \c, \r |
| movi a2, (\rm) | 0x7c |
| wur a2, fcr |
| test_itof_ex \op, \fr0, \ar0, \v, \c, \r |
| .endm |
| |
| .macro test_itof op, fr0, ar0, v, c, r0, r1, r2, r3 |
| test_itof_rm \op, \fr0, \ar0, \v, \c, 0, \r0 |
| test_itof_rm \op, \fr0, \ar0, \v, \c, 1, \r1 |
| test_itof_rm \op, \fr0, \ar0, \v, \c, 2, \r2 |
| test_itof_rm \op, \fr0, \ar0, \v, \c, 3, \r3 |
| .endm |
| |
| test round_s |
| movi a2, 1 |
| wsr a2, cpenable |
| |
| /* NaN */ |
| test_ftoi round.s, a2, f0, 0xffc00001, 0, 0x7fffffff |
| test_ftoi round.s, a2, f0, 0xff800001, 0, 0x7fffffff |
| |
| /* -inf */ |
| test_ftoi round.s, a2, f0, 0xff800000, 0, 0x80000000 |
| |
| /* negative overflow */ |
| test_ftoi round.s, a2, f0, 0xceffffff, 1, 0x80000000 |
| test_ftoi round.s, a2, f0, 0xcf000000, 0, 0x80000000 |
| test_ftoi round.s, a2, f0, 0xceffffff, 0, 0x80000080 |
| |
| /* negative */ |
| test_ftoi round.s, a2, f0, 0xbfa00000, 1, -2 /* -1.25 * 2 */ |
| test_ftoi round.s, a2, f0, 0xbfc00000, 0, -2 /* -1.5 */ |
| test_ftoi round.s, a2, f0, 0xbf800000, 1, -2 /* -1 * 2 */ |
| test_ftoi round.s, a2, f0, 0xbf800000, 0, -1 /* -1 */ |
| test_ftoi round.s, a2, f0, 0xbf400000, 0, -1 /* -0.75 */ |
| test_ftoi round.s, a2, f0, 0xbf000000, 0, 0 /* -0.5 */ |
| |
| /* positive */ |
| test_ftoi round.s, a2, f0, 0x3f000000, 0, 0 /* 0.5 */ |
| test_ftoi round.s, a2, f0, 0x3f400000, 0, 1 /* 0.75 */ |
| test_ftoi round.s, a2, f0, 0x3f800000, 0, 1 /* 1 */ |
| test_ftoi round.s, a2, f0, 0x3f800000, 1, 2 /* 1 * 2 */ |
| test_ftoi round.s, a2, f0, 0x3fc00000, 0, 2 /* 1.5 */ |
| test_ftoi round.s, a2, f0, 0x3fa00000, 1, 2 /* 1.25 * 2 */ |
| |
| /* positive overflow */ |
| test_ftoi round.s, a2, f0, 0x4effffff, 0, 0x7fffff80 |
| test_ftoi round.s, a2, f0, 0x4f000000, 0, 0x7fffffff |
| test_ftoi round.s, a2, f0, 0x4effffff, 1, 0x7fffffff |
| |
| /* +inf */ |
| test_ftoi round.s, a2, f0, 0x7f800000, 0, 0x7fffffff |
| |
| /* NaN */ |
| test_ftoi round.s, a2, f0, 0x7f800001, 0, 0x7fffffff |
| test_ftoi round.s, a2, f0, 0x7fc00000, 0, 0x7fffffff |
| test_end |
| |
| test trunc_s |
| /* NaN */ |
| test_ftoi trunc.s, a2, f0, 0xffc00001, 0, 0x7fffffff |
| test_ftoi trunc.s, a2, f0, 0xff800001, 0, 0x7fffffff |
| |
| /* -inf */ |
| test_ftoi trunc.s, a2, f0, 0xff800000, 0, 0x80000000 |
| |
| /* negative overflow */ |
| test_ftoi trunc.s, a2, f0, 0xceffffff, 1, 0x80000000 |
| test_ftoi trunc.s, a2, f0, 0xcf000000, 0, 0x80000000 |
| test_ftoi trunc.s, a2, f0, 0xceffffff, 0, 0x80000080 |
| |
| /* negative */ |
| test_ftoi trunc.s, a2, f0, 0xbfa00000, 1, -2 /* -1.25 * 2 */ |
| test_ftoi trunc.s, a2, f0, 0xbfc00000, 0, -1 /* -1.5 */ |
| test_ftoi trunc.s, a2, f0, 0xbf800000, 1, -2 /* -1 * 2 */ |
| test_ftoi trunc.s, a2, f0, 0xbf800000, 0, -1 /* -1 */ |
| test_ftoi trunc.s, a2, f0, 0xbf400000, 0, 0 /* -0.75 */ |
| test_ftoi trunc.s, a2, f0, 0xbf000000, 0, 0 /* -0.5 */ |
| |
| /* positive */ |
| test_ftoi trunc.s, a2, f0, 0x3f000000, 0, 0 /* 0.5 */ |
| test_ftoi trunc.s, a2, f0, 0x3f400000, 0, 0 /* 0.75 */ |
| test_ftoi trunc.s, a2, f0, 0x3f800000, 0, 1 /* 1 */ |
| test_ftoi trunc.s, a2, f0, 0x3f800000, 1, 2 /* 1 * 2 */ |
| test_ftoi trunc.s, a2, f0, 0x3fc00000, 0, 1 /* 1.5 */ |
| test_ftoi trunc.s, a2, f0, 0x3fa00000, 1, 2 /* 1.25 * 2 */ |
| |
| /* positive overflow */ |
| test_ftoi trunc.s, a2, f0, 0x4effffff, 0, 0x7fffff80 |
| test_ftoi trunc.s, a2, f0, 0x4f000000, 0, 0x7fffffff |
| test_ftoi trunc.s, a2, f0, 0x4effffff, 1, 0x7fffffff |
| |
| /* +inf */ |
| test_ftoi trunc.s, a2, f0, 0x7f800000, 0, 0x7fffffff |
| |
| /* NaN */ |
| test_ftoi trunc.s, a2, f0, 0x7f800001, 0, 0x7fffffff |
| test_ftoi trunc.s, a2, f0, 0x7fc00000, 0, 0x7fffffff |
| test_end |
| |
| test floor_s |
| /* NaN */ |
| test_ftoi floor.s, a2, f0, 0xffc00001, 0, 0x7fffffff |
| test_ftoi floor.s, a2, f0, 0xff800001, 0, 0x7fffffff |
| |
| /* -inf */ |
| test_ftoi floor.s, a2, f0, 0xff800000, 0, 0x80000000 |
| |
| /* negative overflow */ |
| test_ftoi floor.s, a2, f0, 0xceffffff, 1, 0x80000000 |
| test_ftoi floor.s, a2, f0, 0xcf000000, 0, 0x80000000 |
| test_ftoi floor.s, a2, f0, 0xceffffff, 0, 0x80000080 |
| |
| /* negative */ |
| test_ftoi floor.s, a2, f0, 0xbfa00000, 1, -3 /* -1.25 * 2 */ |
| test_ftoi floor.s, a2, f0, 0xbfc00000, 0, -2 /* -1.5 */ |
| test_ftoi floor.s, a2, f0, 0xbf800000, 1, -2 /* -1 * 2 */ |
| test_ftoi floor.s, a2, f0, 0xbf800000, 0, -1 /* -1 */ |
| test_ftoi floor.s, a2, f0, 0xbf400000, 0, -1 /* -0.75 */ |
| test_ftoi floor.s, a2, f0, 0xbf000000, 0, -1 /* -0.5 */ |
| |
| /* positive */ |
| test_ftoi floor.s, a2, f0, 0x3f000000, 0, 0 /* 0.5 */ |
| test_ftoi floor.s, a2, f0, 0x3f400000, 0, 0 /* 0.75 */ |
| test_ftoi floor.s, a2, f0, 0x3f800000, 0, 1 /* 1 */ |
| test_ftoi floor.s, a2, f0, 0x3f800000, 1, 2 /* 1 * 2 */ |
| test_ftoi floor.s, a2, f0, 0x3fc00000, 0, 1 /* 1.5 */ |
| test_ftoi floor.s, a2, f0, 0x3fa00000, 1, 2 /* 1.25 * 2 */ |
| |
| /* positive overflow */ |
| test_ftoi floor.s, a2, f0, 0x4effffff, 0, 0x7fffff80 |
| test_ftoi floor.s, a2, f0, 0x4f000000, 0, 0x7fffffff |
| test_ftoi floor.s, a2, f0, 0x4effffff, 1, 0x7fffffff |
| |
| /* +inf */ |
| test_ftoi floor.s, a2, f0, 0x7f800000, 0, 0x7fffffff |
| |
| /* NaN */ |
| test_ftoi floor.s, a2, f0, 0x7f800001, 0, 0x7fffffff |
| test_ftoi floor.s, a2, f0, 0x7fc00000, 0, 0x7fffffff |
| test_end |
| |
| test ceil_s |
| /* NaN */ |
| test_ftoi ceil.s, a2, f0, 0xffc00001, 0, 0x7fffffff |
| test_ftoi ceil.s, a2, f0, 0xff800001, 0, 0x7fffffff |
| |
| /* -inf */ |
| test_ftoi ceil.s, a2, f0, 0xff800000, 0, 0x80000000 |
| |
| /* negative overflow */ |
| test_ftoi ceil.s, a2, f0, 0xceffffff, 1, 0x80000000 |
| test_ftoi ceil.s, a2, f0, 0xcf000000, 0, 0x80000000 |
| test_ftoi ceil.s, a2, f0, 0xceffffff, 0, 0x80000080 |
| |
| /* negative */ |
| test_ftoi ceil.s, a2, f0, 0xbfa00000, 1, -2 /* -1.25 * 2 */ |
| test_ftoi ceil.s, a2, f0, 0xbfc00000, 0, -1 /* -1.5 */ |
| test_ftoi ceil.s, a2, f0, 0xbf800000, 1, -2 /* -1 * 2 */ |
| test_ftoi ceil.s, a2, f0, 0xbf800000, 0, -1 /* -1 */ |
| test_ftoi ceil.s, a2, f0, 0xbf400000, 0, 0 /* -0.75 */ |
| test_ftoi ceil.s, a2, f0, 0xbf000000, 0, 0 /* -0.5 */ |
| |
| /* positive */ |
| test_ftoi ceil.s, a2, f0, 0x3f000000, 0, 1 /* 0.5 */ |
| test_ftoi ceil.s, a2, f0, 0x3f400000, 0, 1 /* 0.75 */ |
| test_ftoi ceil.s, a2, f0, 0x3f800000, 0, 1 /* 1 */ |
| test_ftoi ceil.s, a2, f0, 0x3f800000, 1, 2 /* 1 * 2 */ |
| test_ftoi ceil.s, a2, f0, 0x3fc00000, 0, 2 /* 1.5 */ |
| test_ftoi ceil.s, a2, f0, 0x3fa00000, 1, 3 /* 1.25 * 2 */ |
| |
| /* positive overflow */ |
| test_ftoi ceil.s, a2, f0, 0x4effffff, 0, 0x7fffff80 |
| test_ftoi ceil.s, a2, f0, 0x4f000000, 0, 0x7fffffff |
| test_ftoi ceil.s, a2, f0, 0x4effffff, 1, 0x7fffffff |
| |
| /* +inf */ |
| test_ftoi ceil.s, a2, f0, 0x7f800000, 0, 0x7fffffff |
| |
| /* NaN */ |
| test_ftoi ceil.s, a2, f0, 0x7f800001, 0, 0x7fffffff |
| test_ftoi ceil.s, a2, f0, 0x7fc00000, 0, 0x7fffffff |
| test_end |
| |
| test utrunc_s |
| /* NaN */ |
| test_ftoi utrunc.s, a2, f0, 0xffc00001, 0, 0xffffffff |
| test_ftoi utrunc.s, a2, f0, 0xff800001, 0, 0xffffffff |
| |
| /* -inf */ |
| test_ftoi utrunc.s, a2, f0, 0xff800000, 0, 0x80000000 |
| |
| /* negative overflow */ |
| test_ftoi utrunc.s, a2, f0, 0xceffffff, 1, 0x80000000 |
| test_ftoi utrunc.s, a2, f0, 0xcf000000, 0, 0x80000000 |
| test_ftoi utrunc.s, a2, f0, 0xceffffff, 0, 0x80000080 |
| |
| /* negative */ |
| test_ftoi utrunc.s, a2, f0, 0xbfa00000, 1, -2 /* -1.25 * 2 */ |
| test_ftoi utrunc.s, a2, f0, 0xbfc00000, 0, -1 /* -1.5 */ |
| test_ftoi utrunc.s, a2, f0, 0xbf800000, 1, -2 /* -1 * 2 */ |
| test_ftoi utrunc.s, a2, f0, 0xbf800000, 0, -1 /* -1 */ |
| test_ftoi utrunc.s, a2, f0, 0xbf400000, 0, 0 /* -0.75 */ |
| test_ftoi utrunc.s, a2, f0, 0xbf000000, 0, 0 /* -0.5 */ |
| |
| /* positive */ |
| test_ftoi utrunc.s, a2, f0, 0x3f000000, 0, 0 /* 0.5 */ |
| test_ftoi utrunc.s, a2, f0, 0x3f400000, 0, 0 /* 0.75 */ |
| test_ftoi utrunc.s, a2, f0, 0x3f800000, 0, 1 /* 1 */ |
| test_ftoi utrunc.s, a2, f0, 0x3f800000, 1, 2 /* 1 * 2 */ |
| test_ftoi utrunc.s, a2, f0, 0x3fc00000, 0, 1 /* 1.5 */ |
| test_ftoi utrunc.s, a2, f0, 0x3fa00000, 1, 2 /* 1.25 * 2 */ |
| |
| /* positive overflow */ |
| test_ftoi utrunc.s, a2, f0, 0x4effffff, 0, 0x7fffff80 |
| test_ftoi utrunc.s, a2, f0, 0x4f000000, 0, 0x80000000 |
| test_ftoi utrunc.s, a2, f0, 0x4effffff, 1, 0xffffff00 |
| test_ftoi utrunc.s, a2, f0, 0x4f800000, 1, 0xffffffff |
| |
| /* +inf */ |
| test_ftoi utrunc.s, a2, f0, 0x7f800000, 0, 0xffffffff |
| |
| /* NaN */ |
| test_ftoi utrunc.s, a2, f0, 0x7f800001, 0, 0xffffffff |
| test_ftoi utrunc.s, a2, f0, 0x7fc00000, 0, 0xffffffff |
| test_end |
| |
| test float_s |
| test_itof float.s, f0, a2, -1, 0, \ |
| 0xbf800000, 0xbf800000, 0xbf800000, 0xbf800000 |
| test_itof float.s, f0, a2, 0, 0, 0, 0, 0, 0 |
| test_itof float.s, f0, a2, 1, 1, \ |
| 0x3f000000, 0x3f000000, 0x3f000000, 0x3f000000 |
| test_itof float.s, f0, a2, 1, 0, \ |
| 0x3f800000, 0x3f800000, 0x3f800000, 0x3f800000 |
| test_itof float.s, f0, a2, 0x7fffffff, 0, \ |
| 0x4f000000, 0x4effffff, 0x4f000000, 0x4effffff |
| test_end |
| |
| test ufloat_s |
| test_itof ufloat.s, f0, a2, 0, 0, 0, 0, 0, 0 |
| test_itof ufloat.s, f0, a2, 1, 1, \ |
| 0x3f000000, 0x3f000000, 0x3f000000, 0x3f000000 |
| test_itof ufloat.s, f0, a2, 1, 0, \ |
| 0x3f800000, 0x3f800000, 0x3f800000, 0x3f800000 |
| test_itof ufloat.s, f0, a2, 0x7fffffff, 0, \ |
| 0x4f000000, 0x4effffff, 0x4f000000, 0x4effffff |
| test_itof ufloat.s, f0, a2, 0xffffffff, 0, \ |
| 0x4f800000, 0x4f7fffff, 0x4f800000, 0x4f7fffff |
| test_end |
| |
| #endif |
| |
| test_suite_end |
