1 // cl_DF equal_hashcode().
4 #include "base/cl_sysdep.h"
7 #include "cln/dfloat.h"
12 #include "base/cl_N.h"
13 #include "float/dfloat/cl_DF.h"
17 CL_INLINE uint32 CL_INLINE_DECL(equal_hashcode) (const cl_DF& x)
21 #if (cl_word_size==64)
23 DF_decode(x, { return 0; }, sign=,exp=,mant=);
24 var uint32 msd = mant >> ((DF_mant_len+1)-32);
28 DF_decode2(x, { return 0; }, sign=,exp=,manthi=,mantlo=);
29 var uint32 msd = (manthi << (64-(DF_mant_len+1)))
30 | (mantlo >> ((DF_mant_len+1)-32));
32 return equal_hashcode_low(msd,exp,sign);