=================================================================== RCS file: /home/cvs/OpenXM/src/ox_pari/ox_pari.c,v retrieving revision 1.8 retrieving revision 1.10 diff -u -p -r1.8 -r1.10 --- OpenXM/src/ox_pari/ox_pari.c 2015/08/20 01:38:34 1.8 +++ OpenXM/src/ox_pari/ox_pari.c 2015/08/20 08:56:30 1.10 @@ -1,4 +1,4 @@ -/* $OpenXM: OpenXM/src/ox_pari/ox_pari.c,v 1.7 2015/08/18 05:04:35 noro Exp $ */ +/* $OpenXM: OpenXM/src/ox_pari/ox_pari.c,v 1.9 2015/08/20 07:45:12 noro Exp $ */ #include #include @@ -137,7 +137,7 @@ int sm_popCMO() cmo_error2 *make_error2(char *message) { - return (cmo_error2 *) new_cmo_string(message); + return new_cmo_error2((cmo *)new_cmo_string(message)); } int get_i() @@ -407,6 +407,8 @@ GEN cmo_to_GEN(cmo *c) return gen_0; case CMO_ZZ: /* int */ return cmo_zz_to_GEN((cmo_zz *)c); + case CMO_COMPLEX: /* complex */ + return cmo_complex_to_GEN((cmo_complex *)c); case CMO_IEEE_DOUBLE_FLOAT: return dbltor(((cmo_double *)c)->d); case CMO_BIGFLOAT: /* bigfloat */