1 // integer_decode_float().
7 #include "cln/sfloat.h"
17 CL_INLINE const cl_idecoded_float CL_INLINE_DECL(integer_decode_float) (const cl_SF& x)
23 SF_decode(x, { return cl_idecoded_float(0, 0, 1); },
26 return cl_idecoded_float(
27 L_to_FN(mant), // Mantisse als Fixnum (>0, <2^17)
28 L_to_FN(exp-(SF_mant_len+1)), // e-17 als Fixnum
29 (sign>=0 ? cl_I(1) : cl_I(-1)) // (-1)^s erzeugen