=================================================================== RCS file: /home/cvs/OpenXM/src/ox_toolkit/dump.c,v retrieving revision 1.1 retrieving revision 1.7 diff -u -p -r1.1 -r1.7 --- OpenXM/src/ox_toolkit/dump.c 2000/10/10 05:23:20 1.1 +++ OpenXM/src/ox_toolkit/dump.c 2015/08/27 03:03:33 1.7 @@ -1,5 +1,5 @@ /* -*- mode: C; coding: euc-japan -*- */ -/* $OpenXM$ */ +/* $OpenXM: OpenXM/src/ox_toolkit/dump.c,v 1.6 2015/08/26 20:19:36 ohara Exp $ */ /* This module includes functions for sending/receiveng CMO's. @@ -9,7 +9,10 @@ #include #include +#include +#if !defined(_MSC_VER) #include +#endif #include "ox_toolkit.h" static void dump_cmo_int32(cmo_int32* m); @@ -19,9 +22,9 @@ static void dump_cmo_null(cmo_null* m); static void dump_cmo_string(cmo_string* m); static void dump_cmo_monomial32(cmo_monomial32* c); static void dump_cmo_zz(cmo_zz* c); +static void dump_mpz(mpz_ptr mpz); static void dump_string(void *s, int len); static void dump_integer(int x); -static void dump_mpz(mpz_ptr mpz); /* functions encoding cmo to binary */ @@ -109,9 +112,9 @@ static void dump_cmo_zz(cmo_zz* c) static void dump_cmo_distributed_polynomial(cmo_distributed_polynomial* m) { cell* cp; - dump_integer(list_length(m)); + dump_integer(list_length((cmo_list *)m)); dump_cmo(m->ringdef); - for(cp = list_first(m); !list_endof(m, cp); cp = list_next(cp)) { + for(cp = list_first((cmo_list *)m); !list_endof((cmo_list *)m, cp); cp = list_next(cp)) { dump_cmo(cp->cmo); } } @@ -151,6 +154,7 @@ void dump_cmo(cmo* m) dump_cmo_distributed_polynomial((cmo_distributed_polynomial *)m); break; default: + ; } }