source file of the flowerlib
- (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
Jan Nieuwenhuizen <janneke@gnu.org>
*/
-#include <stdio.h>
-#include <string.h>
-#include <ctype.h>
#include "libc-extension.hh"
-/*
- urg: why soo wierd?
- */
+#include <cmath>
+#include <cstdio>
+#include <cstring>
+#include <cctype>
+
char*
strnlwr (char* start ,int n)
{
return start;
}
+/*
+ There are some strange problems with round() on early glibcs.
+ */
+double
+my_round (double x)
+{
+ return floor (x -0.5)+ 1.0 ;
+}
+
+#ifndef isinf
+#if !HAVE_ISINF
+int
+isinf (double x)
+{
+ return x && ( x == x/ 2) ;
+}
+#endif
+#endif
#if !HAVE_MEMMEM
if (*subneedle++ != *subhaystack++)
goto next;
- // completed the needle. Gotcha.
+ /* Completed the needle. Gotcha. */
return (Byte *) haystack;
next:
haystack++;
return byte;
}
-#if ! HAVE_LRINT
-#define lrint(__x) ((long)(double) __x)
-#endif
-
#if ! HAVE_SNPRINTF
int
snprintf (char *str, size_t, char const *format, ...)
return i;
}
#endif
-
-
-#if !HAVE_ISINF
-int
-isinf (double x)
-{
- return x && ( x == x/ 2) ;
-}
-
-#endif