123 	FILE *fin;  in main()  local
132 	if ((fin = fopen("DESC", "r")) == NULL) {  in main()
136 	while (fscanf(fin, "%s", cmd) != EOF) {  in main()
138 			skipline(fin);  in main()
140 			fscanf(fin, "%hd", &dev.res);  in main()
142 			fscanf(fin, "%hd", &dev.hor);  in main()
144 			fscanf(fin, "%hd", &dev.vert);  in main()
146 			fscanf(fin, "%hd", &dev.unitwidth);  in main()
148 			fscanf(fin, "%hd", &dev.sizescale);  in main()
150 			fscanf(fin, "%hd", &dev.paperwidth);  in main()
152 			fscanf(fin, "%hd", &dev.paperlength);  in main()
154 			fscanf(fin, "%hd", &dev.biggestfont);  in main()
156 			fscanf(fin, "%hd", &dev.spare2);  in main()
159 			while (fscanf(fin, "%d", &v) != EOF && v != 0)  in main()
163 			fscanf(fin, "%hd", &dev.nfonts);  in main()
165 				fscanf(fin, "%s", fname[i]);  in main()
169 			while (fscanf(fin, "%s", p) != EOF) {  in main()
220 	FILE *fin;  local
225 	if ((fin = fopen(name, "r")) == NULL) {
236 	while (fscanf(fin, "%s", cmd) != EOF) {
238 			skipline(fin);
240 			fscanf(fin, "%s", font.namefont);
242 			fscanf(fin, "%s", font.intname);
246 			fscanf(fin, "%1s", &font.spare1);
248 			font.ligfont = getlig(fin);
250 			fscanf(fin, "%d", &spacewidth);
253 			skipline(fin);
256 			while (fgets(buf, 100, fin) != NULL) {
298 	fclose(fin);
313 getlig(fin)	/* pick up ligature list */  in getlig()  argument
314 	FILE *fin;  in getlig()
320 	while (fscanf(fin, "%s", temp) != EOF && strcmp(temp, "0") != 0) {
334 	skipline(fin);