35 FILE	*infile	= NULL;  variable
99 	infile = stdin;		/* no filenames, so use stdin */  in initgetrec()
123 	while (argno < *ARGC || infile == stdin) {  in getrec()
125 		if (infile == NULL) {	/* have to open a new file */  in getrec()
139 				infile = stdin;  in getrec()
140 			else if ((infile = fopen(file, "r")) == NULL)  in getrec()
144 		c = readrec(&buf, &bufsize, infile);  in getrec()
163 		if (infile != stdin)  in getrec()
164 			fclose(infile);  in getrec()
165 		infile = NULL;  in getrec()
176 	if (infile != NULL && infile != stdin)  in nextfile()
177 		fclose(infile);  in nextfile()
178 	infile = NULL;  in nextfile()