22 lines
358 B
C
22 lines
358 B
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) return 1;
|
||
|
return -1;
|
||
|
}
|
||
|
if (l1 > 0 || l1 < l2) return -1;
|
||
|
return 1;
|
||
|
}
|