Lines Matching refs:F1
120 INPUT *F1, *F2; in main() local
126 F1 = &input1; in main()
135 F1->unpair = F2->unpair = 1; in main()
138 if ((F1->joinf = strtol(optarg, &end, 10)) < 1) in main()
142 --F1->joinf; in main()
155 F1->unpair = 1; in main()
171 if ((F1->joinf = F2->joinf = in main()
176 --F1->joinf; in main()
194 F1->unpair = 1; in main()
222 F1->fp = stdin; in main()
223 else if ((F1->fp = fopen(*argv, "r")) == NULL) in main()
230 if (F1->fp == stdin && F2->fp == stdin) in main()
233 slurp(F1); in main()
235 while (F1->setcnt && F2->setcnt) { in main()
236 cval = cmp(F1->set, F1->joinf, F2->set, F2->joinf); in main()
240 joinlines(F1, F2); in main()
241 slurp(F1); in main()
245 if (F1->unpair) in main()
246 joinlines(F1, NULL); in main()
247 slurp(F1); in main()
260 if (F1->unpair) in main()
261 while (F1->setcnt) { in main()
262 joinlines(F1, NULL); in main()
263 slurp(F1); in main()
432 joinlines(INPUT *F1, INPUT *F2) in joinlines() argument
442 for (cnt1 = 0; cnt1 < F1->setcnt; ++cnt1) in joinlines()
443 outoneline(F1, &F1->set[cnt1]); in joinlines()
446 for (cnt1 = 0; cnt1 < F1->setcnt; ++cnt1) in joinlines()
448 outtwoline(F1, &F1->set[cnt1], F2, &F2->set[cnt2]); in joinlines()
486 outtwoline(INPUT *F1, LINE *lp1, INPUT *F2, LINE *lp2) in outtwoline() argument
494 if (lp1->fieldcnt >= F1->joinf) in outtwoline()
495 outfield(lp1, F1->joinf, 0); in outtwoline()
507 outfield(lp1, F1->joinf, 0); in outtwoline()
509 if (F1->joinf != cnt) in outtwoline()