cislovani radku

[marcel svitalsky]

Makro od p. Olsaka z pdf verze TBN str. 29 pro "verbatim" prostredi s cislovanim 
radku:


"""
Shrneme vaechny opravy do nové  verze  naseho makra. Pro ilustraci do kódu navíc 
pridáme císlování rádku:

81 \newcount\num
82 {\obeyspaces \gdef\activespace{\obeyspaces\let =\ }}
83 \def\setverb{\def\do##1{\catcode ##1=12}\dospecials}
84 \def\begtt{\par\bgroup \setverb \activespace
85 \everypar={\global\advance\num1 \llap{\sevenrm\the\num\quad}}
86 \def\par##1{\endgraf\ifx##1\par\leavevmode\fi ##1}
87 \obeylines \startverb}
88 {\catcode \|=0 \catcode \\=12
89 |gdef|startverb#1\endtt{|tt#1|egroup}}
"""

TBN v pdf je myslim nekde ke stazeni, popr. Vam ji muzu poslat.

Marcel Svitalsky