| version 1.9, 2004/03/04 03:31:28 |
version 1.11, 2004/03/10 02:41:08 |
|
|
| /* $OpenXM: OpenXM_contrib2/asir2000/parse/quote.c,v 1.8 2004/03/04 01:41:32 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/parse/quote.c,v 1.10 2004/03/09 08:02:01 noro Exp $ */ |
| |
|
| #include "ca.h" |
#include "ca.h" |
| #include "parse.h" |
#include "parse.h" |
| Line 158 void polytoquote(P a,QUOTE *c) |
|
| Line 158 void polytoquote(P a,QUOTE *c) |
|
| int n,i,sgn; |
int n,i,sgn; |
| QUOTE v,r,s,u; |
QUOTE v,r,s,u; |
| |
|
| if ( !a || (OID(a) == O_N) ) { |
if ( !a ) { |
| |
MKQUOTE(*c,mkfnode(1,I_FORMULA,(pointer)a)); |
| |
return; |
| |
} else if ( OID(a) == O_N ) { |
| MKQUOTE(*c,mkfnode(1,I_FORMULA,(pointer)a)); |
MKQUOTE(*c,mkfnode(1,I_FORMULA,(pointer)a)); |
| return; |
return; |
| } |
} |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to quote.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib2 / asir2000 / parse