Annotation of OpenXM_contrib2/asir2000/engine/ui.c, Revision 1.1
1.1 ! noro 1: /* $OpenXM: OpenXM/src/asir99/engine/ui.c,v 1.1.1.1 1999/11/10 08:12:26 noro Exp $ */
! 2: #include "ca.h"
! 3:
! 4: int compui(vl,a,b)
! 5: VL vl;
! 6: USINT a,b;
! 7: {
! 8: if ( !a )
! 9: if ( !b )
! 10: return 0;
! 11: else
! 12: return -1;
! 13: else if ( !b )
! 14: return 1;
! 15: else if ( BDY(a) > BDY(b) )
! 16: return 1;
! 17: else if ( BDY(a) < BDY(b) )
! 18: return -1;
! 19: else
! 20: return 0;
! 21: }
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>