[unix-history] / usr / src / old / lib2648 / zermat.c

/*	zermat.c	4.1	83/03/09	*/
/*
 * zermat: set a matrix to all zeros
 */

#include "bit.h"

zermat(m, rows, cols)
bitmat m;
int rows, cols;
{
	register int size = ((cols + 7) >> 3) * rows;
	register char *p;

	for (p = &m[size]; p>=m; )
		*--p = 0;
}
Commit	Line	Data
4ad7ece9 RC	1	/* zermat.c 4.1 83/03/09 */
	2	/*
	3	* zermat: set a matrix to all zeros
	4	*/
	5
	6	#include "bit.h"
	7
	8	zermat(m, rows, cols)
	9	bitmat m;
	10	int rows, cols;
	11	{
	12	register int size = ((cols + 7) >> 3) * rows;
	13	register char *p;
	14
	15	for (p = &m[size]; p>=m; )
	16	*--p = 0;
	17	}