78.5 Index

<..context core-reg..>
 \def\:tempc[#1]#2#3{%
    \o:doprocesspageregister:[#1]{#2}{#3}%
    \def\:temp{\v!index}\ifx \:temp\currentregister
       \a:index
    \fi
 }
 \HLet\doprocesspageregister\:tempc
 \NewConfigure{index}{1}
 -_-_-

<..context core-reg..>+
 \NewConfigure{index-env}{2}
 \ifx \c!voor\:UnDef \else     %%%%%% pre 2005
   \expandafter\pend:def\csname
       \??id\v!index\c!voor\endcsname{\everypar{\HtmlPar}}
 \fi
 \ifx \c!na\:UnDef \else     %%%%%% pre 2005
   \expandafter\append:def\csname
       \??id\v!index\c!na\endcsname{\everypar{\HtmlPar}}
 \fi
 \ifx \c!commando\:UnDef \else     %%%%%% pre 2005
   \expandafter\pend:defI\csname
       \??id\v!index\c!commando\endcsname{\a:indexchar}
   \expandafter\append:defI\csname \??id\v!index\c!commando\endcsname{\b:indexchar}
 \fi
 \NewConfigure{indexchar}{2}
 -_-_-

<..context core-reg..>+
 \def\:tempc#1#2#3#4{%
    \def\:temp{#1}\def\:tempa{\s!ind}\ifx \:temp\:tempa
       \a:indexpage\o:gotonextinternal:{#1}{#2}{#3}{#4}%
    \else
       \o:gotonextinternal:{#1}{#2}{#3}{#4}%
    \fi
 }
 \HLet\gotonextinternal\:tempc
 \def\c:indexpage:{\def\a:indexpage##1##2##3##4##5}
 -_-_-