| version 1.17, 2003/03/18 05:20:06 |
version 1.18, 2003/03/23 21:56:11 |
|
|
| /* -*- mode: C -*- */ |
/* -*- mode: C -*- */ |
| /* $OpenXM: OpenXM/src/ox_math/mlo.c,v 1.16 2003/03/16 16:58:48 ohara Exp $ */ |
/* $OpenXM: OpenXM/src/ox_math/mlo.c,v 1.17 2003/03/18 05:20:06 ohara Exp $ */ |
| |
|
| /* |
/* |
| Copyright (C) Katsuyoshi OHARA, 2000. |
Copyright (C) Katsuyoshi OHARA, 2000. |
| Line 88 mlo *receive_mlo_zz() |
|
| Line 88 mlo *receive_mlo_zz() |
|
| |
|
| MLGetString(stdlink, &s); |
MLGetString(stdlink, &s); |
| ox_printf("%s", s); |
ox_printf("%s", s); |
| |
#if defined(WITH_GMP) |
| m = (mlo *)new_cmo_zz_set_string(s); |
m = (mlo *)new_cmo_zz_set_string(s); |
| |
#else |
| |
m = (mlo *)new_cmo_int32(atoi(s)); |
| |
#endif /* WITH_GMP */ |
| MLDisownString(stdlink, s); |
MLDisownString(stdlink, s); |
| return m; |
return m; |
| } |
} |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to mlo.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / ox_math