version 1.2, 2003/11/15 09:06:20 |
version 1.4, 2003/11/17 12:04:20 |
|
|
/* $OpenXM: OpenXM/src/ox_ntl/ntlconv.cpp,v 1.1 2003/11/08 12:34:00 iwane Exp $ */ |
/* $OpenXM: OpenXM/src/ox_ntl/ntlconv.cpp,v 1.3 2003/11/16 13:48:08 iwane Exp $ */ |
|
|
#include <NTL/ZZX.h> |
#include <NTL/ZZX.h> |
#include <NTL/mat_ZZ.h> |
#include <NTL/mat_ZZ.h> |
|
|
#define __NTL_PRINT (1) |
#define __NTL_PRINT (1) |
#endif |
#endif |
|
|
|
/*==========================================================================* |
|
* Block interrupt input |
|
*==========================================================================*/ |
#define BLOCK_NEW_CMO() BLOCK_INPUT() |
#define BLOCK_NEW_CMO() BLOCK_INPUT() |
#define UNBLOCK_NEW_CMO() UNBLOCK_INPUT() |
#define UNBLOCK_NEW_CMO() UNBLOCK_INPUT() |
|
|
|
|
ZZ_to_cmo_zz(const ZZ &z) |
ZZ_to_cmo_zz(const ZZ &z) |
{ |
{ |
cmo_zz *c; |
cmo_zz *c; |
|
char *ptr; |
|
|
ostrstream sout; |
std::ostrstream sout; |
sout << z << '\0'; |
sout << z << '\0'; |
|
ptr = sout.str(); |
|
|
BLOCK_NEW_CMO(); |
BLOCK_NEW_CMO(); |
c = new_cmo_zz_set_string(sout.str()); |
c = new_cmo_zz_set_string(ptr); |
UNBLOCK_NEW_CMO(); |
UNBLOCK_NEW_CMO(); |
|
|
|
delete [] ptr; |
|
|
return (c); |
return (c); |
} |
} |
Line 339 cmo_to_ZZX(ZZX &f, cmo *m, cmo_indeterminate *&x) |
|
Line 346 cmo_to_ZZX(ZZX &f, cmo *m, cmo_indeterminate *&x) |
|
return (NTL_FAILURE); |
return (NTL_FAILURE); |
} |
} |
{ |
{ |
istrstream sin(str, strlen(str)); |
std::istrstream sin(str, strlen(str)); |
sin >> f; |
sin >> f; |
} |
} |
break; |
break; |