Return to bequal.c CVS log

Up to [CSRG BSD Unix] / 42BSD / ingres / source / gutil

BSD 4.2

# include	<useful.h>
# include	<sccs.h>

SCCSID(@(#)bequal.c	7.1	2/5/81)

/*
**  BLOCK EQUALITY TEST
**
**	blocks `a' and `b', both of length `l', are tested
**		for absolute equality.
**	Returns one for equal, zero otherwise.
*/

bool
bequal(a, b, l)
register char	*a, *b;
register int	l;
{
	while (l-- > 0)
		if (*a++ != *b++)
			return(FALSE);
	return(TRUE);
}

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.