summaryrefslogblamecommitdiff
path: root/src/math/lrintl.c
blob: c076326f70b5cd32d779b4ec3b7e9f42f9cc49e7 (plain) (tree)
1
2
3


                  












                                               
#include <math.h>
#include <float.h>

#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
long lrintl(long double x)
{
	return lrint(x);
}
#else
#define type            long double
#define roundit         rintl
#define dtype           long
#define fn              lrintl

#include "lrint.c"
#endif