forked from KolibriOS/kolibrios
release ktcc 0.9.26
git-svn-id: svn://kolibrios.org@6424 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
9
programs/develop/ktcc/trunk/libc/math/roundl.c
Normal file
9
programs/develop/ktcc/trunk/libc/math/roundl.c
Normal file
@@ -0,0 +1,9 @@
|
||||
#include <math.h>
|
||||
|
||||
long double roundl (long double x)
|
||||
{
|
||||
if (x > 0)
|
||||
return floor(x + 0.5);
|
||||
else
|
||||
return ceil(x - 0.5);
|
||||
}
|
Reference in New Issue
Block a user