===================================================================
RCS file: /home/cvs/OpenXM/src/ox_toolkit/dump.c,v
retrieving revision 1.1
retrieving revision 1.5
diff -u -p -r1.1 -r1.5
--- OpenXM/src/ox_toolkit/dump.c	2000/10/10 05:23:20	1.1
+++ OpenXM/src/ox_toolkit/dump.c	2004/12/01 17:32:26	1.5
@@ -1,5 +1,5 @@
 /* -*- mode: C; coding: euc-japan -*- */
-/* $OpenXM$ */
+/* $OpenXM: OpenXM/src/ox_toolkit/dump.c,v 1.4 2003/09/15 09:31:41 ohara Exp $ */
 
 /* 
    This module includes functions for sending/receiveng CMO's.
@@ -19,9 +19,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 +109,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 +151,7 @@ void dump_cmo(cmo* m)
         dump_cmo_distributed_polynomial((cmo_distributed_polynomial *)m);
         break;
     default:
+		;
     }
 }