void dotag(FILE *fd, char *s) { extern int columns, notabs; extern RunList *X; int i = (!strncmp(s, "MSC: ", 5))?5:0; int pid = s_trail ? pno : (X?X->pid:0); if (columns == 2) { pstext(pid, &s[i]); } else { if (!notabs) { printf(" "); for (i = 0; i <= pid; i++) { printf(" "); } } fprintf(fd, "%s", s); fflush(fd); } }
static void difcolumns(Lextok *n, char *tr, int v, int j, Queue *q) { extern int pno; if (j == 0) { Buf[0] = '\0'; channm(n); strcat(Buf, (strncmp(tr, "Sen", 3))?"?":"!"); } else strcat(Buf, ","); if (tr[0] == '[') strcat(Buf, "["); sr_buf(v, q->fld_width[j] == MTYPE); if (j == q->nflds - 1) { int cnr; if (s_trail) cnr = pno; else cnr = X?X->pid - Have_claim:0; if (tr[0] == '[') strcat(Buf, "]"); pstext(cnr, Buf); } }