version 1.1, 2004/08/18 00:17:02 |
version 1.2, 2005/07/03 10:19:22 |
Line 285 void D_CHSGNP(p,pr) |
|
Line 285 void D_CHSGNP(p,pr) |
|
P p,*pr; |
P p,*pr; |
{ |
{ |
register DCP dc,dcr,dcr0; |
register DCP dc,dcr,dcr0; |
P t; |
|
|
|
if ( !p ) |
if ( !p ) |
*pr = NULL; |
*pr = NULL; |
|
|
NEWMQ(mq); CONT(mq)=mod-CONT((MQ)p); *pr = (P)mq; |
NEWMQ(mq); CONT(mq)=mod-CONT((MQ)p); *pr = (P)mq; |
#endif |
#endif |
#else |
#else |
CHSGNNUM(p,t); *pr = t; |
CHSGNNUM(p,*pr); |
#endif |
#endif |
} else { |
} else { |
for ( dcr0 = 0, dc = DC(p); dc; dc = NEXT(dc) ) { |
for ( dcr0 = 0, dc = DC(p); dc; dc = NEXT(dc) ) { |