Wire Sysio Wire Sysion 1.0.0
Loading...
Searching...
No Matches
f32_to_extF80.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 f32_to_extF80.c:

Go to the source code of this file.

Functions

extFloat80_t f32_to_extF80 (float32_t a)
 

Function Documentation

◆ f32_to_extF80()

extFloat80_t f32_to_extF80 ( float32_t a)

Definition at line 44 of file f32_to_extF80.c.

45{
46 union ui32_f32 uA;
47 uint_fast32_t uiA;
48 bool sign;
49 int_fast16_t exp;
50 uint_fast32_t frac;
51 struct commonNaN commonNaN;
52 struct uint128 uiZ;
53 uint_fast16_t uiZ64;
54 uint_fast64_t uiZ0;
55 struct exp16_sig32 normExpSig;
56 union { struct extFloat80M s; extFloat80_t f; } uZ;
57
58 /*------------------------------------------------------------------------
59 *------------------------------------------------------------------------*/
60 uA.f = a;
61 uiA = uA.ui;
62 sign = signF32UI( uiA );
63 exp = expF32UI( uiA );
64 frac = fracF32UI( uiA );
65 /*------------------------------------------------------------------------
66 *------------------------------------------------------------------------*/
67 if ( exp == 0xFF ) {
68 if ( frac ) {
71 uiZ64 = uiZ.v64;
72 uiZ0 = uiZ.v0;
73 } else {
74 uiZ64 = packToExtF80UI64( sign, 0x7FFF );
75 uiZ0 = UINT64_C( 0x8000000000000000 );
76 }
77 goto uiZ;
78 }
79 /*------------------------------------------------------------------------
80 *------------------------------------------------------------------------*/
81 if ( ! exp ) {
82 if ( ! frac ) {
83 uiZ64 = packToExtF80UI64( sign, 0 );
84 uiZ0 = 0;
85 goto uiZ;
86 }
87 normExpSig = softfloat_normSubnormalF32Sig( frac );
88 exp = normExpSig.exp;
89 frac = normExpSig.sig;
90 }
91 /*------------------------------------------------------------------------
92 *------------------------------------------------------------------------*/
93 uiZ64 = packToExtF80UI64( sign, exp + 0x3F80 );
94 uiZ0 = (uint_fast64_t) (frac | 0x00800000)<<40;
95 uiZ:
96 uZ.s.signExp = uiZ64;
97 uZ.s.signif = uiZ0;
98 return uZ.f;
99
100}
const GenericPointer< typename T::ValueType > T2 T::AllocatorType & a
Definition pointer.h:1181
#define softfloat_commonNaNToExtF80UI
#define softfloat_f32UIToCommonNaN(uiA, zPtr)
Definition specialize.h:131
#define expF32UI(a)
Definition internals.h:105
#define packToExtF80UI64(sign, exp)
Definition internals.h:148
struct exp16_sig32 softfloat_normSubnormalF32Sig(uint_fast32_t)
#define fracF32UI(a)
Definition internals.h:106
#define signF32UI(a)
Definition internals.h:104
uint16_t uint_fast16_t
Definition stdint.h:155
uint64_t uint_fast64_t
Definition stdint.h:157
#define UINT64_C(val)
Definition stdint.h:284
uint32_t uint_fast32_t
Definition stdint.h:156
int16_t int_fast16_t
Definition stdint.h:151
char * s
Here is the call graph for this function: