version 1.1, 1997/01/20 19:39:52 |
version 1.2, 1997/06/16 02:21:56 |
|
|
int i; |
int i; |
fldtab[0].tcol.p = clist+ncols-1; |
fldtab[0].tcol.p = clist+ncols-1; |
for (++fldtab; fldtab->icol.num; ++fldtab) { |
for (++fldtab; fldtab->icol.num; ++fldtab) { |
for (i = 0; fldtab->icol.num != clist[i].num; i++); |
for (i = 0; fldtab->icol.num != clist[i].num; i++) |
|
; |
fldtab->icol.p = clist + i; |
fldtab->icol.p = clist + i; |
if (!fldtab->tcol.num) |
if (!fldtab->tcol.num) |
continue; |
continue; |
for (i = 0; fldtab->tcol.num != clist[i].num; i++); |
for (i = 0; fldtab->tcol.num != clist[i].num; i++) |
|
; |
fldtab->tcol.p = clist + i; |
fldtab->tcol.p = clist + i; |
} |
} |
} |
} |
|
|
{ |
{ |
struct column *col; |
struct column *col; |
int tmp; |
int tmp; |
|
|
col = cur_fld->icol.num ? (&(*cur_fld).tcol) : (&(*cur_fld).icol); |
col = cur_fld->icol.num ? (&(*cur_fld).tcol) : (&(*cur_fld).icol); |
pos += sscanf(pos, "%d", &(col->num)); |
pos += sscanf(pos, "%d", &(col->num)); |
while (isdigit(*pos)) |
while (isdigit(*pos)) |
|
|
switch(desc) { |
switch(desc) { |
case 'b': |
case 'b': |
if (!tcolflag) |
if (!tcolflag) |
return(BI); |
return (BI); |
else |
else |
return(BT); |
return (BT); |
case 'd': return(D); |
case 'd': return (D); |
case 'f': return(F); |
case 'f': return (F); |
case 'i': return(I); |
case 'i': return (I); |
case 'n': return(N); |
case 'n': return (N); |
case 'r': return(R); |
case 'r': return (R); |
default: return(0); |
default: return (0); |
} |
} |
} |
} |
|
|
|
|
} |
} |
Rascii[REC_D] = RFtable[REC_D] = REC_D; |
Rascii[REC_D] = RFtable[REC_D] = REC_D; |
if (REC_D >= 'A' && REC_D < 'Z') |
if (REC_D >= 'A' && REC_D < 'Z') |
++Ftable[REC_D + ('a' - 'A')]; |
Ftable[REC_D + ('a' - 'A')]++; |
if (gflags & R && (!(gflags & F) || !SINGL_FLD)) |
if (gflags & R && (!(gflags & F) || !SINGL_FLD)) |
wts = Rascii; |
wts = Rascii; |
else if (!(gflags & F) || !SINGL_FLD) |
else if (!(gflags & F) || !SINGL_FLD) |