1 # include	"../hdr/defines.h"
2 
3 SCCSID(@(#)fmterr	2.1);
4 
5 fmterr(pkt)
6 register struct packet *pkt;
7 {
8 	fclose(pkt->p_iop);
9 	sprintf(Error,"format error at line %u (co4)",pkt->p_slnno);
10 	fatal(Error);
11 }
12