summaryrefslogblamecommitdiff
path: root/src/math/lroundl.c
blob: 7b593f773a3742c73e57125c2916e47960eae690 (plain) (tree)
1
2
3


                  














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

#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
long lroundl(long double x)
{
	return lround(x);
}
#else
#define type            long double
#define roundit         roundl
#define dtype           long
#define DTYPE_MIN       LONG_MIN
#define DTYPE_MAX       LONG_MAX
#define fn              lroundl

#include "lround.c"
#endif