/*
   =============================================================================
	vclrs.c -- clear a VSDD text line to a specified value
	Version 2 -- 1987-04-15 -- D.N. Lynx Crowe
	(c) Copyright 1987 -- D.N. Lynx Crowe

	vclrs(obase, row, col, nc, ch, atr)
	unsigned int obase[];
	int row, col, nc, ch, atr;

		Clear 'nc' characters in the text object 'obase' to 'ch',
		using atrributes 'atr', starting at ('row','col');

		No error checking is done, so beware.
   =============================================================================
*/

extern	void	vputc(unsigned *sbase, unsigned row, unsigned col, unsigned c, unsigned attrib);

/*
   =============================================================================
	vclrs(obase, row, col, nc, ch, atr) -- clear a line on the VSDD
   =============================================================================
*/

void vclrs(unsigned int obase[], int row, int col, int nc, int ch, int atr)
{
	while (nc--)
		vputc(obase, row, col++, ch, atr);
}