| /* | 
 |  * Copyright (c) 2016 The University of Virginia | 
 |  * All rights reserved. | 
 |  * | 
 |  * Redistribution and use in source and binary forms, with or without | 
 |  * modification, are permitted provided that the following conditions are | 
 |  * met: redistributions of source code must retain the above copyright | 
 |  * notice, this list of conditions and the following disclaimer; | 
 |  * redistributions in binary form must reproduce the above copyright | 
 |  * notice, this list of conditions and the following disclaimer in the | 
 |  * documentation and/or other materials provided with the distribution; | 
 |  * neither the name of the copyright holders nor the names of its | 
 |  * contributors may be used to endorse or promote products derived from | 
 |  * this software without specific prior written permission. | 
 |  * | 
 |  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS | 
 |  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT | 
 |  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR | 
 |  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT | 
 |  * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, | 
 |  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT | 
 |  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | 
 |  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY | 
 |  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | 
 |  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE | 
 |  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | 
 |  * | 
 |  * Authors: Alec Roelke | 
 |  */ | 
 |  | 
 | #include <cstdint> | 
 | #include <limits> | 
 |  | 
 | #include "insttest.h" | 
 | #include "rv64f.h" | 
 |  | 
 | int main() | 
 | { | 
 |     using namespace std; | 
 |     using namespace insttest; | 
 |  | 
 |     // FLAGS | 
 |     expect<uint64_t>(0, []{ | 
 |             F::fsflags(0); | 
 |             return F::frflags(); | 
 |         }, "clear fsflags"); | 
 |  | 
 |     // Memory | 
 |     expect<float>(3.14, []{return F::load(3.14);}, "flw"); | 
 |     expect<float>(1.816, []{return F::store(1.816);}, "fsw"); | 
 |  | 
 |     // FMADD.S | 
 |     expect<float>(7.11624, []{return F::fmadd_s(3.14, 1.816, 1.414);}, | 
 |             "fmadd.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmadd_s(numeric_limits<float>::quiet_NaN(), 3.14, | 
 |                     1.816); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmadd.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmadd_s(3.14, numeric_limits<float>::signaling_NaN(), | 
 |                     1.816); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmadd.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fmadd_s(3.14, numeric_limits<float>::infinity(), | 
 |                     1.414);}, | 
 |             "fmadd.s, infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fmadd_s(3.14, -numeric_limits<float>::infinity(), | 
 |                     1.414);}, | 
 |             "fmadd.s, -infinity"); | 
 |  | 
 |     // FMSUB.S | 
 |     expect<float>(4.28824, []{return F::fmsub_s(3.14, 1.816, 1.414);}, | 
 |             "fmsub.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmsub_s(3.14, numeric_limits<float>::quiet_NaN(), | 
 |                     1.816); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmsub.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmsub_s(3.14, 1.816, | 
 |                     numeric_limits<float>::signaling_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmsub.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fmsub_s(numeric_limits<float>::infinity(), 1.816, | 
 |                     1.414);}, | 
 |             "fmsub.s, infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fmsub_s(3.14, -numeric_limits<float>::infinity(), | 
 |                     1.414);}, | 
 |             "fmsub.s, -infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fmsub_s(3.14, 1.816, | 
 |                     numeric_limits<float>::infinity());}, | 
 |             "fmsub.s, subtract infinity"); | 
 |  | 
 |     // FNMSUB.S | 
 |     expect<float>(-4.28824, []{return F::fnmsub_s(3.14, 1.816, 1.414);}, | 
 |             "fnmsub.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fnmsub_s(3.14, 1.816, | 
 |                     numeric_limits<float>::quiet_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fnmsub.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fnmsub_s(numeric_limits<float>::signaling_NaN(), | 
 |                     1.816, 1.414); | 
 |             return F::isquietnan(fd); | 
 |         }, "fnmsub.s, signaling NaN"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fnmsub_s(numeric_limits<float>::infinity(), | 
 |                     1.816, 1.414);}, | 
 |             "fnmsub.s, infinity"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fnmsub_s(3.14, -numeric_limits<float>::infinity(), | 
 |                     1.414);}, | 
 |             "fnmsub.s, -infinity"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fnmsub_s(3.14, 1.816, | 
 |                     numeric_limits<float>::infinity());}, | 
 |             "fnmsub.s, subtract infinity"); | 
 |  | 
 |     // FNMADD.S | 
 |     expect<float>(-7.11624, []{return F::fnmadd_s(3.14, 1.816, 1.414);}, | 
 |             "fnmadd.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fnmadd_s(numeric_limits<float>::quiet_NaN(), 3.14, | 
 |                     1.816); | 
 |             return F::isquietnan(fd); | 
 |         }, "fnmadd.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fnmadd_s(3.14,numeric_limits<float>::signaling_NaN(), | 
 |                     1.816); | 
 |             return F::isquietnan(fd); | 
 |         }, "fnmadd.s, signaling NaN"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fnmadd_s(3.14, numeric_limits<float>::infinity(), | 
 |                     1.414);}, | 
 |             "fnmadd.s, infinity"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fnmadd_s(3.14, -numeric_limits<float>::infinity(), | 
 |                     1.414);}, | 
 |             "fnmadd.s, -infinity"); | 
 |  | 
 |     // FADD.S | 
 |     expect<float>(4.554, []{return F::fadd_s(3.14, 1.414);}, "fadd.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fadd_s(numeric_limits<float>::quiet_NaN(), 1.414); | 
 |             return F::isquietnan(fd); | 
 |         }, "fadd.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fadd_s(3.14, numeric_limits<float>::signaling_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fadd.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fadd_s(3.14, numeric_limits<float>::infinity());}, | 
 |             "fadd.s, infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fadd_s(-numeric_limits<float>::infinity(), 1.816);}, | 
 |             "fadd.s, -infinity"); | 
 |  | 
 |     // FSUB.S | 
 |     expect<float>(F::number(0xbfdced92), []{return F::fsub_s(1.414, 3.14);}, | 
 |             "fsub.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsub_s(numeric_limits<float>::quiet_NaN(), 1.414); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsub.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsub_s(3.14, numeric_limits<float>::signaling_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsub.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fsub_s(numeric_limits<float>::infinity(), 3.14);}, | 
 |             "fsub.s, infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fsub_s(-numeric_limits<float>::infinity(), 3.14);}, | 
 |             "fsub.s, -infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fsub_s(1.414, numeric_limits<float>::infinity());}, | 
 |             "fsub.s, subtract infinity"); | 
 |  | 
 |     // FMUL.S | 
 |     expect<float>(F::number(0x4024573b), []{return F::fmul_s(1.816, 1.414);}, | 
 |             "fmul.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmul_s(numeric_limits<float>::quiet_NaN(), 1.414); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmul.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmul_s(1.816, | 
 |                     numeric_limits<float>::signaling_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmul.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fmul_s(numeric_limits<float>::infinity(), 2.718);}, | 
 |             "fmul.s, infinity"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fmul_s(2.5966, -numeric_limits<float>::infinity());}, | 
 |             "fmul.s, -infinity"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmul_s(0.0, numeric_limits<float>::infinity()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmul.s, 0*infinity"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fmul_s(numeric_limits<float>::max(), 2.0);}, | 
 |             "fmul.s, overflow"); | 
 |     expect<float>(0.0, | 
 |             []{return F::fmul_s(numeric_limits<float>::min(), | 
 |                     numeric_limits<float>::min());}, | 
 |             "fmul.s, underflow"); | 
 |  | 
 |     // FDIV.S | 
 |     expect<float>(2.5, []{return F::fdiv_s(10.0, 4.0);}, "fdiv.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fdiv_s(numeric_limits<float>::quiet_NaN(), 4.0); | 
 |             return F::isquietnan(fd); | 
 |         }, "fdiv.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fdiv_s(10.0, numeric_limits<float>::signaling_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fdiv.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |         []{return F::fdiv_s(10.0, 0.0);}, "fdiv.s/0"); | 
 |     expect<float>(0.0, | 
 |         []{return F::fdiv_s(10.0, numeric_limits<float>::infinity());}, | 
 |         "fdiv.s/infinity"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fdiv_s(numeric_limits<float>::infinity(), | 
 |                     numeric_limits<float>::infinity()); | 
 |             return F::isquietnan(fd); | 
 |             }, "fdiv.s, infinity/infinity"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fdiv_s(0.0, 0.0); | 
 |             return F::isquietnan(fd); | 
 |         }, "fdiv.s, 0/0"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |         []{return F::fdiv_s(numeric_limits<float>::infinity(), 0.0);}, | 
 |         "fdiv.s, infinity/0"); | 
 |     expect<float>(0.0, | 
 |         []{return F::fdiv_s(0.0, numeric_limits<float>::infinity());}, | 
 |         "fdiv.s, 0/infinity"); | 
 |     expect<float>(0.0, | 
 |             []{return F::fdiv_s(numeric_limits<float>::min(), | 
 |                     numeric_limits<float>::max());}, | 
 |             "fdiv.s, underflow"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fdiv_s(numeric_limits<float>::max(), | 
 |                     numeric_limits<float>::min());}, | 
 |             "fdiv.s, overflow"); | 
 |  | 
 |     // FSQRT.S | 
 |     expect<float>(0.3, []{return F::fsqrt_s(0.09);}, "fsqrt.s"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsqrt_s(-1.0); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsqrt.s, NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsqrt_s(numeric_limits<float>::quiet_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsqrt.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsqrt_s(numeric_limits<float>::signaling_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsqrt.s, signaling NaN"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fsqrt_s(numeric_limits<float>::infinity());}, | 
 |             "fsqrt.s, infinity"); | 
 |  | 
 |     // FSGNJ.S | 
 |     expect<float>(1.0, []{return F::fsgnj_s(1.0, 25.0);}, "fsgnj.s, ++"); | 
 |     expect<float>(-1.0, []{return F::fsgnj_s(1.0, -25.0);}, "fsgnj.s, +-"); | 
 |     expect<float>(1.0, []{return F::fsgnj_s(-1.0, 25.0);}, "fsgnj.s, -+"); | 
 |     expect<float>(-1.0, []{return F::fsgnj_s(-1.0, -25.0);}, "fsgnj.s, --"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsgnj_s(numeric_limits<float>::quiet_NaN(), -4.0); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsgnj.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsgnj_s(numeric_limits<float>::signaling_NaN(), | 
 |                     -4.0); | 
 |             return F::issignalingnan(fd); | 
 |         }, "fsgnj.s, signaling NaN"); | 
 |     expect<float>(4.0, []{return F::fsgnj_s(4.0, | 
 |                 numeric_limits<float>::quiet_NaN());}, "fsgnj.s, inject NaN"); | 
 |     expect<float>(-4.0, | 
 |             []{return F::fsgnj_s(4.0, -numeric_limits<float>::quiet_NaN());}, | 
 |             "fsgnj.s, inject -NaN"); | 
 |  | 
 |     // FSGNJN.S | 
 |     expect<float>(-1.0, []{return F::fsgnjn_s(1.0, 25.0);}, "fsgnjn.s, ++"); | 
 |     expect<float>(1.0, []{return F::fsgnjn_s(1.0, -25.0);}, "fsgnjn.s, +-"); | 
 |     expect<float>(-1.0, []{return F::fsgnjn_s(-1.0, 25.0);}, "fsgnjn.s, -+"); | 
 |     expect<float>(1.0, []{return F::fsgnjn_s(-1.0, -25.0);}, "fsgnjn.s, --"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsgnjn_s(numeric_limits<float>::quiet_NaN(), -4.0); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsgnjn.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsgnjn_s(numeric_limits<float>::signaling_NaN(), | 
 |                     -4.0); | 
 |             return F::issignalingnan(fd); | 
 |         }, "fsgnjn.s, signaling NaN"); | 
 |     expect<float>(-4.0, | 
 |             []{return F::fsgnjn_s(4.0, numeric_limits<float>::quiet_NaN());}, | 
 |             "fsgnjn.s, inject NaN"); | 
 |     expect<float>(4.0, | 
 |             []{return F::fsgnjn_s(4.0, -numeric_limits<float>::quiet_NaN());}, | 
 |             "fsgnjn.s, inject NaN"); | 
 |  | 
 |     // FSGNJX.S | 
 |     expect<float>(1.0, []{return F::fsgnjx_s(1.0, 25.0);}, "fsgnjx.s, ++"); | 
 |     expect<float>(-1.0, []{return F::fsgnjx_s(1.0, -25.0);}, "fsgnjx.s, +-"); | 
 |     expect<float>(-1.0, []{return F::fsgnjx_s(-1.0, 25.0);}, "fsgnjx.s, -+"); | 
 |     expect<float>(1.0, []{return F::fsgnjx_s(-1.0, -25.0);}, "fsgnjx.s, --"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsgnjx_s(numeric_limits<float>::quiet_NaN(), -4.0); | 
 |             return F::isquietnan(fd); | 
 |         }, "fsgnjx.s, quiet NaN"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fsgnjx_s(numeric_limits<float>::signaling_NaN(), | 
 |                     -4.0); | 
 |             return F::issignalingnan(fd); | 
 |         }, "fsgnjx.s, signaling NaN"); | 
 |     expect<float>(4.0, | 
 |             []{return F::fsgnjx_s(4.0, numeric_limits<float>::quiet_NaN());}, | 
 |             "fsgnjx.s, inject NaN"); | 
 |     expect<float>(-4.0, | 
 |             []{return F::fsgnjx_s(4.0, -numeric_limits<float>::quiet_NaN());}, | 
 |             "fsgnjx.s, inject -NaN"); | 
 |  | 
 |     // FMIN.S | 
 |     expect<float>(2.718, []{return F::fmin_s(3.14, 2.718);}, "fmin.s"); | 
 |     expect<float>(-numeric_limits<float>::infinity(), | 
 |             []{return F::fmin_s(-numeric_limits<float>::infinity(), | 
 |                     numeric_limits<float>::min());}, | 
 |             "fmin.s, -infinity"); | 
 |     expect<float>(numeric_limits<float>::max(), | 
 |             []{return F::fmin_s(numeric_limits<float>::infinity(), | 
 |                     numeric_limits<float>::max());}, | 
 |             "fmin.s, infinity"); | 
 |     expect<float>(-1.414, | 
 |             []{return F::fmin_s(numeric_limits<float>::quiet_NaN(), -1.414);}, | 
 |             "fmin.s, quiet NaN first"); | 
 |     expect<float>(2.718, | 
 |             []{return F::fmin_s(2.718, numeric_limits<float>::quiet_NaN());}, | 
 |             "fmin.s, quiet NaN second"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmin_s(numeric_limits<float>::quiet_NaN(), | 
 |                     numeric_limits<float>::quiet_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmin.s, quiet NaN both"); | 
 |     expect<float>(3.14, | 
 |             []{return F::fmin_s(numeric_limits<float>::signaling_NaN(), | 
 |                     3.14);}, | 
 |             "fmin.s, signaling NaN first"); | 
 |     expect<float>(1.816, | 
 |             []{return F::fmin_s(1.816, | 
 |                     numeric_limits<float>::signaling_NaN());}, | 
 |             "fmin.s, signaling NaN second"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmin_s(numeric_limits<float>::signaling_NaN(), | 
 |                     numeric_limits<float>::signaling_NaN()); | 
 |             return F::issignalingnan(fd); | 
 |         }, "fmin.s, signaling NaN both"); | 
 |  | 
 |     // FMAX.S | 
 |     expect<float>(3.14, []{return F::fmax_s(3.14, 2.718);}, "fmax.s"); | 
 |     expect<float>(numeric_limits<float>::min(), | 
 |             []{return F::fmax_s(-numeric_limits<float>::infinity(), | 
 |                     numeric_limits<float>::min());}, | 
 |             "fmax.s, -infinity"); | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fmax_s(numeric_limits<float>::infinity(), | 
 |                     numeric_limits<float>::max());}, | 
 |             "fmax.s, infinity"); | 
 |     expect<float>(-1.414, | 
 |             []{return F::fmax_s(numeric_limits<float>::quiet_NaN(), -1.414);}, | 
 |             "fmax.s, quiet NaN first"); | 
 |     expect<float>(2.718, | 
 |             []{return F::fmax_s(2.718, numeric_limits<float>::quiet_NaN());}, | 
 |             "fmax.s, quiet NaN second"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmax_s(numeric_limits<float>::quiet_NaN(), | 
 |                     numeric_limits<float>::quiet_NaN()); | 
 |             return F::isquietnan(fd); | 
 |         }, "fmax.s, quiet NaN both"); | 
 |     expect<float>(3.14, | 
 |             []{return F::fmax_s(numeric_limits<float>::signaling_NaN(), | 
 |                     3.14);}, | 
 |             "fmax.s, signaling NaN first"); | 
 |     expect<float>(1.816, []{return F::fmax_s(1.816, | 
 |                 numeric_limits<float>::signaling_NaN());}, | 
 |             "fmax.s, signaling NaN second"); | 
 |     expect<bool>(true, []{ | 
 |             float fd = F::fmax_s(numeric_limits<float>::signaling_NaN(), | 
 |                     numeric_limits<float>::signaling_NaN()); | 
 |             return F::issignalingnan(fd); | 
 |         }, "fmax.s, signaling NaN both"); | 
 |  | 
 |     // FCVT.W.S | 
 |     expect<int64_t>(256, []{return F::fcvt_w_s(256.3);}, | 
 |             "fcvt.w.s, truncate positive"); | 
 |     expect<int64_t>(-256, []{return F::fcvt_w_s(-256.2);}, | 
 |             "fcvt.w.s, truncate negative"); | 
 |     expect<int64_t>(0, []{return F::fcvt_w_s(0.0);}, "fcvt.w.s, 0.0"); | 
 |     expect<int64_t>(0, []{return F::fcvt_w_s(-0.0);}, "fcvt.w.s, -0.0"); | 
 |     expect<int64_t>(numeric_limits<int32_t>::max(), | 
 |             []{return F::fcvt_w_s(numeric_limits<float>::max());}, | 
 |             "fcvt.w.s, overflow"); | 
 |     expect<int64_t>(0, []{return F::fcvt_w_s(numeric_limits<float>::min());}, | 
 |             "fcvt.w.s, underflow"); | 
 |     expect<int64_t>(numeric_limits<int32_t>::max(), | 
 |             []{return F::fcvt_w_s(numeric_limits<float>::infinity());}, | 
 |             "fcvt.w.s, infinity"); | 
 |     expect<int64_t>(numeric_limits<int32_t>::min(), | 
 |             []{return F::fcvt_w_s(-numeric_limits<float>::infinity());}, | 
 |             "fcvt.w.s, -infinity"); | 
 |     expect<int64_t>(numeric_limits<int32_t>::max(), | 
 |             []{return F::fcvt_w_s(numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.w.s, quiet NaN"); | 
 |     expect<int64_t>(numeric_limits<int32_t>::max(), | 
 |             []{return F::fcvt_w_s(-numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.w.s, quiet -NaN"); | 
 |     expect<int64_t>(numeric_limits<int32_t>::max(), | 
 |             []{return F::fcvt_w_s(numeric_limits<float>::signaling_NaN());}, | 
 |             "fcvt.w.s, signaling NaN"); | 
 |  | 
 |     // FCVT.WU.S | 
 |     expect<uint64_t>(256, []{return F::fcvt_wu_s(256.3);}, | 
 |             "fcvt.wu.s, truncate positive"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_wu_s(-256.2);}, | 
 |             "fcvt.wu.s, truncate negative"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_wu_s(0.0);}, "fcvt.wu.s, 0.0"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_wu_s(-0.0);}, "fcvt.wu.s, -0.0"); | 
 |     expect<uint64_t>(numeric_limits<uint64_t>::max(), | 
 |             []{return F::fcvt_wu_s(numeric_limits<float>::max());}, | 
 |             "fcvt.wu.s, overflow"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_wu_s(numeric_limits<float>::min());}, | 
 |             "fcvt.wu.s, underflow"); | 
 |     expect<uint64_t>(numeric_limits<uint64_t>::max(), | 
 |             []{return F::fcvt_wu_s(numeric_limits<float>::infinity());}, | 
 |             "fcvt.wu.s, infinity"); | 
 |     expect<uint64_t>(0, | 
 |             []{return F::fcvt_wu_s(-numeric_limits<float>::infinity());}, | 
 |             "fcvt.wu.s, -infinity"); | 
 |     expect<uint64_t>(0xFFFFFFFFFFFFFFFFULL, | 
 |             []{return F::fcvt_wu_s(numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.wu.s, quiet NaN"); | 
 |     expect<uint64_t>(0xFFFFFFFFFFFFFFFFULL, | 
 |             []{return F::fcvt_wu_s(-numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.wu.s, quiet -NaN"); | 
 |     expect<uint64_t>(0xFFFFFFFFFFFFFFFFULL, | 
 |             []{return F::fcvt_wu_s(numeric_limits<float>::signaling_NaN());}, | 
 |             "fcvt.wu.s, signaling NaN"); | 
 |  | 
 |     // FMV.X.S | 
 |     expect<uint64_t>(0x000000004048F5C3ULL, []{return F::fmv_x_s(3.14);}, | 
 |             "fmv.x.s, positive"); | 
 |     expect<uint64_t>(0xFFFFFFFFC048F5C3ULL, []{return F::fmv_x_s(-3.14);}, | 
 |             "fmv.x.s, negative"); | 
 |     expect<uint64_t>(0x0000000000000000ULL, []{return F::fmv_x_s(0.0);}, | 
 |             "fmv.x.s, 0.0"); | 
 |     expect<uint64_t>(0xFFFFFFFF80000000ULL, []{return F::fmv_x_s(-0.0);}, | 
 |             "fmv.x.s, -0.0"); | 
 |  | 
 |     // FEQ.S | 
 |     expect<bool>(true, []{return F::feq_s(1.414, 1.414);}, "feq.s, equal"); | 
 |     expect<bool>(false, []{return F::feq_s(2.718, 1.816);}, | 
 |             "feq.s, not equal"); | 
 |     expect<bool>(true, []{return F::feq_s(0.0, -0.0);}, "feq.s, 0 == -0"); | 
 |     expect<bool>(false, | 
 |             []{return F::feq_s(numeric_limits<float>::quiet_NaN(), -1.0);}, | 
 |             "feq.s, quiet NaN first"); | 
 |     expect<bool>(false, | 
 |             []{return F::feq_s(2.0, numeric_limits<float>::quiet_NaN());}, | 
 |             "feq.s, quiet NaN second"); | 
 |     expect<bool>(false, | 
 |             []{return F::feq_s(numeric_limits<float>::quiet_NaN(), | 
 |                     numeric_limits<float>::quiet_NaN());}, | 
 |             "feq.s, quiet NaN both"); | 
 |     expect<bool>(false, | 
 |             []{return F::feq_s(numeric_limits<float>::signaling_NaN(), -1.0);}, | 
 |             "feq.s, signaling NaN first"); | 
 |     expect<bool>(false, | 
 |             []{return F::feq_s(2.0, numeric_limits<float>::signaling_NaN());}, | 
 |             "feq.s, signaling NaN second"); | 
 |     expect<bool>(false, | 
 |             []{return F::feq_s(numeric_limits<float>::signaling_NaN(), | 
 |                     numeric_limits<float>::signaling_NaN());}, | 
 |             "feq.s, signaling NaN both"); | 
 |  | 
 |     // FLT.S | 
 |     expect<bool>(false, []{return F::flt_s(1.414, 1.414);}, "flt.s, equal"); | 
 |     expect<bool>(true, []{return F::flt_s(1.816, 2.718);}, "flt.s, less"); | 
 |     expect<bool>(false, []{return F::flt_s(2.718, 1.816);}, "flt.s, greater"); | 
 |     expect<bool>(false, | 
 |             []{return F::flt_s(numeric_limits<float>::quiet_NaN(), -1.0);}, | 
 |             "flt.s, quiet NaN first"); | 
 |     expect<bool>(false, | 
 |             []{return F::flt_s(2.0, numeric_limits<float>::quiet_NaN());}, | 
 |             "flt.s, quiet NaN second"); | 
 |     expect<bool>(false, | 
 |             []{return F::flt_s(numeric_limits<float>::quiet_NaN(), | 
 |                     numeric_limits<float>::quiet_NaN());}, | 
 |             "flt.s, quiet NaN both"); | 
 |     expect<bool>(false, | 
 |             []{return F::flt_s(numeric_limits<float>::signaling_NaN(), -1.0);}, | 
 |             "flt.s, signaling NaN first"); | 
 |     expect<bool>(false, | 
 |             []{return F::flt_s(2.0, numeric_limits<float>::signaling_NaN());}, | 
 |             "flt.s, signaling NaN second"); | 
 |     expect<bool>(false, | 
 |             []{return F::flt_s(numeric_limits<float>::signaling_NaN(), | 
 |                     numeric_limits<float>::signaling_NaN());}, | 
 |             "flt.s, signaling NaN both"); | 
 |  | 
 |     // FLE.S | 
 |     expect<bool>(true, []{return F::fle_s(1.414, 1.414);}, "fle.s, equal"); | 
 |     expect<bool>(true, []{return F::fle_s(1.816, 2.718);}, "fle.s, less"); | 
 |     expect<bool>(false, []{return F::fle_s(2.718, 1.816);}, "fle.s, greater"); | 
 |     expect<bool>(true, []{return F::fle_s(0.0, -0.0);}, "fle.s, 0 == -0"); | 
 |     expect<bool>(false, | 
 |             []{return F::fle_s(numeric_limits<float>::quiet_NaN(), -1.0);}, | 
 |             "fle.s, quiet NaN first"); | 
 |     expect<bool>(false, | 
 |             []{return F::fle_s(2.0, numeric_limits<float>::quiet_NaN());}, | 
 |             "fle.s, quiet NaN second"); | 
 |     expect<bool>(false, | 
 |             []{return F::fle_s(numeric_limits<float>::quiet_NaN(), | 
 |                     numeric_limits<float>::quiet_NaN());}, | 
 |             "fle.s, quiet NaN both"); | 
 |     expect<bool>(false, | 
 |             []{return F::fle_s(numeric_limits<float>::signaling_NaN(), -1.0);}, | 
 |             "fle.s, signaling NaN first"); | 
 |     expect<bool>(false, | 
 |             []{return F::fle_s(2.0, numeric_limits<float>::signaling_NaN());}, | 
 |             "fle.s, signaling NaN second"); | 
 |     expect<bool>(false, | 
 |             []{return F::fle_s(numeric_limits<float>::signaling_NaN(), | 
 |                     numeric_limits<float>::signaling_NaN());}, | 
 |             "fle.s, signaling NaN both"); | 
 |  | 
 |     // FCLASS.S | 
 |     expect<uint64_t>(0x1, | 
 |             []{return F::fclass_s(-numeric_limits<float>::infinity());}, | 
 |             "fclass.s, -infinity"); | 
 |     expect<uint64_t>(0x2, []{return F::fclass_s(-3.14);}, "fclass.s, -normal"); | 
 |     expect<uint64_t>(0x4, []{return F::fclass_s(F::number(0x807FFFFF));}, | 
 |             "fclass.s, -subnormal"); | 
 |     expect<uint64_t>(0x8, []{return F::fclass_s(-0.0);}, "fclass.s, -0.0"); | 
 |     expect<uint64_t>(0x10, []{return F::fclass_s(0.0);}, "fclass.s, 0.0"); | 
 |     expect<uint64_t>(0x20, []{return F::fclass_s(F::number(0x007FFFFF));}, | 
 |             "fclass.s, subnormal"); | 
 |     expect<uint64_t>(0x40, []{return F::fclass_s(1.816);}, "fclass.s, normal"); | 
 |     expect<uint64_t>(0x80, | 
 |             []{return F::fclass_s(numeric_limits<float>::infinity());}, | 
 |             "fclass.s, infinity"); | 
 |     expect<uint64_t>(0x100, | 
 |             []{return F::fclass_s(numeric_limits<float>::signaling_NaN());}, | 
 |             "fclass.s, signaling NaN"); | 
 |     expect<uint64_t>(0x200, | 
 |             []{return F::fclass_s(numeric_limits<float>::quiet_NaN());}, | 
 |             "fclass.s, quiet NaN"); | 
 |  | 
 |     // FCVT.S.W | 
 |     expect<float>(0.0, []{return F::fcvt_s_w(0);}, "fcvt.s.w, 0"); | 
 |     expect<float>(-2147483648.0, | 
 |             []{return F::fcvt_s_w(numeric_limits<int32_t>::min());}, | 
 |             "fcvt.s.w, negative"); | 
 |     expect<float>(255.0, []{return F::fcvt_s_w(0xFFFFFFFF000000FFLL);}, | 
 |             "fcvt.s.w, truncate"); | 
 |  | 
 |     // FCVT.S.WU | 
 |     expect<float>(0.0, []{return F::fcvt_s_wu(0);}, "fcvt.s.wu, 0"); | 
 |     expect<float>(2147483648.0, | 
 |             []{return F::fcvt_s_wu(numeric_limits<int32_t>::min());}, | 
 |             "fcvt.s.wu"); | 
 |     expect<float>(255.0, []{return F::fcvt_s_wu(0xFFFFFFFF000000FFLL);}, | 
 |             "fcvt.s.wu, truncate"); | 
 |  | 
 |     // FMV.S.X | 
 |     expect<float>(numeric_limits<float>::infinity(), | 
 |             []{return F::fmv_s_x(0x7F800000);}, "fmv.s.x"); | 
 |     expect<float>(-0.0, []{return F::fmv_s_x(0xFFFFFFFF80000000ULL);}, | 
 |             "fmv.s.x, truncate"); | 
 |  | 
 |     // FCSR functions | 
 |     int rm = F::frrm(); | 
 |     expect<uint64_t>(0x7, []{ // FSRM | 
 |             F::fsrm(-1); | 
 |             return F::frrm(); | 
 |         }, "fsrm"); | 
 |     expect<uint64_t>(0x1F, []{ // FSFLAGS | 
 |             F::fsflags(0); | 
 |             F::fsflags(-1); | 
 |             return F::frflags(); | 
 |         }, "fsflags"); | 
 |     expect<uint64_t>(0xFF, []{ // FSCSR | 
 |             F::fsflags(0); | 
 |             F::fsrm(0); | 
 |             F::fscsr(-1); | 
 |             return F::frcsr(); | 
 |         }, "fscsr"); | 
 |     expect<int>(rm << 5, [=]{ | 
 |             F::fscsr(0); | 
 |             F::fsrm(rm); | 
 |             return F::frcsr(); | 
 |         }, "restore initial round mode"); | 
 |  | 
 |     F::fsflags(0); | 
 |  | 
 |     // FCVT.L.S | 
 |     expect<int64_t>(256, []{return F::fcvt_l_s(256.3);}, | 
 |             "fcvt.l.s, truncate positive"); | 
 |     expect<int64_t>(-256, []{return F::fcvt_l_s(-256.2);}, | 
 |             "fcvt.l.s, truncate negative"); | 
 |     expect<int64_t>(0, []{return F::fcvt_l_s(0.0);}, "fcvt.l.s, 0.0"); | 
 |     expect<int64_t>(0, []{return F::fcvt_l_s(-0.0);}, "fcvt.l.s, -0.0"); | 
 |     expect<int64_t>(-8589934592LL, []{return F::fcvt_l_s(-8589934592.0);}, | 
 |             "fcvt.l.s, 32-bit overflow"); | 
 |     expect<int64_t>(numeric_limits<int64_t>::max(), | 
 |             []{return F::fcvt_l_s(numeric_limits<float>::max());}, | 
 |             "fcvt.l.s, overflow"); | 
 |     expect<int64_t>(0, []{return F::fcvt_l_s(numeric_limits<float>::min());}, | 
 |             "fcvt.l.s, underflow"); | 
 |     expect<int64_t>(numeric_limits<int64_t>::max(), | 
 |             []{return F::fcvt_l_s(numeric_limits<float>::infinity());}, | 
 |             "fcvt.l.s, infinity"); | 
 |     expect<int64_t>(numeric_limits<int64_t>::min(), | 
 |             []{return F::fcvt_l_s(-numeric_limits<float>::infinity());}, | 
 |             "fcvt.l.s, -infinity"); | 
 |     expect<int64_t>(numeric_limits<int64_t>::max(), | 
 |             []{return F::fcvt_l_s(numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.l.s, quiet NaN"); | 
 |     expect<int64_t>(numeric_limits<int64_t>::max(), | 
 |             []{return F::fcvt_l_s(-numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.l.s, quiet -NaN"); | 
 |     expect<int64_t>(numeric_limits<int64_t>::max(), | 
 |             []{return F::fcvt_l_s(numeric_limits<float>::signaling_NaN());}, | 
 |             "fcvt.l.s, signaling NaN"); | 
 |  | 
 |     // FCVT.LU.S | 
 |     expect<uint64_t>(256, []{return F::fcvt_lu_s(256.3);}, | 
 |             "fcvt.lu.s, truncate positive"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_lu_s(-256.2);}, | 
 |             "fcvt.lu.s, truncate negative"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_lu_s(0.0);}, "fcvt.lu.s, 0.0"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_lu_s(-0.0);}, "fcvt.lu.s, -0.0"); | 
 |     expect<uint64_t>(8589934592LL, | 
 |             []{return F::fcvt_lu_s(8589934592.0);}, | 
 |             "fcvt.lu.s, 32-bit overflow"); | 
 |     expect<uint64_t>(numeric_limits<uint64_t>::max(), | 
 |             []{return F::fcvt_lu_s(numeric_limits<float>::max());}, | 
 |             "fcvt.lu.s, overflow"); | 
 |     expect<uint64_t>(0, []{return F::fcvt_lu_s(numeric_limits<float>::min());}, | 
 |             "fcvt.lu.s, underflow"); | 
 |     expect<uint64_t>(numeric_limits<uint64_t>::max(), | 
 |             []{return F::fcvt_lu_s(numeric_limits<float>::infinity());}, | 
 |             "fcvt.lu.s, infinity"); | 
 |     expect<uint64_t>(0, | 
 |             []{return F::fcvt_lu_s(-numeric_limits<float>::infinity());}, | 
 |             "fcvt.lu.s, -infinity"); | 
 |     expect<uint64_t>(0xFFFFFFFFFFFFFFFFULL, | 
 |             []{return F::fcvt_lu_s(numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.lu.s, quiet NaN"); | 
 |     expect<uint64_t>(0xFFFFFFFFFFFFFFFFULL, | 
 |             []{return F::fcvt_lu_s(-numeric_limits<float>::quiet_NaN());}, | 
 |             "fcvt.lu.s, quiet -NaN"); | 
 |     expect<uint64_t>(0xFFFFFFFFFFFFFFFFULL, | 
 |             []{return F::fcvt_lu_s(numeric_limits<float>::signaling_NaN());}, | 
 |             "fcvt.lu.s, signaling NaN"); | 
 |  | 
 |     // FCVT.S.L | 
 |     expect<float>(0.0, []{return F::fcvt_s_l(0);}, "fcvt.s.l, 0"); | 
 |     expect<float>(-9.223372e18, | 
 |             []{return F::fcvt_s_l(numeric_limits<int64_t>::min());}, | 
 |             "fcvt.s.l, negative"); | 
 |     expect<float>(-4.29496704e9, []{return F::fcvt_s_l(0xFFFFFFFF000000FFLL);}, | 
 |             "fcvt.s.l, 32-bit truncate"); | 
 |  | 
 |     // FCVT.S.LU | 
 |     expect<float>(0.0, []{return F::fcvt_s_lu(0);}, "fcvt.s.lu, 0"); | 
 |     expect<float>(9.223372e18, | 
 |             []{return F::fcvt_s_lu(numeric_limits<int64_t>::min());}, | 
 |             "fcvt.s.lu"); | 
 |     expect<float>(1.8446744e19, []{return F::fcvt_s_lu(0xFFFFFFFF000000FFLL);}, | 
 |             "fcvt.s.lu, 32-bit truncate"); | 
 |  | 
 |     return 0; | 
 | } |