| version 1.25, 2017/12/08 17:04:15 |
version 1.26, 2020/06/10 21:00:01 |
|
|
| } |
} |
| } |
} |
| setfval(nfloc, (Awkfloat) lastfld); |
setfval(nfloc, (Awkfloat) lastfld); |
| |
donerec = 1; /* restore */ |
| if (dbg) { |
if (dbg) { |
| for (j = 0; j <= lastfld; j++) { |
for (j = 0; j <= lastfld; j++) { |
| p = fldtab[j]; |
p = fldtab[j]; |
|
|
| cleanfld(lastfld+1, n); |
cleanfld(lastfld+1, n); |
| lastfld = n; |
lastfld = n; |
| setfval(nfloc, (Awkfloat) n); |
setfval(nfloc, (Awkfloat) n); |
| |
} |
| |
|
| |
void setlastfld(int n) /* set lastfld cleaning fldtab cells if necessary */ |
| |
{ |
| |
if (n > nfields) |
| |
growfldtab(n); |
| |
|
| |
if (lastfld < n) |
| |
cleanfld(lastfld+1, n); |
| |
else |
| |
cleanfld(n+1, lastfld); |
| |
|
| |
lastfld = n; |
| } |
} |
| |
|
| Cell *fieldadr(int n) /* get nth field */ |
Cell *fieldadr(int n) /* get nth field */ |
![[BACK]](/icons/back.gif){kind=icon}
Return to lib.c CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [local] / src / usr.bin / awk