| version 1.83, 2005/10/26 10:44:50 |
version 1.84, 2005/10/26 10:47:00 |
|
|
| * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
| * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
| * |
* |
| * $OpenXM: OpenXM_contrib2/asir2000/builtin/strobj.c,v 1.82 2005/10/26 08:39:58 noro Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/builtin/strobj.c,v 1.83 2005/10/26 10:44:50 noro Exp $ |
| */ |
*/ |
| #include "ca.h" |
#include "ca.h" |
| #include "parse.h" |
#include "parse.h" |
| Line 2487 int fnode_normalize_comp(FNODE f1,FNODE f2) |
|
| Line 2487 int fnode_normalize_comp(FNODE f1,FNODE f2) |
|
| char *nm1,*nm2; |
char *nm1,*nm2; |
| FNODE b1,b2,e1,e2,g; |
FNODE b1,b2,e1,e2,g; |
| Num ee,ee1,c1,c2; |
Num ee,ee1,c1,c2; |
| |
|
| if ( IS_ZERO(f1) ) |
|
| if ( IS_ZERO(f2) ) return 0; |
|
| else return -1; |
|
| else if ( IS_ZERO(f2) ) return 1; |
|
| |
|
| if ( IS_NARYADD(f1) || IS_NARYADD(f2) ) { |
if ( IS_NARYADD(f1) || IS_NARYADD(f2) ) { |
| f1 = to_naryadd(f1); f2 = to_naryadd(f2); |
f1 = to_naryadd(f1); f2 = to_naryadd(f2); |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to strobj.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib2 / asir2000 / builtin