| version 1.95, 2016/03/31 01:40:11 |
version 1.97, 2016/08/24 05:33:58 |
|
|
| * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
| * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
| * |
* |
| * $OpenXM: OpenXM_contrib2/asir2000/include/ca.h,v 1.94 2015/08/20 08:42:07 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/include/ca.h,v 1.96 2016/06/28 11:59:30 ohara Exp $ |
| */ |
*/ |
| #include <stdio.h> |
#include <stdio.h> |
| #include <stdlib.h> |
#include <stdlib.h> |
| #include <gmp.h> |
#include <gmp.h> |
| #include <mpc.h> |
#include <mpc.h> |
| |
#include <limits.h> |
| |
|
| /* from mpfr-impl.h */ |
/* from mpfr-impl.h */ |
| #define MPFR_PREC(x) ((x)->_mpfr_prec) |
#define MPFR_PREC(x) ((x)->_mpfr_prec) |
|
|
| #define MPFR_LAST_LIMB(x) ((MPFR_PREC (x) - 1) / GMP_NUMB_BITS) |
#define MPFR_LAST_LIMB(x) ((MPFR_PREC (x) - 1) / GMP_NUMB_BITS) |
| #define MPFR_LIMB_SIZE(x) (MPFR_LAST_LIMB (x) + 1) |
#define MPFR_LIMB_SIZE(x) (MPFR_LAST_LIMB (x) + 1) |
| |
|
| |
#define RAT_CEIL(nm,dn) (((nm)+(dn)-1)/((dn))) |
| |
#define MPFR_LIMB_SIZE_REAL(x) (RAT_CEIL(MPFR_PREC((x)),sizeof(mp_limb_t)*CHAR_BIT) * (sizeof(mp_limb_t)/sizeof(int)) ) |
| |
#define MPFR_LIMB_SIZE_BODY(x) (RAT_CEIL(MPFR_PREC((x)),sizeof(unsigned int)*CHAR_BIT)) |
| |
|
| #if defined(hpux) |
#if defined(hpux) |
| #include <netinet/in.h> |
#include <netinet/in.h> |
| # define setbuffer(FP,buf,siz) setvbuf(FP,buf,_IOFBF,siz) |
# define setbuffer(FP,buf,siz) setvbuf(FP,buf,_IOFBF,siz) |
| Line 781 typedef unsigned int ModNum; |
|
| Line 786 typedef unsigned int ModNum; |
|
| #define ALLOCA(d) MALLOC(d) |
#define ALLOCA(d) MALLOC(d) |
| #endif |
#endif |
| |
|
| |
/* for handling signals */ |
| |
#if defined(HAVE_SIGACTION) /* POSIX */ |
| |
void (*set_signal(int sig, void (*handler)(int)))(int); |
| |
#define set_signal_for_restart(x,y) (0) |
| |
#else |
| |
#define set_signal(x,y) (signal(x,y)) |
| |
#define set_signal_for_restart(x,y) (signal(x,y)) |
| |
#endif |
| |
|
| /* for setjmp/longjmp compatibility */ |
/* for setjmp/longjmp compatibility */ |
| #if defined(__CYGWIN__) || (defined(__x86_64) && !defined(__MINGW32__)) |
#if defined(__CYGWIN__) || defined(HAVE_SIGACTION) || (defined(__x86_64) && !defined(__MINGW32__)) |
| #define JMP_BUF sigjmp_buf |
#define JMP_BUF sigjmp_buf |
| #define SETJMP(x) sigsetjmp(x,~0) |
#define SETJMP(x) sigsetjmp(x,~0) |
| #define LONGJMP(x,y) siglongjmp(x,y) |
#define LONGJMP(x,y) siglongjmp(x,y) |