20 lines
		
	
	
	
		
			292 B
		
	
	
	
		
			C
		
	
	
	
	
	
			
		
		
	
	
			20 lines
		
	
	
	
		
			292 B
		
	
	
	
		
			C
		
	
	
	
	
	
#include <system.h>
 | 
						|
#include <varargs.h>
 | 
						|
 | 
						|
extern int nerrors;
 | 
						|
 | 
						|
/*VARARGS*/
 | 
						|
error(va_alist)
 | 
						|
va_dcl
 | 
						|
{
 | 
						|
	char *fmt;
 | 
						|
	va_list pvar;
 | 
						|
 | 
						|
	va_start(pvar);
 | 
						|
	fmt = va_arg(pvar, char *);
 | 
						|
	fprint( STDERR, "!! ERROR :	");
 | 
						|
	doprnt( STDERR, fmt, pvar);
 | 
						|
	fprint( STDERR, "	!!\n");
 | 
						|
	va_end(pvar);
 | 
						|
	nerrors++;
 | 
						|
}
 |