blob: 1037b446912291253bd8da3ca7b2bd8842c72d94 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
%-*-tex-*-
% Status commands for each chapter.
% these write out the chapter code, page number, and previous chapter number.
\marginnotesfalse
\hfuzz=5pt
\newwrite\docstatus
\def\openstatusfile{\immediate\openout\docstatus=\jobname.sta}
\def\closestatusfile{\closeout\docstatus}
\def\writestatus#1{\immediate\write
\docstatus{\string\chstatus//#1//\the\chnum//\the\pageno//}}
\def\chstatus//#1//#2//#3//{\expandafter\def\csname#1:\endcsname{\chnum=#2
\pagenumber=#3}}
\def\getstatus#1{\csname#1:\endcsname}
\def\chcode#1{\subdocumentmacros{\input helphdr \bookstyle
\input masth.sta
\autonumberingon
\input masth.tag
\getstatus{#1}
\def\chcode##1{}
\def\writestatus##1{}
\indexingon
}
\writestatus{#1}}
|