%PDF- %PDF-
| Direktori : /proc/self/root/data/old/usr/share/texlive/texmf-dist/tex/latex/moreverb/ |
| Current File : //proc/self/root/data/old/usr/share/texlive/texmf-dist/tex/latex/moreverb/moreverb.sty |
%%
%% This is file `moreverb.sty',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% moreverb.dtx (with options: `moreverb')
%%
%% Copyright Robin Fairbairns, 1997 2002
%%
%% This file is distributed under the terms of the latex project public
%% licence (LPPL: see CTAN macros/latex/base/lppl.txt), version 1.2 or
%% (at your convenience) any later version.
%%
\NeedsTeXFormat{LaTeX2e}
\ProvidesPackage{moreverb}
[2008/06/03 v2.3a
`more' verbatim facilities%
]
\@ifundefined{verbatim@processline}{\RequirePackage{verbatim}}{}
\def\verbatimwrite#1{%
\@ifundefined{verbatim@out}{\newwrite\verbatim@out}{}%
\@bsphack
\immediate\openout \verbatim@out #1
\let\do\@makeother\dospecials
\catcode`\^^M\active \catcode`\^^I=12
\def\verbatim@processline{%
\immediate\write\verbatim@out
{\the\verbatim@line}}%
\verbatim@start}
\def\endverbatimwrite{%
\immediate\closeout\verbatim@out
\@esphack}
\newcount\tab@position \newcount\tab@size
\def\verbatimtabsize{8\relax}
\def\@xobeytab{%
\loop
\toks@\expandafter{\the\toks@\@xobeysp}%
\advance\tab@position-1
\ifnum\tab@position>0 \repeat
}
\begingroup
\catcode`\^^I=\active
\gdef\@vobeytabs{\catcode`\^^I\active\let^^I\@xobeytab}%
\endgroup
\def\verbatim@tabexpand#1{%
\ifx#1\@nil
\the\toks@
\expandafter\par
\else
\ifx#1\@xobeytab
\@xobeytab
\else
\toks@\expandafter{\the\toks@#1}%
\advance\tab@position\m@ne
\fi
\ifnum\tab@position=0 \tab@position\tab@size \fi
\expandafter\verbatim@tabexpand
\fi
}
\newcount\listing@line \listing@line=1
\def\listing@step{1\relax}
\def\listinglabel#1{\llap{\small\rmfamily\the#1}\hskip\listingoffset\relax}
\def\thelisting@line{%
\setbox0\hbox{\listinglabel\listing@line}%
\@tempcnta=\listing@line
\divide\@tempcnta\listing@step \multiply\@tempcnta\listing@step
\ifnum\listing@line=\@ne
\unhbox0
\else
\ifnum\@tempcnta=\listing@line
\unhbox0
\else
\hskip\wd0
\fi
\fi}
\providecommand\listingoffset{1.5em}
\newcommand\listing[2][1]{%
\global\listing@line=#2\relax
\gdef\listing@step{#1\relax}
\listingcont}
\def\listingcont{%
\tab@size=\verbatimtabsize
\def\verbatim@processline{\tab@position\tab@size
\thelisting@line \global\advance\listing@line1
\toks@{}%
\expandafter\verbatim@tabexpand\the\verbatim@line\@nil}%
\@verbatim\frenchspacing\@vobeyspaces\@vobeytabs\verbatim@start}
\let\endlisting=\endtrivlist
\let\endlistingcont=\endtrivlist
\expandafter\newcommand\csname listing*\endcsname[2][1]{%
\global\listing@line=#2\relax
\gdef\listing@step{#1\relax}
\csname listingcont*\endcsname}
\@namedef{listingcont*}{%
\def\verbatim@processline{%
\thelisting@line \global\advance\listing@line1
\the\verbatim@line\par}%
\@verbatim\verbatim@start}
\expandafter\let\csname endlisting*\endcsname\endtrivlist
\expandafter\let\csname endlistingcont*\endcsname\endtrivlist
\def\listinginput{%
\@ifnextchar[%]
{\@listinginput}%
{\@listinginput[1]}}
\begingroup
\catcode`\~=\active \lccode`\~=`\^^M \lccode`\N=`\N
\lowercase{\endgroup
\def\@listinginput[#1]#2#3{\begingroup
\global\listing@line=#2
\gdef\listing@step{#1\relax}
\tab@size=\verbatimtabsize
\def\verbatim@processline{\tab@position\tab@size
\thelisting@line \global\advance\listing@line1
\toks@{}%
\expandafter\verbatim@tabexpand\the\verbatim@line\@nil}%
\@verbatim\frenchspacing\@vobeyspaces\@vobeytabs
\def\verbatim@addtoline##1~{%
\verbatim@line\expandafter{\the\verbatim@line##1}}%
\openin\verbatim@in@stream=#3
\ifeof\verbatim@in@stream
\PackageWarning{moreverb}{No file #3.}%
\else
\do@verbatimtabinput
\closein\verbatim@in@stream
\fi
\endtrivlist\endgroup
\@doendpe
}%
}
\def\verbatimcmd{%
\PackageError{moreverb}{The verbatimcmd environment is obsolete}%
{Use alltt (from the LaTeX required package
alltt) in place of verbatimcmd}%
}
\let\endverbatimcmd\relax
\def\boxedverbatim{%
\def\verbatim@processline{%
{\setbox0=\hbox{\the\verbatim@line}%
\hsize=\wd0 \the\verbatim@line\par}}%
\@minipagetrue % DPC
\@tempswatrue % DPC
\@totalleftmargin\z@ % MH
\setbox0=\vbox\bgroup \verbatim
}
\def\endboxedverbatim{%
\endverbatim
\unskip\setbox0=\lastbox % DPC
\egroup
\fbox{\box0}%
}
\newenvironment{verbatimtab}{\obeylines\@verbatimtab}{\endtrivlist}
\newcommand\@verbatimtab[1][\verbatimtabsize]{%
\do@verbatimtab{#1}{%
\@verbatim\frenchspacing\@vobeyspaces\@vobeytabs\verbatim@start}%
}
\def\do@verbatimtab#1#2{%
\tab@size=#1
\def\verbatim@processline{\tab@position\tab@size
\toks@{}%
\expandafter\verbatim@tabexpand\the\verbatim@line\@nil}%
#2%
}
\def\verbatimtabinput{%
\@ifnextchar[%]
{\@verbatimtabinput}%
{\@verbatimtabinput[\verbatimtabsize]}}
\begingroup
\catcode`\~=\active \lccode`\~=`\^^M \lccode`\N=`\N
\lowercase{\endgroup
\def\@verbatimtabinput[#1]#2{\begingroup
\do@verbatimtab{#1}{%
\@verbatim\frenchspacing\@vobeyspaces\@vobeytabs}%
\def\verbatim@addtoline##1~{%
\verbatim@line\expandafter{\the\verbatim@line##1}}%
\openin\verbatim@in@stream=#2
\ifeof\verbatim@in@stream
\PackageWarning{moreverb}{No file #2.}
\else
\@addtofilelist{#2}%
\do@verbatimtabinput
\closein\verbatim@in@stream
\fi
\endtrivlist\endgroup\@doendpe}%
}
\def\do@verbatimtabinput{%
\read\verbatim@in@stream to \verbtab@line
\ifeof\verbatim@in@stream
\else
\expandafter\verbatim@addtoline\verbtab@line
\verbatim@processline
\verbatim@startline
\expandafter\do@verbatimtabinput
\fi
}
\endinput
%%
%% End of file `moreverb.sty'.