Home | History | Annotate | Download | only in join

Lines Matching defs:F1

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