OpenXM/src/ox_toolkit/ox.c - diff

Return to ox.c CVS log

Up to [local] / OpenXM / src / ox_toolkit

version 1.40, 2015/08/04 10:19:31

version 1.41, 2015/08/05 00:59:05

Line 1

/* -*- mode: C; coding: euc-japan -*- */

/* $OpenXM: OpenXM/src/ox_toolkit/ox.c,v 1.39 2015/08/04 07:41:49 noro Exp $ */

/* $OpenXM: OpenXM/src/ox_toolkit/ox.c,v 1.40 2015/08/04 10:19:31 noro Exp $ */

This module includes functions for sending/receiveng CMO's.

Line 767 static int send_mpz(OXFILE *oxfp, mpz_ptr mpz)

return 0;

}

void send_int64(OXFILE *oxfp,UL64 a)

int send_int64(OXFILE *oxfp,UL64 a)

{

send_int32(oxfp, a>>32);

return oxfp->send_double(oxfp,((double *)&a)[0]);

send_int32(oxfp, a&0xffffffff);

}

UL64 receive_int64(OXFILE *oxfp)

{

unsigned int u,l;

double d = receive_double(oxfp);

UL64 r;

return ((UL64 *)&d)[0];

u = receive_int32(oxfp);

l = receive_int32(oxfp);

r = (((UL64)u)<<32)|((UL64)l);

return r;

}

static void receive_mpfr(OXFILE *oxfp, mpfr_ptr mpfr)