ack/lang/cem/libcc.ansi/core/math/ceil.c

21 lines
389 B
C
Raw Normal View History

1989-05-10 16:08:14 +00:00
/*
* (c) copyright 1988 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright".
*
* Author: Ceriel J.H. Jacobs
*/
1994-06-24 14:02:31 +00:00
/* $Id$ */
1989-05-10 16:08:14 +00:00
2018-06-21 20:33:47 +00:00
#include <math.h>
1989-05-10 16:08:14 +00:00
double
ceil(double x)
{
double val;
2018-06-21 20:33:47 +00:00
return modf(x, &val) > 0 ? val + 1.0 : val;
1989-05-10 16:08:14 +00:00
/* this also works if modf always returns a positive
fractional part
*/
}