Wire Sysio Wire Sysion 1.0.0
Loading...
Searching...
No Matches
f128M_to_i64_r_minMag.c File Reference
#include <stdbool.h>
#include <stdint.h>
#include "platform.h"
#include "internals.h"
#include "specialize.h"
#include "softfloat.h"
Include dependency graph for f128M_to_i64_r_minMag.c:

Go to the source code of this file.

Functions

int_fast64_t f128M_to_i64_r_minMag (const float128_t *aPtr, bool exact)
 

Function Documentation

◆ f128M_to_i64_r_minMag()

int_fast64_t f128M_to_i64_r_minMag ( const float128_t * aPtr,
bool exact )

Definition at line 55 of file f128M_to_i64_r_minMag.c.

56{
57 const uint32_t *aWPtr;
58 uint32_t uiA96;
59 bool sign;
60 int32_t exp;
61 uint32_t sig96;
62 int32_t shiftDist;
63 uint32_t sig[4];
64 uint64_t uiZ;
65 union { uint64_t ui; int64_t i; } uZ;
66
67 /*------------------------------------------------------------------------
68 *------------------------------------------------------------------------*/
69 aWPtr = (const uint32_t *) aPtr;
70 uiA96 = aWPtr[indexWordHi( 4 )];
71 sign = signF128UI96( uiA96 );
72 exp = expF128UI96( uiA96 );
73 sig96 = fracF128UI96( uiA96 );
74 /*------------------------------------------------------------------------
75 *------------------------------------------------------------------------*/
76 shiftDist = 0x403E - exp;
77 if ( shiftDist < 0 ) goto invalid;
78 if ( exact ) {
79 if ( exp ) sig96 |= 0x00010000;
80 sig[indexWord( 4, 3 )] = sig96;
81 sig[indexWord( 4, 2 )] = aWPtr[indexWord( 4, 2 )];
82 sig[indexWord( 4, 1 )] = aWPtr[indexWord( 4, 1 )];
83 sig[indexWord( 4, 0 )] = aWPtr[indexWord( 4, 0 )];
84 softfloat_shiftRightJam128M( sig, shiftDist + 17, sig );
85 uiZ = (uint64_t) sig[indexWord( 4, 2 )]<<32 | sig[indexWord( 4, 1 )];
86 if ( uiZ>>63 && (! sign || (uiZ != UINT64_C( 0x8000000000000000 ))) ) {
87 goto invalid;
88 }
89 if ( sig[indexWordLo( 4 )] ) {
91 }
92 } else {
93 if ( 64 <= shiftDist ) return 0;
94 uiZ =
95 (uint64_t) sig96<<47
96 | (uint64_t) aWPtr[indexWord( 4, 2 )]<<15
97 | aWPtr[indexWord( 4, 1 )]>>17;
98 if ( shiftDist ) {
99 uiZ |= UINT64_C( 0x8000000000000000 );
100 uiZ >>= shiftDist;
101 } else {
102 if ( uiZ || ! sign ) goto invalid;
103 uiZ |= UINT64_C( 0x8000000000000000 );
104 }
105 }
106 if ( sign ) uiZ = -uiZ;
107 uZ.ui = uiZ;
108 return uZ.i;
109 /*------------------------------------------------------------------------
110 *------------------------------------------------------------------------*/
111 invalid:
113 return
114 (exp == 0x7FFF)
115 && (sig96
116 || (aWPtr[indexWord( 4, 2 )] | aWPtr[indexWord( 4, 1 )]
117 | aWPtr[indexWord( 4, 0 )]))
120
121}
void softfloat_raiseFlags(uint_fast8_t flags)
#define i64_fromNaN
Definition specialize.h:70
#define i64_fromNegOverflow
Definition specialize.h:69
#define i64_fromPosOverflow
Definition specialize.h:68
#define fracF128UI96(a96)
Definition internals.h:249
#define signF128UI96(a96)
Definition internals.h:247
#define expF128UI96(a96)
Definition internals.h:248
#define indexWordLo(total)
#define indexWord(total, n)
#define indexWordHi(total)
#define softfloat_shiftRightJam128M(aPtr, dist, zPtr)
Definition primitives.h:881
@ softfloat_flag_invalid
Definition softfloat.h:89
@ softfloat_flag_inexact
Definition softfloat.h:85
THREAD_LOCAL uint_fast8_t softfloat_exceptionFlags
signed __int64 int64_t
Definition stdint.h:135
unsigned int uint32_t
Definition stdint.h:126
#define UINT64_C(val)
Definition stdint.h:284
signed int int32_t
Definition stdint.h:123
unsigned __int64 uint64_t
Definition stdint.h:136
Here is the call graph for this function: