void
test_a_f64_z_i32_x(
int_fast32_t trueFunction( float64_t, bool ),
int_fast32_t subjFunction( float64_t, bool ),
bool exact
)
{
int count;
int_fast32_t trueZ;
uint_fast8_t trueFlags;
int_fast32_t subjZ;
uint_fast8_t subjFlags;
genCases_f64_a_init();
genCases_writeTestsTotal( testLoops_forever );
verCases_errorCount = 0;
verCases_tenThousandsCount = 0;
count = 10000;
while ( ! genCases_done || testLoops_forever ) {
genCases_f64_a_next();
*testLoops_trueFlagsPtr = 0;
trueZ = trueFunction( genCases_f64_a, exact );
trueFlags = *testLoops_trueFlagsPtr;
testLoops_subjFlagsFunction();
subjZ = subjFunction( genCases_f64_a, exact );
subjFlags = testLoops_subjFlagsFunction();
--count;
if ( ! count ) {
verCases_perTenThousand();
count = 10000;
}
if ( (trueZ != subjZ) || (trueFlags != subjFlags) ) {
if (
! verCases_checkNaNs && f64_isSignalingNaN( genCases_f64_a )
) {
trueFlags |= softfloat_flag_invalid;
}
if (
(trueZ != 0x7FFFFFFF)
|| ((subjZ != 0x7FFFFFFF) && (subjZ != -0x7FFFFFFF - 1))
|| (trueFlags != softfloat_flag_invalid)
|| (subjFlags != softfloat_flag_invalid)
) {
++verCases_errorCount;
verCases_writeErrorFound( 10000 - count );
writeCase_a_f64( genCases_f64_a, " " );
writeCase_z_i32( trueZ, trueFlags, subjZ, subjFlags );
if ( verCases_errorCount == verCases_maxErrorCount ) break;
}
}
}
verCases_writeTestsPerformed( 10000 - count );
}
void
test_a_extF80_z_i32_rx(
int_fast32_t trueFunction( const extFloat80_t *, uint_fast8_t, bool ),
int_fast32_t subjFunction( const extFloat80_t *, uint_fast8_t, bool ),
uint_fast8_t roundingMode,
bool exact
)
{
int count;
int_fast32_t trueZ;
uint_fast8_t trueFlags;
int_fast32_t subjZ;
uint_fast8_t subjFlags;
genCases_extF80_a_init();
genCases_writeTestsTotal( testLoops_forever );
verCases_errorCount = 0;
verCases_tenThousandsCount = 0;
count = 10000;
while ( ! genCases_done || testLoops_forever ) {
genCases_extF80_a_next();
*testLoops_trueFlagsPtr = 0;
trueZ = trueFunction( &genCases_extF80_a, roundingMode, exact );
trueFlags = *testLoops_trueFlagsPtr;
testLoops_subjFlagsFunction();
subjZ = subjFunction( &genCases_extF80_a, roundingMode, exact );
subjFlags = testLoops_subjFlagsFunction();
--count;
if ( ! count ) {
verCases_perTenThousand();
count = 10000;
}
if ( (trueZ != subjZ) || (trueFlags != subjFlags) ) {
if (
verCases_checkInvInts
|| (trueFlags != softfloat_flag_invalid)
|| (subjFlags != softfloat_flag_invalid)
|| ((subjZ != 0x7FFFFFFF) && (subjZ != -0x7FFFFFFF - 1)
&& (! extF80M_isNaN( &genCases_extF80_a )
|| (subjZ != 0)))
) {
++verCases_errorCount;
verCases_writeErrorFound( 10000 - count );
writeCase_a_extF80M( &genCases_extF80_a, " " );
writeCase_z_i32( trueZ, trueFlags, subjZ, subjFlags );
if ( verCases_errorCount == verCases_maxErrorCount ) break;
}
}
}
verCases_writeTestsPerformed( 10000 - count );
}
