1*40865Sbostic /*- 2*40865Sbostic * Copyright (c) 1979 The Regents of the University of California. 3*40865Sbostic * All rights reserved. 4*40865Sbostic * 5*40865Sbostic * %sccs.include.redist.c% 6*40865Sbostic */ 71691Smckusick 8*40865Sbostic #ifndef lint 9*40865Sbostic static char sccsid[] = "@(#)RELTGT.c 1.3 (Berkeley) 04/09/90"; 10*40865Sbostic #endif /* not lint */ 111691Smckusick 121691Smckusick #include "h00vars.h" 131691Smckusick 143022Smckusic bool 151691Smckusick RELTGT(bytecnt, left, right) 161691Smckusick 173022Smckusic long bytecnt; 181691Smckusick register long *left; 191691Smckusick register long *right; 201691Smckusick { 211691Smckusick register int longcnt; 221691Smckusick 231691Smckusick longcnt = bytecnt >> 2; 241691Smckusick do { 251691Smckusick if ((*right & ~*left) != 0) 261691Smckusick return FALSE; 271691Smckusick if ((*left++ & ~*right++) != 0) 281691Smckusick goto geq; 291691Smckusick } while (--longcnt); 301691Smckusick return FALSE; 311691Smckusick geq: 321691Smckusick while (--longcnt) { 331691Smckusick if ((*right++ & ~*left++) != 0) 341691Smckusick return FALSE; 351691Smckusick } 361691Smckusick return TRUE; 371691Smckusick } 38