1 /* Copyright (c) 1979 Regents of the University of California */
2 
3 static char sccsid[] = "@(#)RELTGT.c 1.1 10/30/80";
4 
5 #include "h00vars.h"
6 
7 RELTGT(bytecnt, left, right)
8 
9 	int		bytecnt;
10 	register long	*left;
11 	register long	*right;
12 {
13 	register int	longcnt;
14 
15 	longcnt = bytecnt >> 2;
16 	do	{
17 		if ((*right & ~*left) != 0)
18 			return FALSE;
19 		if ((*left++ & ~*right++) != 0)
20 			goto geq;
21 	} while (--longcnt);
22 	return FALSE;
23 geq:
24 	while (--longcnt) {
25 		if ((*right++ & ~*left++) != 0)
26 			return FALSE;
27 	}
28 	return TRUE;
29 }
30