// cl_LF equal_hashcode().
// General includes.
#include "cl_sysdep.h"
// Specification.
#include "cln/lfloat.h"
// Implementation.
#include "cl_N.h"
#include "cl_LF_impl.h"
#include "cl_DS.h"
namespace cln {
MAYBE_INLINE
uint32 equal_hashcode (const cl_LF& x)
{
var cl_signean sign;
var sintL exp;
var const uintD* MSDptr;
LF_decode(x, { return 0; }, sign=,exp=,MSDptr=,,);
#if (intDsize==64)
var uint32 msd = mspref(MSDptr,0) >> 32;
#else // (intDsize<=32)
var uint32 msd = get_32_Dptr(MSDptr);
#endif
return equal_hashcode_low(msd,exp,sign);
}
} // namespace cln
syntax highlighted by Code2HTML, v. 0.9.1