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

@ -1381,11 +1381,14 @@ p_round(Term t E_ARGS)
RERROR();
}
}
if (yap_flags[LANGUAGE_MODE_FLAG] == 1) { /* iso */
RBIG_FL(rint(dbl));
double vl = rint(dbl);
RBIG_FL(vl);
} 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>
/* C library used to implement floating point functions */
#if HAVE_MATH_H
#include <math.h>
#endif
#if HAVE_IEEEFP_H
#include <ieeefp.h>
#endif

View File

@ -59,6 +59,7 @@
#undef HAVE_IO_H
#undef HAVE_LIMITS_H
#undef HAVE_MALLOC_H
#undef HAVE_MATH_H
#undef HAVE_MEMORY_H
#undef HAVE_NETDB_H
#undef HAVE_NETINET_IN_H
@ -238,9 +239,11 @@
#define USE_SOCKET 1
#endif
#if defined(__hpux)
/* HP-UX requires extra definitions for X/Open networking */
#undef _XOPEN_SOURCE
#define _XOPEN_SOURCE_EXTENDED 0
#endif
#if HAVE_GMP_H && HAVE_LIBGMP
#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
as_ac_Header=`echo "ac_cv_header_$ac_header" | $as_tr_sh`
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(errno.h fcntl.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(siginfo.h signal.h stdarg.h string.h stropts.h)
AC_CHECK_HEADERS(sys/conf.h sys/file.h)