|
|
1.1 root 1: \newwrite\indexfile
2: \def\makeindex{%
3: \immediate\openout\indexfile=\jobname.idx%
4: \def\index{\wrindex\indexfile}}
5: \def\wrindex#1#2{\xdef\gtempa{\write#1{%
6: #2<tab>\number\count0}}\gtempa}
7: \def\index{\begingroup \xindex}
8: \def\xindex#1{\endgroup}
9: \makeindex
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.