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