fix stasino's patch

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@551 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2002-06-25 16:13:56 +00:00
parent 3271b43294
commit ca59b7ad1a
5 changed files with 14 additions and 5 deletions

View File

@ -1383,9 +1383,12 @@ p_round(Term t E_ARGS)
} }
if (yap_flags[LANGUAGE_MODE_FLAG] == 1) { /* iso */ if (yap_flags[LANGUAGE_MODE_FLAG] == 1) { /* iso */
RBIG_FL(rint(dbl)); double vl = rint(dbl);
RBIG_FL(vl);
} else { } else {
RFLOAT(rint(dbl)); double vl = rint(dbl);
printf("vl is %d\n", vl);
RFLOAT(vl);
} }
} }

View File

@ -18,7 +18,9 @@
#include <stdlib.h> #include <stdlib.h>
/* C library used to implement floating point functions */ /* C library used to implement floating point functions */
#if HAVE_MATH_H
#include <math.h> #include <math.h>
#endif
#if HAVE_IEEEFP_H #if HAVE_IEEEFP_H
#include <ieeefp.h> #include <ieeefp.h>
#endif #endif

View File

@ -59,6 +59,7 @@
#undef HAVE_IO_H #undef HAVE_IO_H
#undef HAVE_LIMITS_H #undef HAVE_LIMITS_H
#undef HAVE_MALLOC_H #undef HAVE_MALLOC_H
#undef HAVE_MATH_H
#undef HAVE_MEMORY_H #undef HAVE_MEMORY_H
#undef HAVE_NETDB_H #undef HAVE_NETDB_H
#undef HAVE_NETINET_IN_H #undef HAVE_NETINET_IN_H
@ -238,9 +239,11 @@
#define USE_SOCKET 1 #define USE_SOCKET 1
#endif #endif
#if defined(__hpux)
/* HP-UX requires extra definitions for X/Open networking */ /* HP-UX requires extra definitions for X/Open networking */
#undef _XOPEN_SOURCE #undef _XOPEN_SOURCE
#define _XOPEN_SOURCE_EXTENDED 0 #define _XOPEN_SOURCE_EXTENDED 0
#endif
#if HAVE_GMP_H && HAVE_LIBGMP #if HAVE_GMP_H && HAVE_LIBGMP
#define USE_GMP 1 #define USE_GMP 1

3
configure vendored
View File

@ -5168,7 +5168,8 @@ done
for ac_header in malloc.h memory.h
for ac_header in malloc.h math.h memory.h
do do
as_ac_Header=`echo "ac_cv_header_$ac_header" | $as_tr_sh` as_ac_Header=`echo "ac_cv_header_$ac_header" | $as_tr_sh`
if eval "test \"\${$as_ac_Header+set}\" = set"; then if eval "test \"\${$as_ac_Header+set}\" = set"; then

View File

@ -583,7 +583,7 @@ AC_HEADER_SYS_WAIT
AC_CHECK_HEADERS(arpa/inet.h ctype.h direct.h dirent.h dlfcn.h) AC_CHECK_HEADERS(arpa/inet.h ctype.h direct.h dirent.h dlfcn.h)
AC_CHECK_HEADERS(errno.h fcntl.h) AC_CHECK_HEADERS(errno.h fcntl.h)
AC_CHECK_HEADERS(fenv.h fpu_control.h ieeefp.h io.h limits.h) AC_CHECK_HEADERS(fenv.h fpu_control.h ieeefp.h io.h limits.h)
AC_CHECK_HEADERS(malloc.h memory.h) AC_CHECK_HEADERS(malloc.h math.h memory.h)
AC_CHECK_HEADERS(netdb.h netinet/in.h regex.h) AC_CHECK_HEADERS(netdb.h netinet/in.h regex.h)
AC_CHECK_HEADERS(siginfo.h signal.h stdarg.h string.h stropts.h) AC_CHECK_HEADERS(siginfo.h signal.h stdarg.h string.h stropts.h)
AC_CHECK_HEADERS(sys/conf.h sys/file.h) AC_CHECK_HEADERS(sys/conf.h sys/file.h)