xref: /csrg-svn/old/lib2648/zermat.c (revision 18791)
111499Sralph /*
2*18791Sdist  * Copyright (c) 1980 Regents of the University of California.
3*18791Sdist  * All rights reserved.  The Berkeley software License Agreement
4*18791Sdist  * specifies the terms and conditions for redistribution.
5*18791Sdist  */
6*18791Sdist 
7*18791Sdist #ifndef lint
8*18791Sdist static char sccsid[] = "@(#)zermat.c	5.1 (Berkeley) 04/26/85";
9*18791Sdist #endif not lint
10*18791Sdist 
11*18791Sdist /*
1211499Sralph  * zermat: set a matrix to all zeros
1311499Sralph  */
1411499Sralph 
1511499Sralph #include "bit.h"
1611499Sralph 
zermat(m,rows,cols)1711499Sralph zermat(m, rows, cols)
1811499Sralph bitmat m;
1911499Sralph int rows, cols;
2011499Sralph {
2111499Sralph 	register int size = ((cols + 7) >> 3) * rows;
2211499Sralph 	register char *p;
2311499Sralph 
2411499Sralph 	for (p = &m[size]; p>=m; )
2511499Sralph 		*--p = 0;
2611499Sralph }
27