Fields

<..TABLE tabbing..>+
 \def\:addfield{\global\setbox\@curline\hbox{\unhbox
    \@curline\unhbox\@curfield}}
 \def\:temp{%
    \global\setbox\@curline\hbox{\unhbox
       \@curline   \x:tab\D:tab
       \unhbox\@curfield  \y:tab\d:tab
       <.record len of prev field.>%
       \global\let\y:tab=\empty
 }}
 \HLet\@addfield=\:temp
 -_-_-

<..paused addfield..>
 \:addfield
 -_-_-

<..record len of prev field..>
 \ifx \y:tab\empty
    \tmp:dim=\dimen\@curtab
    \advance\tmp:dim by -\loc:tab
 \else
    \tmp:dim=\last:len\relax
 \fi
 \ifdim \tmp:dim >\z@
    \tmp:dim=\m:tab\tmp:dim
    \xdef\locs:tab{\locs:tab\space \pt:int\tmp:dim}%
 \fi
 \xdef\loc:tab{\the\dimen\@curtab}%
 -_-_-