Return to ui.c CVS log | Up to [local] / OpenXM_contrib2 / asir2000 / engine |
File: [local] / OpenXM_contrib2 / asir2000 / engine / ui.c (download)
Revision 1.1, Fri Dec 3 07:39:08 1999 UTC (24 years, 9 months ago) by noro
Initial revision |
/* $OpenXM: OpenXM_contrib2/asir2000/engine/ui.c,v 1.1 1999/12/03 07:39:08 noro Exp $ */ #include "ca.h" int compui(vl,a,b) VL vl; USINT a,b; { if ( !a ) if ( !b ) return 0; else return -1; else if ( !b ) return 1; else if ( BDY(a) > BDY(b) ) return 1; else if ( BDY(a) < BDY(b) ) return -1; else return 0; }