version 1.1, 2000/10/10 05:23:20 |
version 1.5, 2004/12/01 17:32:26 |
|
|
/* -*- mode: C; coding: euc-japan -*- */ |
/* -*- 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. |
This module includes functions for sending/receiveng CMO's. |
Line 19 static void dump_cmo_null(cmo_null* m); |
|
Line 19 static void dump_cmo_null(cmo_null* m); |
|
static void dump_cmo_string(cmo_string* m); |
static void dump_cmo_string(cmo_string* m); |
static void dump_cmo_monomial32(cmo_monomial32* c); |
static void dump_cmo_monomial32(cmo_monomial32* c); |
static void dump_cmo_zz(cmo_zz* 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_string(void *s, int len); |
static void dump_integer(int x); |
static void dump_integer(int x); |
static void dump_mpz(mpz_ptr mpz); |
|
|
|
/* functions encoding cmo to binary */ |
/* functions encoding cmo to binary */ |
|
|
Line 109 static void dump_cmo_zz(cmo_zz* c) |
|
Line 109 static void dump_cmo_zz(cmo_zz* c) |
|
static void dump_cmo_distributed_polynomial(cmo_distributed_polynomial* m) |
static void dump_cmo_distributed_polynomial(cmo_distributed_polynomial* m) |
{ |
{ |
cell* cp; |
cell* cp; |
dump_integer(list_length(m)); |
dump_integer(list_length((cmo_list *)m)); |
dump_cmo(m->ringdef); |
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); |
dump_cmo(cp->cmo); |
} |
} |
} |
} |
Line 151 void dump_cmo(cmo* m) |
|
Line 151 void dump_cmo(cmo* m) |
|
dump_cmo_distributed_polynomial((cmo_distributed_polynomial *)m); |
dump_cmo_distributed_polynomial((cmo_distributed_polynomial *)m); |
break; |
break; |
default: |
default: |
|
; |
} |
} |
} |
} |
|
|