version 1.135, 2006/06/06 09:00:38 |
version 1.136, 2006/06/11 06:01:55 |
|
|
/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.134 2006/06/06 07:14:16 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/engine/nd.c,v 1.135 2006/06/06 09:00:38 noro Exp $ */ |
|
|
#include "nd.h" |
#include "nd.h" |
|
|
Line 2083 ND_pairs equivalent_pairs( ND_pairs d1, ND_pairs *pres |
|
Line 2083 ND_pairs equivalent_pairs( ND_pairs d1, ND_pairs *pres |
|
NODE update_base(NODE nd,int ndp) |
NODE update_base(NODE nd,int ndp) |
{ |
{ |
UINT *dl, *dln; |
UINT *dl, *dln; |
NODE last, p, head; |
NODE last, p, head, cur, prev; |
|
|
dl = DL(nd_psh[ndp]); |
dl = DL(nd_psh[ndp]); |
for ( head = last = 0, p = nd; p; ) { |
for ( head = last = 0, p = nd; p; ) { |
Line 2096 NODE update_base(NODE nd,int ndp) |
|
Line 2096 NODE update_base(NODE nd,int ndp) |
|
p = NEXT(last = p); |
p = NEXT(last = p); |
} |
} |
} |
} |
|
#if 1 |
head = append_one(head,ndp); |
head = append_one(head,ndp); |
|
#else |
|
for ( prev = 0, cur = head; cur; prev = cur, cur = NEXT(cur) ) |
|
if ( ndv_compare(&(nd_ps[ndp]),&(nd_ps[(int)BDY(cur)]))<0 ) break; |
|
MKNODE(p,(pointer)ndp,cur); |
|
if ( !prev ) |
|
head = p; |
|
else |
|
NEXT(prev) = p; |
|
#endif |
return head; |
return head; |
} |
} |
|
|