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