Commit | Line | Data |
---|---|---|
0d78ca85 KB |
1 | /*- |
2 | * Copyright (c) 1979 The Regents of the University of California. | |
3 | * All rights reserved. | |
4 | * | |
5 | * %sccs.include.redist.c% | |
6 | */ | |
4ca77214 | 7 | |
0d78ca85 KB |
8 | #ifndef lint |
9 | static char sccsid[] = "@(#)RELTLT.c 1.3 (Berkeley) %G%"; | |
10 | #endif /* not lint */ | |
4ca77214 KM |
11 | |
12 | #include "h00vars.h" | |
13 | ||
492cc5d3 | 14 | bool |
4ca77214 KM |
15 | RELTLT(bytecnt, left, right) |
16 | ||
492cc5d3 | 17 | long bytecnt; |
4ca77214 KM |
18 | register long *left; |
19 | register long *right; | |
20 | { | |
21 | register int longcnt; | |
22 | ||
23 | longcnt = bytecnt >> 2; | |
24 | do { | |
25 | if ((*left & ~*right) != 0) | |
26 | return FALSE; | |
27 | if ((*right++ & ~*left++) != 0) | |
28 | goto leq; | |
29 | } while (--longcnt); | |
30 | return FALSE; | |
31 | leq: | |
32 | while (--longcnt) { | |
33 | if ((*left++ & ~*right++) != 0) | |
34 | return FALSE; | |
35 | } | |
36 | return TRUE; | |
37 | } |