mirror of
https://github.com/openhwgroup/cvw
synced 2025-01-30 00:14:28 +00:00
299 lines
12 KiB
C
299 lines
12 KiB
C
|
|
/*============================================================================
|
|
|
|
This C header file is part of TestFloat, Release 3e, a package of programs for
|
|
testing the correctness of floating-point arithmetic complying with the IEEE
|
|
Standard for Floating-Point, by John R. Hauser.
|
|
|
|
Copyright 2011, 2012, 2013, 2014, 2015, 2017 The Regents of the University of
|
|
California. All rights reserved.
|
|
|
|
Redistribution and use in source and binary forms, with or without
|
|
modification, are permitted provided that the following conditions are met:
|
|
|
|
1. Redistributions of source code must retain the above copyright notice,
|
|
this list of conditions, and the following disclaimer.
|
|
|
|
2. 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.
|
|
|
|
3. Neither the name of the University 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 REGENTS 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 REGENTS 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.
|
|
|
|
=============================================================================*/
|
|
|
|
#include <stdbool.h>
|
|
#include <stdint.h>
|
|
#include "softfloat.h"
|
|
|
|
extern uint_fast8_t slowfloat_roundingMode;
|
|
extern uint_fast8_t slowfloat_detectTininess;
|
|
extern uint_fast8_t slowfloat_exceptionFlags;
|
|
#ifdef EXTFLOAT80
|
|
extern uint_fast8_t slow_extF80_roundingPrecision;
|
|
#endif
|
|
|
|
#ifdef FLOAT16
|
|
float16_t slow_ui32_to_f16( uint32_t );
|
|
#endif
|
|
float32_t slow_ui32_to_f32( uint32_t );
|
|
#ifdef FLOAT64
|
|
float64_t slow_ui32_to_f64( uint32_t );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_ui32_to_extF80M( uint32_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_ui32_to_f128M( uint32_t, float128_t * );
|
|
#endif
|
|
#ifdef FLOAT16
|
|
float16_t slow_ui64_to_f16( uint64_t );
|
|
#endif
|
|
float32_t slow_ui64_to_f32( uint64_t );
|
|
#ifdef FLOAT64
|
|
float64_t slow_ui64_to_f64( uint64_t );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_ui64_to_extF80M( uint64_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_ui64_to_f128M( uint64_t, float128_t * );
|
|
#endif
|
|
#ifdef FLOAT16
|
|
float16_t slow_i32_to_f16( int32_t );
|
|
#endif
|
|
float32_t slow_i32_to_f32( int32_t );
|
|
#ifdef FLOAT64
|
|
float64_t slow_i32_to_f64( int32_t );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_i32_to_extF80M( int32_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_i32_to_f128M( int32_t, float128_t * );
|
|
#endif
|
|
#ifdef FLOAT16
|
|
float16_t slow_i64_to_f16( int64_t );
|
|
#endif
|
|
float32_t slow_i64_to_f32( int64_t );
|
|
#ifdef FLOAT64
|
|
float64_t slow_i64_to_f64( int64_t );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_i64_to_extF80M( int64_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_i64_to_f128M( int64_t, float128_t * );
|
|
#endif
|
|
|
|
#ifdef FLOAT16
|
|
uint_fast32_t slow_f16_to_ui32( float16_t, uint_fast8_t, bool );
|
|
uint_fast64_t slow_f16_to_ui64( float16_t, uint_fast8_t, bool );
|
|
int_fast32_t slow_f16_to_i32( float16_t, uint_fast8_t, bool );
|
|
int_fast64_t slow_f16_to_i64( float16_t, uint_fast8_t, bool );
|
|
uint_fast32_t slow_f16_to_ui32_r_minMag( float16_t, bool );
|
|
uint_fast64_t slow_f16_to_ui64_r_minMag( float16_t, bool );
|
|
int_fast32_t slow_f16_to_i32_r_minMag( float16_t, bool );
|
|
int_fast64_t slow_f16_to_i64_r_minMag( float16_t, bool );
|
|
float32_t slow_f16_to_f32( float16_t );
|
|
#ifdef FLOAT64
|
|
float64_t slow_f16_to_f64( float16_t );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_f16_to_extF80M( float16_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_f16_to_f128M( float16_t, float128_t * );
|
|
#endif
|
|
float16_t slow_f16_roundToInt( float16_t, uint_fast8_t, bool );
|
|
float16_t slow_f16_add( float16_t, float16_t );
|
|
float16_t slow_f16_sub( float16_t, float16_t );
|
|
float16_t slow_f16_mul( float16_t, float16_t );
|
|
float16_t slow_f16_mulAdd( float16_t, float16_t, float16_t );
|
|
float16_t slow_f16_div( float16_t, float16_t );
|
|
float16_t slow_f16_rem( float16_t, float16_t );
|
|
float16_t slow_f16_sqrt( float16_t );
|
|
bool slow_f16_eq( float16_t, float16_t );
|
|
bool slow_f16_le( float16_t, float16_t );
|
|
bool slow_f16_lt( float16_t, float16_t );
|
|
bool slow_f16_eq_signaling( float16_t, float16_t );
|
|
bool slow_f16_le_quiet( float16_t, float16_t );
|
|
bool slow_f16_lt_quiet( float16_t, float16_t );
|
|
#endif
|
|
|
|
uint_fast32_t slow_f32_to_ui32( float32_t, uint_fast8_t, bool );
|
|
uint_fast64_t slow_f32_to_ui64( float32_t, uint_fast8_t, bool );
|
|
int_fast32_t slow_f32_to_i32( float32_t, uint_fast8_t, bool );
|
|
int_fast64_t slow_f32_to_i64( float32_t, uint_fast8_t, bool );
|
|
uint_fast32_t slow_f32_to_ui32_r_minMag( float32_t, bool );
|
|
uint_fast64_t slow_f32_to_ui64_r_minMag( float32_t, bool );
|
|
int_fast32_t slow_f32_to_i32_r_minMag( float32_t, bool );
|
|
int_fast64_t slow_f32_to_i64_r_minMag( float32_t, bool );
|
|
#ifdef FLOAT16
|
|
float16_t slow_f32_to_f16( float32_t );
|
|
#endif
|
|
#ifdef FLOAT64
|
|
float64_t slow_f32_to_f64( float32_t );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_f32_to_extF80M( float32_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_f32_to_f128M( float32_t, float128_t * );
|
|
#endif
|
|
float32_t slow_f32_roundToInt( float32_t, uint_fast8_t, bool );
|
|
float32_t slow_f32_add( float32_t, float32_t );
|
|
float32_t slow_f32_sub( float32_t, float32_t );
|
|
float32_t slow_f32_mul( float32_t, float32_t );
|
|
float32_t slow_f32_mulAdd( float32_t, float32_t, float32_t );
|
|
float32_t slow_f32_div( float32_t, float32_t );
|
|
float32_t slow_f32_rem( float32_t, float32_t );
|
|
float32_t slow_f32_sqrt( float32_t );
|
|
bool slow_f32_eq( float32_t, float32_t );
|
|
bool slow_f32_le( float32_t, float32_t );
|
|
bool slow_f32_lt( float32_t, float32_t );
|
|
bool slow_f32_eq_signaling( float32_t, float32_t );
|
|
bool slow_f32_le_quiet( float32_t, float32_t );
|
|
bool slow_f32_lt_quiet( float32_t, float32_t );
|
|
|
|
#ifdef FLOAT64
|
|
uint_fast32_t slow_f64_to_ui32( float64_t, uint_fast8_t, bool );
|
|
uint_fast64_t slow_f64_to_ui64( float64_t, uint_fast8_t, bool );
|
|
int_fast32_t slow_f64_to_i32( float64_t, uint_fast8_t, bool );
|
|
int_fast64_t slow_f64_to_i64( float64_t, uint_fast8_t, bool );
|
|
uint_fast32_t slow_f64_to_ui32_r_minMag( float64_t, bool );
|
|
uint_fast64_t slow_f64_to_ui64_r_minMag( float64_t, bool );
|
|
int_fast32_t slow_f64_to_i32_r_minMag( float64_t, bool );
|
|
int_fast64_t slow_f64_to_i64_r_minMag( float64_t, bool );
|
|
#ifdef FLOAT16
|
|
float16_t slow_f64_to_f16( float64_t );
|
|
#endif
|
|
float32_t slow_f64_to_f32( float64_t );
|
|
#ifdef EXTFLOAT80
|
|
void slow_f64_to_extF80M( float64_t, extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_f64_to_f128M( float64_t, float128_t * );
|
|
#endif
|
|
float64_t slow_f64_roundToInt( float64_t, uint_fast8_t, bool );
|
|
float64_t slow_f64_add( float64_t, float64_t );
|
|
float64_t slow_f64_sub( float64_t, float64_t );
|
|
float64_t slow_f64_mul( float64_t, float64_t );
|
|
float64_t slow_f64_mulAdd( float64_t, float64_t, float64_t );
|
|
float64_t slow_f64_div( float64_t, float64_t );
|
|
float64_t slow_f64_rem( float64_t, float64_t );
|
|
float64_t slow_f64_sqrt( float64_t );
|
|
bool slow_f64_eq( float64_t, float64_t );
|
|
bool slow_f64_le( float64_t, float64_t );
|
|
bool slow_f64_lt( float64_t, float64_t );
|
|
bool slow_f64_eq_signaling( float64_t, float64_t );
|
|
bool slow_f64_le_quiet( float64_t, float64_t );
|
|
bool slow_f64_lt_quiet( float64_t, float64_t );
|
|
#endif
|
|
|
|
#ifdef EXTFLOAT80
|
|
uint_fast32_t slow_extF80M_to_ui32( const extFloat80_t *, uint_fast8_t, bool );
|
|
uint_fast64_t slow_extF80M_to_ui64( const extFloat80_t *, uint_fast8_t, bool );
|
|
int_fast32_t slow_extF80M_to_i32( const extFloat80_t *, uint_fast8_t, bool );
|
|
int_fast64_t slow_extF80M_to_i64( const extFloat80_t *, uint_fast8_t, bool );
|
|
uint_fast32_t slow_extF80M_to_ui32_r_minMag( const extFloat80_t *, bool );
|
|
uint_fast64_t slow_extF80M_to_ui64_r_minMag( const extFloat80_t *, bool );
|
|
int_fast32_t slow_extF80M_to_i32_r_minMag( const extFloat80_t *, bool );
|
|
int_fast64_t slow_extF80M_to_i64_r_minMag( const extFloat80_t *, bool );
|
|
#ifdef FLOAT16
|
|
float16_t slow_extF80M_to_f16( const extFloat80_t * );
|
|
#endif
|
|
float32_t slow_extF80M_to_f32( const extFloat80_t * );
|
|
#ifdef FLOAT64
|
|
float64_t slow_extF80M_to_f64( const extFloat80_t * );
|
|
#endif
|
|
#ifdef FLOAT128
|
|
void slow_extF80M_to_f128M( const extFloat80_t *, float128_t * );
|
|
#endif
|
|
void
|
|
slow_extF80M_roundToInt(
|
|
const extFloat80_t *, uint_fast8_t, bool, extFloat80_t * );
|
|
void
|
|
slow_extF80M_add(
|
|
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
|
|
void
|
|
slow_extF80M_sub(
|
|
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
|
|
void
|
|
slow_extF80M_mul(
|
|
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
|
|
void
|
|
slow_extF80M_mulAdd(
|
|
const extFloat80_t *,
|
|
const extFloat80_t *,
|
|
const extFloat80_t *,
|
|
extFloat80_t *
|
|
);
|
|
void
|
|
slow_extF80M_div(
|
|
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
|
|
void
|
|
slow_extF80M_rem(
|
|
const extFloat80_t *, const extFloat80_t *, extFloat80_t * );
|
|
void slow_extF80M_sqrt( const extFloat80_t *, extFloat80_t * );
|
|
bool slow_extF80M_eq( const extFloat80_t *, const extFloat80_t * );
|
|
bool slow_extF80M_le( const extFloat80_t *, const extFloat80_t * );
|
|
bool slow_extF80M_lt( const extFloat80_t *, const extFloat80_t * );
|
|
bool slow_extF80M_eq_signaling( const extFloat80_t *, const extFloat80_t * );
|
|
bool slow_extF80M_le_quiet( const extFloat80_t *, const extFloat80_t * );
|
|
bool slow_extF80M_lt_quiet( const extFloat80_t *, const extFloat80_t * );
|
|
#endif
|
|
|
|
#ifdef FLOAT128
|
|
uint_fast32_t slow_f128M_to_ui32( const float128_t *, uint_fast8_t, bool );
|
|
uint_fast64_t slow_f128M_to_ui64( const float128_t *, uint_fast8_t, bool );
|
|
int_fast32_t slow_f128M_to_i32( const float128_t *, uint_fast8_t, bool );
|
|
int_fast64_t slow_f128M_to_i64( const float128_t *, uint_fast8_t, bool );
|
|
uint_fast32_t slow_f128M_to_ui32_r_minMag( const float128_t *, bool );
|
|
uint_fast64_t slow_f128M_to_ui64_r_minMag( const float128_t *, bool );
|
|
int_fast32_t slow_f128M_to_i32_r_minMag( const float128_t *, bool );
|
|
int_fast64_t slow_f128M_to_i64_r_minMag( const float128_t *, bool );
|
|
#ifdef FLOAT16
|
|
float16_t slow_f128M_to_f16( const float128_t * );
|
|
#endif
|
|
float32_t slow_f128M_to_f32( const float128_t * );
|
|
#ifdef FLOAT64
|
|
float64_t slow_f128M_to_f64( const float128_t * );
|
|
#endif
|
|
#ifdef EXTFLOAT80
|
|
void slow_f128M_to_extF80M( const float128_t *, extFloat80_t * );
|
|
#endif
|
|
void
|
|
slow_f128M_roundToInt( const float128_t *, uint_fast8_t, bool, float128_t * );
|
|
void slow_f128M_add( const float128_t *, const float128_t *, float128_t * );
|
|
void slow_f128M_sub( const float128_t *, const float128_t *, float128_t * );
|
|
void slow_f128M_mul( const float128_t *, const float128_t *, float128_t * );
|
|
void
|
|
slow_f128M_mulAdd(
|
|
const float128_t *, const float128_t *, const float128_t *, float128_t *
|
|
);
|
|
void slow_f128M_div( const float128_t *, const float128_t *, float128_t * );
|
|
void slow_f128M_rem( const float128_t *, const float128_t *, float128_t * );
|
|
void slow_f128M_sqrt( const float128_t *, float128_t * );
|
|
bool slow_f128M_eq( const float128_t *, const float128_t * );
|
|
bool slow_f128M_le( const float128_t *, const float128_t * );
|
|
bool slow_f128M_lt( const float128_t *, const float128_t * );
|
|
bool slow_f128M_eq_signaling( const float128_t *, const float128_t * );
|
|
bool slow_f128M_le_quiet( const float128_t *, const float128_t * );
|
|
bool slow_f128M_lt_quiet( const float128_t *, const float128_t * );
|
|
#endif
|
|
|