src/math/lrintl.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14

#include "libm.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