Lines Matching refs:F1
124 INPUT *F1, *F2; in main() local
128 F1 = &input1; in main()
137 F1->unpair = F2->unpair = 1; in main()
140 if ((F1->joinf = strtol(optarg, &end, 10)) < 1) { in main()
148 --F1->joinf; in main()
165 F1->unpair = 1; in main()
184 if ((F1->joinf = F2->joinf = in main()
193 --F1->joinf; in main()
211 F1->unpair = 1; in main()
242 F1->fp = stdin; in main()
243 else if ((F1->fp = fopen(*argv, "r")) == NULL) in main()
250 if (F1->fp == stdin && F2->fp == stdin) in main()
253 slurp(F1); in main()
255 while (F1->setcnt && F2->setcnt) { in main()
256 cval = cmp(F1->set, F1->joinf, F2->set, F2->joinf); in main()
260 joinlines(F1, F2); in main()
261 slurp(F1); in main()
265 if (F1->unpair) in main()
266 joinlines(F1, NULL); in main()
267 slurp(F1); in main()
280 if (F1->unpair) in main()
281 while (F1->setcnt) { in main()
282 joinlines(F1, NULL); in main()
283 slurp(F1); in main()
285 if (F1->fp != stdin) in main()
286 fclose(F1->fp); in main()
411 joinlines(INPUT *F1, INPUT *F2) in joinlines() argument
421 for (cnt1 = 0; cnt1 < F1->setcnt; ++cnt1) in joinlines()
422 outoneline(F1, &F1->set[cnt1]); in joinlines()
425 for (cnt1 = 0; cnt1 < F1->setcnt; ++cnt1) in joinlines()
427 outtwoline(F1, &F1->set[cnt1], F2, &F2->set[cnt2]); in joinlines()
457 outtwoline(INPUT *F1, LINE *lp1, INPUT *F2, LINE *lp2) in outtwoline() argument
473 outfield(lp1, F1->joinf); in outtwoline()
475 if (F1->joinf != cnt) in outtwoline()