diff options
Diffstat (limited to 'macros/inrstex/inrsdoc/status.tex')
-rw-r--r-- | macros/inrstex/inrsdoc/status.tex | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/macros/inrstex/inrsdoc/status.tex b/macros/inrstex/inrsdoc/status.tex new file mode 100644 index 0000000000..1037b44691 --- /dev/null +++ b/macros/inrstex/inrsdoc/status.tex @@ -0,0 +1,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}} + |