BSD 4_1_snap release
[unix-history] / usr / src / lib / libpc / IN.c
CommitLineData
a16e27c5
KM
1/* Copyright (c) 1979 Regents of the University of California */
2
4b9ccde7 3static char sccsid[] = "@(#)IN.c 1.2 3/7/81";
a16e27c5
KM
4
5#include "h00vars.h"
6
492cc5d3 7bool
a16e27c5
KM
8IN(element, lower, upper, setptr)
9
492cc5d3
KM
10 long element; /* element to check */
11 long lower; /* lowest element of set */
12 long upper; /* upper - lower of set */
a16e27c5
KM
13 char setptr[]; /* pointer to set */
14{
492cc5d3 15 register int indx;
a16e27c5
KM
16
17 if ((indx = element - lower) < 0 || indx > upper)
18 return FALSE;
492cc5d3 19 if (setptr[indx >> LG2BITSBYTE] & (1 << (indx & MSKBITSBYTE)))
a16e27c5
KM
20 return TRUE;
21 return FALSE;
22}