ack/modules/src/flt_arith/ucmp.c

/*
  (c) copyright 1989 by the Vrije Universiteit, Amsterdam, The Netherlands.
  See the copyright notice in the ACK home directory, in the file "Copyright".
*/

/* $Header$ */

#include "misc.h"

int
ucmp(l1,l2)
	long l1,l2;
{
	if (l1 == l2) return 0;
	if (l2 >= 0) {
		if (l1 > l2 || l1 < 0) return 1;
		return -1;
	}
	if (l1 >= 0 || l1 < l2) return -1;
	return 1;
}