+++ /dev/null
-\r
-#include <stdbool.h>\r
-#include <stdint.h>\r
-#include "platform.h"\r
-#include "primitives.h"\r
-#include "internals.h"\r
-#include "softfloat.h"\r
-\r
-int_fast64_t f64_to_i64( float64_t a, int_fast8_t roundingMode, bool exact )\r
-{\r
- union ui64_f64 uA;\r
- uint_fast64_t uiA;\r
- bool sign;\r
- int_fast16_t exp;\r
- uint_fast64_t sig;\r
- int_fast16_t shiftCount;\r
- struct uint64_extra sigExtra;\r
-\r
- uA.f = a;\r
- uiA = uA.ui;\r
- sign = signF64UI( uiA );\r
- exp = expF64UI( uiA );\r
- sig = fracF64UI( uiA );\r
- if ( exp ) sig |= UINT64_C( 0x0010000000000000 );\r
- shiftCount = 0x433 - exp;\r
- if ( shiftCount <= 0 ) {\r
- if ( 0x43E < exp ) {\r
- softfloat_raiseFlags( softfloat_flag_invalid );\r
- return\r
- ! sign\r
- || ( ( exp == 0x7FF )\r
- && ( sig != UINT64_C( 0x0010000000000000 ) ) )\r
- ? INT64_C( 0x7FFFFFFFFFFFFFFF )\r
- : - INT64_C( 0x7FFFFFFFFFFFFFFF ) - 1;\r
- }\r
- sigExtra.v = sig<<( - shiftCount );\r
- sigExtra.extra = 0;\r
- } else {\r
- sigExtra = softfloat_shift64ExtraRightJam( sig, 0, shiftCount );\r
- }\r
- return\r
- softfloat_roundPackToI64(\r
- sign, sigExtra.v, sigExtra.extra, roundingMode, exact );\r
-\r
-}\r
-\r