* Copyright (c) 1979 The Regents of the University of California.
* %sccs.include.redist.c%
static char sccsid
[] = "@(#)IN.c 1.3 (Berkeley) %G%";
IN(element
, lower
, upper
, setptr
)
long element
; /* element to check */
long lower
; /* lowest element of set */
long upper
; /* upper - lower of set */
char setptr
[]; /* pointer to set */
if ((indx
= element
- lower
) < 0 || indx
> upper
)
if (setptr
[indx
>> LG2BITSBYTE
] & (1 << (indx
& MSKBITSBYTE
)))