version 1.42, 2015/08/13 00:49:57 |
version 1.43, 2015/08/17 05:18:35 |
|
|
/* -*- mode: C; coding: euc-japan -*- */ |
/* -*- mode: C; coding: euc-japan -*- */ |
/* $OpenXM: OpenXM/src/ox_toolkit/ox.c,v 1.41 2015/08/05 00:59:05 noro Exp $ */ |
/* $OpenXM: OpenXM/src/ox_toolkit/ox.c,v 1.42 2015/08/13 00:49:57 noro Exp $ */ |
|
|
/* |
/* |
This module includes functions for sending/receiveng CMO's. |
This module includes functions for sending/receiveng CMO's. |
Line 787 static void receive_mpfr(OXFILE *oxfp, mpfr_ptr mpfr) |
|
Line 787 static void receive_mpfr(OXFILE *oxfp, mpfr_ptr mpfr) |
|
|
|
sgn = receive_int32(oxfp); |
sgn = receive_int32(oxfp); |
prec = receive_int32(oxfp); |
prec = receive_int32(oxfp); |
exp = receive_int64(oxfp); |
exp = receive_int64(oxfp); |
/* len = length as an int array (int = 4bytes) */ |
/* len = length as an int array (int = 4bytes) */ |
len = receive_int32(oxfp); |
len = receive_int32(oxfp); |
|
|
Line 819 static int send_mpfr(OXFILE *oxfp, mpfr_ptr mpfr) |
|
Line 819 static int send_mpfr(OXFILE *oxfp, mpfr_ptr mpfr) |
|
|
|
int i,len,t; |
int i,len,t; |
unsigned long *ptr; |
unsigned long *ptr; |
|
UL64 uexp; |
|
|
send_int32(oxfp, MPFR_SIGN(mpfr)); |
send_int32(oxfp, MPFR_SIGN(mpfr)); |
send_int32(oxfp, MPFR_PREC(mpfr)); |
send_int32(oxfp, MPFR_PREC(mpfr)); |