OpenXM_contrib2/asir2018/engine/nd.c - diff

Return to nd.c CVS log

Up to [local] / OpenXM_contrib2 / asir2018 / engine

version 1.21, 2019/09/19 06:29:48

version 1.23, 2020/02/05 04:56:10

Line 1

/* $OpenXM: OpenXM_contrib2/asir2018/engine/nd.c,v 1.20 2019/09/15 08:46:12 noro Exp $ */

/* $OpenXM: OpenXM_contrib2/asir2018/engine/nd.c,v 1.22 2019/11/21 01:54:01 noro Exp $ */

#include "nd.h"

Line 754 int ndl_module_compare(UINT *d1,UINT *d2)

switch ( nd_module_ordtype ) {

case 0:

if ( (c = ndl_lex_compare(d1,d2)) != 0 ) return c;

if ( (c = (*ndl_base_compare_function)(d1,d2)) != 0 ) return c;

else if ( MPOS(d1) > MPOS(d2) ) return -1;

else if ( MPOS(d1) < MPOS(d2) ) return 1;

else return 0;

Line 5538 void dpm_sort(DPM p,DPM *rp)

int dpm_comp(DPM *a,DPM *b)

{

return compdpm(CO,*a,*b);

return -compdpm(CO,*a,*b);

}

NODE dpm_sort_list(NODE l)