mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-14 13:21:54 -08:00
Code Issues Projects Releases Packages Wiki Activity

Whenever isfinite is not defined, use finite(). Additionally, in Solaris, load ieefp.h before using this macro.

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2009-05-20 19:29:16 +02:00
parent d47f073596
commit 42fdda5e1c
9 changed files with 19 additions and 31 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/c/num_co.d
View file

@ -22,12 +22,9 @@
that know the representation of floating-point numbers.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <float.h>
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#ifndef HAVE_ISOC99
# define floorf floor
# define ceilf ceil

5
src/c/num_sfun.d
View file

@ -15,11 +15,8 @@
See file '../Copyright' for full details.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#include "ecl/internal.h"
#ifndef HAVE_LOG1P

5
src/c/number.d
View file

@ -15,12 +15,9 @@
See file '../Copyright' for full details.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <float.h>
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#include <ecl/internal.h>
cl_fixnum

2
src/c/predicate.d
View file

@ -15,8 +15,8 @@
See file '../Copyright' for full details.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <math.h>
cl_object
cl_identity(cl_object x)

5
src/c/print.d
View file

@ -15,15 +15,12 @@
See file '../Copyright' for full details.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <string.h>
#include <stdlib.h>
#include <stdio.h>
#include <float.h>
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#ifndef _MSC_VER
#include <unistd.h>
#endif

5
src/c/read.d
View file

@ -15,14 +15,11 @@
See file '../Copyright' for full details.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <stdio.h>
#include <limits.h>
#include <float.h>
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#include <string.h>
#include <stdlib.h>
#include <ecl/internal.h>

2
src/c/threads.d
View file

@ -20,10 +20,10 @@
# include <pthread.h>
#endif
#include <errno.h>
#include <math.h>
#include <time.h>
#include <signal.h>
#define GC_THREADS
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <ecl/internal.h>
#ifdef HAVE_GETTIMEOFDAY

5
src/c/time.d
View file

@ -15,11 +15,8 @@
See file '../Copyright' for full details.
*/
#define ECL_INCLUDE_MATH_H
#include <ecl/ecl.h>
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#include <time.h>
#ifdef HAVE_TIMES
# include <sys/times.h>

16
src/h/config.h.in
View file

@ -410,9 +410,15 @@ typedef unsigned @CL_FIXNUM_TYPE@ cl_hashkey;
# endif
#endif
#if defined(mingw32) || defined(_MSC_VER) || defined(cygwin) || defined(sparc)
# include <math.h>
# ifndef isfinite
# define isfinite(x) (finite(x))
# endif
#ifdef ECL_INCLUDE_MATH_H
#include <math.h>
#ifdef _MSC_VER
# undef complex
#endif
#ifndef isfinite
# ifdef __sun
# include <ieefp.h>
# endif
# define isfinite(x) finite(x)
#endif
#endif