summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/lshort-russian/src/fancyvrb.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/lshort-russian/src/fancyvrb.sty')
-rw-r--r--Master/texmf-dist/doc/latex/lshort-russian/src/fancyvrb.sty1426
1 files changed, 0 insertions, 1426 deletions
diff --git a/Master/texmf-dist/doc/latex/lshort-russian/src/fancyvrb.sty b/Master/texmf-dist/doc/latex/lshort-russian/src/fancyvrb.sty
deleted file mode 100644
index 1ce5df7c8d6..00000000000
--- a/Master/texmf-dist/doc/latex/lshort-russian/src/fancyvrb.sty
+++ /dev/null
@@ -1,1426 +0,0 @@
-%%
-%% This is file `fancyvrb.sty',
-%% generated with the docstrip utility.
-%%
-%% The original source files were:
-%%
-%% fancyvrb.dtx (with options: `fancyvrb')
-%%
-%% IMPORTANT NOTICE:
-%%
-%% For the copyright see the source file.
-%%
-%% Any modified versions of this file must be renamed
-%% with new filenames distinct from fancyvrb.sty.
-%%
-%% For distribution of the original source see the terms
-%% for copying and modification in the file fancyvrb.dtx.
-%%
-%% This generated file may be distributed as long as the
-%% original source files, as listed above, are part of the
-%% same distribution. (The sources need not necessarily be
-%% in the same archive or directory.)
-%%
-%% Package `fancyvrb'
-%%
-%% Timothy Van Zandt <tvz@zandtwerk.kellogg.nwu.edu>
-%% July 17, 1998
-%%
-%% COPYRIGHT 1992-1999, by Timothy Van Zandt <tvz@zandtwerk.kellogg.nwu.edu>
-%%
-%% This package may be distributed under the terms of the LaTeX Project Public
-%% License, as described in lppl.txt in the base LaTeX distribution.
-%% Either version 1.0 or, at your option, any later version.
-%%
-%% DESCRIPTION:
-%% fancyvrb.sty is a LaTeX style option, containing flexible
-%% verbatim environments and commands and extensive documentation.
-%%
-%% This is a companion to the `fancybox' package.
-%%
-\NeedsTeXFormat{LaTeX2e}
-\def\fileversion{2.6, with DG/SPQR fixes}
-\def\filedate{1998/07/17}
-\ProvidesPackage{fancyvrb}[\filedate]
-\message{Style option: `fancyvrb' v\fileversion \space <\filedate> (tvz)}
-\csname fancyvrb@loaded\endcsname
-\let\fancyvrb@loaded\endinput
-\def\FV@Error#1#2{%
- \edef\@tempc{#2}\expandafter\errhelp\expandafter{\@tempc}%
- \errmessage{FancyVerb Error:^^J\space\space #1^^J}}
-
-\def\FV@eha{Your command was ignored. Type <return> to continue.}
-%% DG/SR modification begin - Jan. 21, 1998
-%% Suggested by Bernard Gaulle to solve a compatibility problem with `french'
-%% (it introduce the restriction to put \VerbatimFootnotes AFTER the preambule)
-%%\def\VerbatimFootnotes{\let\@footnotetext\V@footnotetext}
-\let\V@footnote\footnote
-\def\VerbatimFootnotes{%
-\let\@footnotetext\V@footnotetext%
-\let\footnote\V@footnote}
-%% DG/SR modification end
-\long\def\V@footnotetext{%
- \afterassignment\V@@footnotetext
- \let\@tempa}
-\def\V@@footnotetext{%
- \insert\footins\bgroup
- \csname reset@font\endcsname
- \footnotesize
- \interlinepenalty\interfootnotelinepenalty
- \splittopskip\footnotesep
- \splitmaxdepth\dp\strutbox
- \floatingpenalty \@MM
- \hsize\columnwidth
- \@parboxrestore
- \edef\@currentlabel{\csname p@footnote\endcsname\@thefnmark}%
- \@makefntext{}%
- \rule{\z@}{\footnotesep}%
- \bgroup
- \aftergroup\V@@@footnotetext
- \ignorespaces}
-\def\V@@@footnotetext{\strut\egroup}
-\RequirePackage{keyval}
-\def\define@booleankey#1#2#3#4{%
- \@namedef{KV@#1@#2@default}{#3}%
- \@namedef{KV@#1@#2@false}{#4}%
- \@namedef{KV@#1@#2}##1{\KV@booleankey{##1}{#1}{#2}}}
-\def\KV@booleankey#1#2#3{%
- \edef\@tempa{#1}\expandafter\KV@@booleankey\@tempa\relax\@nil{#2}{#3}}
-\def\KV@@booleankey#1#2\@nil#3#4{%
- \@nameuse{KV@#3@#4@\if t#1default\else\if T#1default\else false\fi\fi}}
-\def\FV@None{none}
-\def\FV@Auto{auto}
-\def\fvset#1{\setkeys{FV}{#1}}
-\def\FV@Command#1#2{%
- \@ifstar
- {\def\FV@KeyValues{#1,showspaces}\FV@@Command{#2}}%
- {\def\FV@KeyValues{#1}\FV@@Command{#2}}}
-\def\FV@@Command#1{%
- \@ifnextchar[%
- {\FV@GetKeyValues{\@nameuse{FVC@#1}}}%
- {\@nameuse{FVC@#1}}}
-\def\FV@GetKeyValues#1[#2]{%
- \expandafter\def\expandafter\FV@KeyValues\expandafter{\FV@KeyValues,#2}#1}
-\def\@CustomVerbatimCommand#1#2#3#4{%
- \begingroup\fvset{#4}\endgroup % If there are errors, it easier to locate.
-%% DG/SR modification begin - Jan. 13, 1998
-%% \def\@tempa##1##2\@nil{\def\@tempa{##2}}%
-%% \expandafter\@tempa\string#3\@empty\@nil
-%% \@ifundefined{FVC@\@tempa}%
- \@ifundefined{FVC@#3}%
-%% DG/SR modification end
- {\FV@Error{Command `\string#3' is not a FancyVerb command.}\@eha}%
- {#1{#2}{\FV@Command{#4}{#3}}}}
-\def\CustomVerbatimCommand{\@CustomVerbatimCommand\newcommand}
-\def\RecustomVerbatimCommand{\@CustomVerbatimCommand\renewcommand}
-\def\FV@Environment#1#2{%
- \def\FV@KeyValues{#1}%
- \catcode`\^^M=\active
- \@ifnextchar[%
- {\catcode`\^^M=5 \FV@GetKeyValues{\@nameuse{FVB@#2}}}%
- {\catcode`\^^M=5 \@nameuse{FVB@#2}}}
-\def\CustomVerbatimEnvironment{\@CustomVerbatimEnvironment\newenvironment}
-\def\RecustomVerbatimEnvironment{\@CustomVerbatimEnvironment\renewenvironment}
-\def\@CustomVerbatimEnvironment#1#2#3#4{%
- \begingroup\fvset{#4}\endgroup % If there are errors, it easier to locate.
- \@ifundefined{FVB@#3}%
- {\FV@Error{`#3' is not a FancyVerb environment.}\@eha}%
- {#1{#2}{\FV@Environment{#4}{#3}}{\@nameuse{FVE@#3}}%
- #1{#2*}{\FV@Environment{#4,showspaces}{#3}}{\@nameuse{FVE@#3}}}}
-\def\DefineVerbatimEnvironment#1#2#3{%
- \@namedef{#1}{\FV@Environment{#3}{#2}}%
- \@namedef{end#1}{\@nameuse{FVE@#2}}%
- \@namedef{#1*}{\FV@Environment{#3,showspaces}{#2}}%
- \@namedef{end#1*}{\@nameuse{FVE@#2}}}
-\def\FV@UseKeyValues{%
- \ifx\FV@KeyValues\@empty\else
- \def\KV@prefix{KV@FV@}%
- \expandafter\KV@do\FV@KeyValues,\relax,%
- \def\FV@KeyValues{}%
- \fi}
-\def\FV@CatCodes{%
- \let\do\@makeother\dospecials % The usual stuff.
- \FV@ActiveWhiteSpace % See below.
- \FV@FontScanPrep % See below.
- \FV@CatCodesHook % A style hook.
- \FancyVerbCodes} % A user-defined hook.
-\def\FV@ActiveWhiteSpace{%
- \catcode`\^^M=\active % End of line
- \catcode`\ =\active % Space
- \catcode`\^^I=\active} % Tab
-\def\FV@CatCodesHook{}
-\def\FV@AddToHook#1#2{%
- \expandafter\def\expandafter#1\expandafter{#1#2\relax}}
-\define@key{FV}{codes}[]{\def\FancyVerbCodes{#1\relax}}
-\define@key{FV}{codes*}{%
- \expandafter\def\expandafter\FancyVerbCodes\expandafter{%
- \FancyVerbCodes#1\relax}}
-\fvset{codes}
-\define@key{FV}{commandchars}[\\\{\}]%
- {\def\@tempa{#1}%
- \ifx\@tempa\FV@None
- \let\FV@CommandChars\relax
- \else
- \FV@DefineCommandChars#1\relax\relax\relax
- \fi}
-\def\FV@DefineCommandChars#1#2#3{%
- \def\FV@CommandChars{%
- \catcode`#1=0\relax\catcode`#2=1\relax\catcode`#3=2\relax}}
-\FV@AddToHook\FV@CatCodesHook\FV@CommandChars
-\define@key{FV}{commentchar}[\%]{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@None
- \let\FV@CommentChar\relax
- \else
- \def\FV@CommentChar{\catcode`#1=14}%
- \fi}
-\FV@AddToHook\FV@CatCodesHook\FV@CommentChar
-\fvset{commandchars=none,commentchar=none}
-\define@key{FV}{firstline}{%
- \afterassignment\FV@ParseStart\@tempcnta=0#1\relax\@nil{#1}}
-\def\FV@ParseStart#1\relax\@nil#2{%
- \ifx\@nil#1\@nil
- \edef\FancyVerbStartNum{\the\@tempcnta}%
- \let\FancyVerbStartString\relax
- \else
- \edef\FancyVerbStartString{#2}%
- \fi}
-\def\KV@FV@firstline@default{%
- \let\FancyVerbStartNum\z@
- \let\FancyVerbStartString\relax}
-\define@key{FV}{lastline}{%
- \afterassignment\FV@ParseStop\@tempcnta=0#1\relax\@nil{#1}}
-\def\FV@ParseStop#1\relax\@nil#2{%
- \ifx\@nil#1\@nil
- \edef\FancyVerbStopNum{\the\@tempcnta}%
- \let\FancyVerbStopString\relax
- \else
- \edef\FancyVerbStopString{#2}%
- \fi}
-\def\KV@FV@lastline@default{%
- \let\FancyVerbStopNum\z@
- \let\FancyVerbStopString\relax}
-\fvset{firstline,lastline}
-\newcount\FV@CodeLineNo
-\def\FV@PreProcessLine{%
- \global\advance\FV@CodeLineNo\@ne
- \FV@FindStartStop}
-\def\FV@@PreProcessLine{%
- \FV@StepLineNo
- \FV@Gobble
- \expandafter\FV@ProcessLine\expandafter{\FV@Line}}
-\def\FV@FindStartStop{\FV@DefineFindStart\FV@FindStartStop}
-%% \def\FV@DefinePreProcessLine{%
-%% \setcounter{FancyVerbLine}{0}%
-%% \FV@DefineFindStart}
-\def\FV@DefineFindStart{%
- \ifx\FancyVerbStartString\relax
- \ifnum\FancyVerbStartNum<\tw@
- \FV@DefineFindStop
- \else
- \let\FV@FindStartStop\FV@FindStartNum
- \fi
- \else
- \let\FV@FindStartStop\FV@FindStartString
- \fi}
-\def\FV@FindStartNum{%
- \ifnum\FancyVerbStartNum>\FV@CodeLineNo\else
- \FV@DefineFindStop
- \expandafter\FV@@PreProcessLine
- \fi}
-%% SR modification begin - 1996
-\def\FV@FindStartString{%
- \expandafter\FV@@FindStartString
-{\meaning\FV@Line}%
-{\meaning\FancyVerbStartString}%
-}
-\def\FV@@FindStartString#1#2{%
-\edef\@fooA{#1}\edef\@fooB{#2}%
- \ifx\@fooA\@fooB
- \FV@DefineFindStop
- \fi
-}
-%% SR modification end
-\def\FV@DefineFindStop{%
- \ifx\FancyVerbStopString\relax
- \ifnum\FancyVerbStopNum<\@ne
- \let\FV@FindStartStop\FV@@PreProcessLine
- \else
- \let\FV@FindStartStop\FV@FindStopNum
- \fi
- \else
- \let\FV@FindStartStop\FV@FindStopString
- \fi}
-\def\FV@FindStopNum{%
- \ifnum\FancyVerbStopNum=\FV@CodeLineNo
- \let\FV@FindStartStop\relax
- \ifeof\FV@InFile\else
- \immediate\closein\FV@InFile
- \fi
- \fi
- \FV@@PreProcessLine}
-%% SR modification begin - 1996
-\def\FV@FindStopString{%
- \expandafter\FV@@FindStopString
-{\meaning\FV@Line}%
-{\meaning\FancyVerbStopString}%
-}
-\def\FV@@FindStopString#1#2{%
-\edef\@fooA{#1}\edef\@fooB{#2}%
- \ifx\@fooA\@fooB
- \let\FV@FindStartStop\relax
- \ifeof\FV@InFile\else
- \immediate\closein\FV@InFile
- \fi
- \else
- \expandafter\FV@@PreProcessLine
- \fi}
-%% SR modification end
-\def\FV@@Gobble{%
- \expandafter\expandafter\expandafter\FV@@@Gobble
- \expandafter\FV@@@@Gobble\FV@Line
- \@nil\@nil\@nil\@nil\@nil\@nil\@nil\@nil\@nil\@nil\@@nil}
-\def\FV@@@Gobble#1\@nil#2\@@nil{\def\FV@Line{#1}}
-\define@key{FV}{gobble}{%
- \@tempcnta=#1\relax
- \ifnum\@tempcnta<\@ne
- \let\FV@Gobble\relax
- \else
- \ifnum\@tempcnta>9
- \FV@Error{gobble parameter must be less than 10}\FV@eha
- \else
- \renewcommand{\FV@@@@Gobble}[\@tempcnta]{}%
- \let\FV@Gobble\FV@@Gobble
- \fi
- \fi}
-\def\FV@@@@Gobble{}
-\def\KV@FV@gobble@default{\let\FV@Gobble\relax}
-\fvset{gobble}
-\def\FV@Scan{%
- \FV@CatCodes
- \VerbatimEnvironment
- \FV@DefineCheckEnd
- \FV@BeginScanning}
-\def\VerbatimEnvironment{%
- \ifx\FV@EnvironName\relax\xdef\FV@EnvironName{\@currenvir}\fi}
-\let\FV@EnvironName\relax
-\begingroup
-\catcode`\!=0
-\catcode`\[=1
-\catcode`\]=2
-!gdef!FV@CheckEnd@i#1[!FV@@CheckEnd#1\end{}!@nil]
-!gdef!FV@@CheckEnd@i#1\end#2#3!@nil[!def!@tempa[#2]!def!@tempb[#3]]
-!gdef!FV@@@CheckEnd@i[\end{}]
-\catcode`!\=12
-
-!gdef!FV@CheckEnd@ii#1[!FV@@CheckEnd#1\end{}!@nil]
-!gdef!FV@@CheckEnd@ii#1\end#2#3!@nil[!def!@tempa[#2]!def!@tempb[#3]]
-!gdef!FV@@@CheckEnd@ii[\end{}]
-!catcode`!{=12
-!catcode`!}=12
-
-!gdef!FV@CheckEnd@iii#1[!FV@@CheckEnd#1\end{}!@nil]
-!gdef!FV@@CheckEnd@iii#1\end{#2}#3!@nil[!def!@tempa[#2]!def!@tempb[#3]]
-!gdef!FV@@@CheckEnd@iii[\end{}]
-!catcode`!\=0
-
-!gdef!FV@CheckEnd@iv#1[!FV@@CheckEnd#1\end{}!@nil]
-!gdef!FV@@CheckEnd@iv#1\end{#2}#3!@nil[!def!@tempa[#2]!def!@tempb[#3]]
-!gdef!FV@@@CheckEnd@iv[\end{}]
-\endgroup
-\def\FV@BadCodes#1{%
- \FV@Error
- {\string\catcode\space of \expandafter\@gobble\string#1 is wrong:
- \the\catcode`#1}%
- {Only the following catcode values are allowed:
- ^^J\@spaces \expandafter\@gobble\string\\ \space\space --> 0 or 12.
- ^^J\@spaces \string{ \string} --> 1 and 2, resp., or both 12.
- ^^JTo get this error, either you are a hacker or you got bad advice.}%
- \def\FV@CheckEnd##1{\iftrue}}
-\def\FV@DefineCheckEnd{%
- \ifnum\catcode`\\=\z@
- \ifnum\catcode`\{=\@ne
- \let\FV@CheckEnd\FV@CheckEnd@i
- \let\FV@@CheckEnd\FV@@CheckEnd@i
- \let\FV@@@CheckEnd\FV@@@CheckEnd@i
- \else
- \ifnum\catcode`\{=12
- \let\FV@CheckEnd\FV@CheckEnd@iv
- \let\FV@@CheckEnd\FV@@CheckEnd@iv
- \let\FV@@@CheckEnd\FV@@@CheckEnd@iv
- \else
- \FV@BadCodes\{%
- \fi
- \fi
- \else
- \ifnum\catcode`\\=12
- \ifnum\catcode`\{=\@ne
- \let\FV@CheckEnd\FV@CheckEnd@ii
- \let\FV@@CheckEnd\FV@@CheckEnd@ii
- \let\FV@@@CheckEnd\FV@@@CheckEnd@ii
- \else
- \ifnum\catcode`\{=12
- \let\FV@CheckEnd\FV@CheckEnd@iii
- \let\FV@@CheckEnd\FV@@CheckEnd@iii
- \let\FV@@@CheckEnd\FV@@@CheckEnd@iii
- \else
- \FV@BadCodes\{%
- \fi
- \fi
- \else
- \FV@BadCodes\\%
- \fi
- \fi}
-\begingroup
-\catcode`\^^M=\active
- \gdef\FV@BeginScanning#1^^M{%
- \def\@tempa{#1}\ifx\@tempa\@empty\else\FV@BadBeginError\fi%
- \FV@GetLine}%
-\endgroup
-\def\FV@BadBeginError#1{%
- \expandafter\@temptokena\expandafter{\@tempa}%
- \FV@Error
- {Extraneous input `\the\@temptokena' between
- \string\begin{\FV@EnvironName}[<key=value>] and line end}%
- {This input will be discarded. Hit <return> to continue.}}
-%% DG/SR modification begin - May. 18, 1998 (added code to turn off ligatures)
-%% \def\FV@GetLine{\expandafter\FV@CheckScan\FancyVerbGetLine}
-\def\FV@GetLine{\@noligs\expandafter\FV@CheckScan\FancyVerbGetLine}
-%% DG/SR modification end
-\begingroup
-\catcode`\^^M=\active
-\gdef\FancyVerbGetLine#1^^M{%
- \@nil
- \FV@CheckEnd{#1}%
- \ifx\@tempa\FV@EnvironName% % True if end is found
- \ifx\@tempb\FV@@@CheckEnd\else\FV@BadEndError\fi%
- \let\next\FV@EndScanning%
- \else%
- \def\FV@Line{#1}%
- \def\next{\FV@PreProcessLine\FV@GetLine}%
- \fi%
- \next}%
-\endgroup
-\def\FV@BadEndError{%
- \expandafter\@temptokena\expandafter{\@tempb}%
- \FV@Error
- {Extraneous input `\the\@temptokena' between
- \string\end{\FV@EnvironName} and line end}%
- {This input will be discarded. Type <return> to continue.}}
-\def\FV@EndScanning{%
- \edef\next{\noexpand\end{\FV@EnvironName}}%
- \global\let\FV@EnvironName\relax
- \next}
-\@ifundefined{@currenvline}{\let\@currenvline\@empty}{}
-\def\FV@CheckScan#1{\@ifnextchar\@nil{\@gobble}{\FV@EOF}}
-\def\FV@CheckScan#1{\ifx\@nil#1\@empty\else\expandafter\FV@EOF\fi}
-\def\FV@EOF{%
- \FV@Error{Couldn't find `\string\end{\FV@EnvironName}' to end
- a verbatim environment\@currenvline.}%
- {Probably you mistyped the environment name or included an extraneous
- ^^Jspace, or are using an improperly defined verbatim environment.
- ^^JHit return and I will try to terminate this job.}%
- \FV@EndScanning
- \end{document}}
- % \subsection{Input}
-\newread\FV@InFile
-\def\FV@Input#1{%
- \immediate\openin\FV@InFile #1\relax
- \ifeof\FV@InFile
- \FV@Error{No verbatim file #1}\FV@eha
- \immediate\closein\FV@InFile
- \else
- \FV@CatCodes
- \expandafter\FV@@Input
- \fi}
-\def\FV@@Input{%
- \def\FV@Line{}%
- \FV@ReadLine
- \ifeof\FV@InFile
- \ifx\FV@Line\@empty\else
- \FV@PreProcessLine
- \fi
- \immediate\closein\FV@InFile
- \else
- \FV@PreProcessLine
- \expandafter\FV@@Input
- \fi}
-\begingroup
-\catcode`\^^M=\active
-\gdef\FV@ReadLine{%
- \ifeof\FV@InFile\else
- \immediate\read\FV@InFile to\@tempa%
- \expandafter\FV@@ReadLine\@tempa^^M\relax^^M\@nil%
- \fi}
-\gdef\FV@@ReadLine#1^^M#2^^M#3\@nil{%
- \expandafter\def\expandafter\FV@Line\expandafter{%
- \FV@Line#1}%
- \ifx\relax#2\@empty\expandafter\FV@ReadLine\fi}%
-\endgroup
-\def\FV@FormattingPrep{%
- \global\FV@CodeLineNo\z@
- \frenchspacing % Cancels special punctuation spacing.
- \FV@SetupFont % See below.
- \FV@DefineWhiteSpace % See below.
- \FancyVerbDefineActive
- \FancyVerbFormatCom} % A user-defined hook (formatcom parameter).
-\expandafter\ifx\csname selectfont\endcsname\relax
-\def\FV@SetupFont{%
- \FV@BaseLineStretch
- \ifx\@currsize\small\normalsize\else\small\fi\@currsize
- \FV@FontSize
- \FV@FontFamily}
-
-\else
-
-\def\FV@SetupFont{%
- \FV@BaseLineStretch
- \FV@FontSize
- \FV@FontFamily
- \FV@FontSeries
- \FV@FontShape
- \selectfont
-%% DG/SR modification begin - May. 18, 1998 (added code to turn off ligatures)
- \@noligs}
-%% DG/SR modification end
-\fi
-\define@key{FV}{fontsize}{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@Auto
- \let\FV@FontSize\relax
- \else
- \def\FV@FontSize{#1}%
- \fi}
-\def\KV@FV@fontsize@default{\let\FV@FontSize\relax}
-\define@key{FV}{baselinestretch}[auto]{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@Auto
- \let\FV@BaseLineStretch\relax
- \else
- \def\FV@BaseLineStretch{\def\baselinestretch{#1}}%
- \fi}
-\def\KV@FV@baselinestretch@default{\let\FV@BaseLineStretch\relax}
-\define@key{FV}{fontfamily}{%
- \@ifundefined{FV@fontfamily@#1}%
- {\def\FV@FontScanPrep{}\def\FV@FontFamily{\fontfamily{#1}}}
- {\csname FV@fontfamily@#1\endcsname}}
-\define@key{FV}{fontseries}{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@Auto
- \let\FV@FontSeries\relax
- \else
- \def\FV@FontSeries{\fontseries{#1}}%
- \fi}
-\define@key{FV}{fontshape}{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@Auto
- \let\FV@FontShape\relax
- \else
- \def\FV@FontShape{\fontshape{#1}}%
- \fi}
-\def\FV@MakeActive#1{%
- \catcode`#1=\active
- \def\next##1{\expandafter\def\expandafter\FV@MakeUnActive\expandafter{%
- \FV@MakeUnActive\def##1{\string##1}}}%
- \begingroup\lccode`~=`#1\relax\expandafter\next\expandafter~\endgroup}
-\def\FV@MakeUnActive{}
-\begingroup
-\catcode`\`=\active
-\gdef\FV@fontfamily@tt{%
- \def\FV@FontScanPrep{\FV@MakeActive\`}%
-%% SR modification begin - 1995
-%% \def\FV@FontFamily{\tt`{{\string`}}}}
- \def\FV@FontFamily{\ttfamily\edef`{{\string`}}}}
-%% SR modification end
-\gdef\FV@fontfamily@cmtt{%
- \def\FV@FontScanPrep{\FV@MakeActive\`}%
- \def\FV@FontFamily{\edef`{{\string`}}\fontfamily{cmtt}}}
-\endgroup
-\@namedef{FV@fontfamily@cmtt-spanish}{%
- \def\FV@FontScanPrep{}%
- \def\FV@FontFamily{\fontfamily{cmtt}}}
-\@namedef{FV@fontfamily@courier}{%
- \def\FV@FontScanPrep{}%
-%% SR modification begin - 1995
-%% \def\FV@FontFamily{\fontfamily{rpcr}}}
- \def\FV@FontFamily{\fontfamily{pcr}}}
-%% SR modification end
-\@namedef{FV@fontfamily@helvetica}{%
- \def\FV@FontScanPrep{}%
-%% SR modification begin - 1995
-%% \def\FV@FontFamily{\fontfamily{rphv}}}
- \def\FV@FontFamily{\fontfamily{phv}}}
-%% SR modification end
-\fvset{fontfamily=tt,fontsize=auto,fontshape=auto,fontseries=auto,
- baselinestretch=auto}
-\begingroup
-\catcode`\ =\active
-\catcode`\^^I=\active
-\gdef\FV@DefineWhiteSpace{\def {\FV@Space}\def^^I{\FV@Tab}}%
-\endgroup
-\define@key{FV}{defineactive}[]{\def\FancyVerbDefineActive{#1\relax}}
-\define@key{FV}{defineactive*}{%
- \expandafter\def\expandafter\FancyVerbDefineActive\expandafter{%
- \FancyVerbDefineActive#1\relax}}
-\fvset{defineactive}
-\define@booleankey{FV}{showspaces}%
- {\def\FV@Space{{\FancyVerbSpace}}}%
- {\def\FV@Space{\ }}
-{\catcode`\ =12 \gdef\FancyVerbSpace{\tt }}
-\fvset{showspaces=false}
-\def\FV@Tab{\hbox to\FancyVerbTabSize\fontdimen2\font{\hss\FV@TabChar}}
-\define@key{FV}{tabsize}{%
- \@tempcnta=#1\relax
- \ifnum\@tempcnta>100
- \FV@Error{Tab size too large: `\the\@tempcnta'. (Max size = 100)}\FV@eha
- \else
- \edef\FancyVerbTabSize{\the\@tempcnta}%
- \fi}
-\define@booleankey{FV}{showtabs}%
- {\def\FV@TabChar{\FancyVerbTab}}%
- {\let\FV@TabChar\relax}
-\fvset{tabsize=8,showtabs=false}
-\def\FancyVerbTab{%
- \valign{%
- \vfil##\vfil\cr
- \hbox{$\scriptscriptstyle-$}\cr
- \hbox to 0pt{\hss$\scriptscriptstyle\rangle\mskip -.8mu$}\cr
- \hbox{$\scriptstyle\mskip -3mu\mid\mskip -1.4mu$}\cr}}
-\newbox\FV@TabBox
-\def\FV@@ObeyTabsInit{%
- \@tempdimb=\FancyVerbTabSize\fontdimen\tw@\font
- \edef\FV@ObeyTabSize{\number\@tempdimb}%
- \advance\@tempdimb\fontdimen\tw@\font
- \advance\@tempdimb-\FancyVerbTabSize sp % Allow for rounding errors.
- \edef\FV@@ObeyTabSize{\number\@tempdimb}%
- \let\FV@ObeyTabs\FV@@ObeyTabs
- \let\FV@Tab\FV@TrueTab}
-\def\FV@@ObeyTabs#1{\setbox\FV@TabBox=\hbox{#1}\box\FV@TabBox}
-\let\FV@ObeyTabs\relax
-\def\FV@TrueTab{%
- \egroup
- \@tempdima=\FV@ObeyTabSize sp\relax
- \@tempcnta=\wd\FV@TabBox
- \advance\@tempcnta\FV@@ObeyTabSize\relax
- \divide\@tempcnta\@tempdima
- \multiply\@tempdima\@tempcnta
- \advance\@tempdima-\wd\FV@TabBox
- \setbox\FV@TabBox=\hbox\bgroup
- \unhbox\FV@TabBox\kern\@tempdima\hbox to\z@{\hss\FV@TabChar}}
-\define@booleankey{FV}{obeytabs}%
- {\let\FV@ObeyTabsInit\FV@@ObeyTabsInit}%
- {\let\FV@ObeyTabsInit\relax}
-\fvset{obeytabs=false}
-\define@key{FV}{formatcom}[]{\def\FancyVerbFormatCom{#1\relax}}
-\define@key{FV}{formatcom*}{%
- \expandafter\def\expandafter\FancyVerbFormatCom\expandafter{%
- \FancyVerbFormatCom#1\relax}}
-\fvset{formatcom}
-\def\FancyVerbFormatLine#1{\FV@ObeyTabs{#1}}
-\define@key{FV}{xleftmargin}{\def\FV@XLeftMargin{#1}}
-\let\FV@XLeftMargin\z@
-\define@key{FV}{xrightmargin}{\def\FV@XRightMargin{#1}}
-\let\FV@XRightMargin\z@
-\define@booleankey{FV}{resetmargins}%
- {\let\if@FV@ResetMargins\iftrue}
- {\let\if@FV@ResetMargins\iffalse}
-\fvset{resetmargins=false}
-\define@key{FV}{listparameters}{\def\FV@ListParameterHook{#1}}
-\def\FV@ListParameterHook{}
-\define@key{FV}{hfuzz}{%
- \@tempdima=#1\relax
- \edef\FancyVerbHFuzz{\number\@tempdima sp}}
-\fvset{hfuzz=2pt}
-\define@booleankey{FV}{samepage}%
- {\def\FV@InterLinePenalty{\interlinepenalty\@M}}%
- {\let\FV@InterLinePenalty\relax}
-\fvset{samepage=false}
-\def\FV@List#1{%
- \begingroup
- \FV@UseKeyValues
- \FV@LeaveVMode
- \if@inlabel\else\setbox\@labels=\box\voidb@x\fi
- \FV@ListNesting{#1}%
- \FV@ListParameterHook
- \FV@ListVSpace
- \FV@SetLineWidth
- \FV@InterLinePenalty
- \let\FV@ProcessLine\FV@ListProcessLine@i
- \FV@CatCodes
- \FV@FormattingPrep
- \FV@ObeyTabsInit
- \FV@BeginListFrame}
-\def\FV@LeaveVMode{%
- \if@noskipsec
- \leavevmode
- \else
- \if@FV@ResetMargins\if@inlabel\leavevmode\fi\fi
- \fi
- \ifvmode\@noparlisttrue\else\@noparlistfalse\unskip\par\fi}
-\def\FV@ListNesting#1{%
- \if@FV@ResetMargins
- \@listdepth=\z@
- \else
- \ifnum\@listdepth>5\relax
- \@toodeep
- \else
- \advance\@listdepth\@ne
- \fi
- \fi
- \rightmargin\z@
- \csname @list\romannumeral\the\@listdepth\endcsname
- \ifnum#1=\z@
- \rightmargin\z@
- \leftmargin\z@
- \fi}
-\def\FV@ListVSpace{%
- \@topsepadd\topsep
- \if@noparlist\advance\@topsepadd\partopsep\fi
- \if@inlabel
- \vskip\parskip
- \else
- \if@nobreak
- \vskip\parskip
- \clubpenalty\@M
- \else
- \addpenalty\@beginparpenalty
- \@topsep\@topsepadd
- \advance\@topsep\parskip
- \addvspace\@topsep
- \fi
- \fi
- \global\@nobreakfalse
- \global\@inlabelfalse
- \global\@minipagefalse
- \global\@newlistfalse}
-\def\FV@SetLineWidth{%
- \if@FV@ResetMargins\else
- \advance\leftmargin\@totalleftmargin
- \fi
- \advance\leftmargin\FV@XLeftMargin\relax
- \advance\rightmargin\FV@XRightMargin\relax
- \linewidth\hsize
- \advance\linewidth-\leftmargin
- \advance\linewidth-\rightmargin
- \hfuzz\FancyVerbHFuzz\relax}
-\def\FV@ListProcessLine#1{%
- \hbox to \hsize{%
- \kern\leftmargin
- \hbox to \linewidth{%
- \FV@LeftListNumber
- \FV@LeftListFrame
- \FancyVerbFormatLine{#1}\hss
-%% DG/SR modification begin - Jan. 28, 1998 (for numbers=right add-on)
-%% \FV@RightListFrame}%
- \FV@RightListFrame
- \FV@RightListNumber}%
-%% DG/SR modification end
- \hss}}
-\def\FV@ListProcessLine@i#1{%
- \hbox{%
- \ifvoid\@labels\else
- \hbox to \z@{\kern\@totalleftmargin\box\@labels\hss}%
- \fi
- \FV@ListProcessLine{#1}}%
- \let\FV@ProcessLine\FV@ListProcessLine@ii}
-\def\FV@ListProcessLine@ii#1{%
- \setbox\@tempboxa=\FV@ListProcessLine{#1}%
- \let\FV@ProcessLine\FV@ListProcessLine@iii}
-\def\FV@ListProcessLine@iii#1{%
- {\advance\interlinepenalty\clubpenalty\penalty\interlinepenalty}%
- \box\@tempboxa
- \setbox\@tempboxa=\FV@ListProcessLine{#1}%
- \let\FV@ProcessLine\FV@ListProcessLine@iv}
-\def\FV@ListProcessLine@iv#1{%
- \penalty\interlinepenalty
- \box\@tempboxa
- \setbox\@tempboxa=\FV@ListProcessLine{#1}}%
-\def\FV@EndList{%
- \FV@ListProcessLastLine
- \FV@EndListFrame
- \@endparenv
- \endgroup
- \@endpetrue}
-\def\FV@ListProcessLastLine{%
- \ifx\FV@ProcessLine\FV@ListProcessLine@iv
- {\advance\interlinepenalty\widowpenalty\penalty\interlinepenalty}%
- \box\@tempboxa
- \else
- \ifx\FV@ProcessLine\FV@ListProcessLine@iii
- {\advance\interlinepenalty\widowpenalty
- \advance\interlinepenalty\clubpenalty
- \penalty\interlinepenalty}%
- \box\@tempboxa
- \else
- \ifx\FV@ProcessLine\FV@ListProcessLine@i
- \FV@Error{Empty verbatim environment}{}%
- \FV@ProcessLine{}%
- \fi
- \fi
- \fi}
-\def\FV@VerbatimBegin{\FV@List\z@}
-\def\FV@VerbatimEnd{\FV@EndList}
-\def\FVB@Verbatim{\FV@VerbatimBegin\FV@Scan}
-\def\FVE@Verbatim{\FV@VerbatimEnd}
-\DefineVerbatimEnvironment{Verbatim}{Verbatim}{}
-\def\FV@UseVerbatim#1{%
- \FV@VerbatimBegin#1\FV@VerbatimEnd
- \@doendpe\global\@ignorefalse\ignorespaces}
-\def\VerbatimInput{\FV@Command{}{VerbatimInput}}
-\def\FVC@VerbatimInput#1{\FV@UseVerbatim{\FV@Input{#1}}}
-\def\FV@LVerbatimBegin{\FV@List\@ne}
-\def\FV@LVerbatimEnd{\FV@EndList}
-\def\FVB@LVerbatim{\FV@LVerbatimBegin\FV@Scan}
-\def\FVE@LVerbatim{\FV@LVerbatimEnd}
-\DefineVerbatimEnvironment{LVerbatim}{LVerbatim}{}
-\def\FV@LUseVerbatim#1{%
- \FV@LVerbatimBegin#1\FV@LVerbatimEnd
- \@doendpe\global\@ignorefalse\ignorespaces}
-\def\LVerbatimInput{\FV@Command{}{LVerbatimInput}}
-\def\FVC@LVerbatimInput#1{\FV@LUseVerbatim{\FV@Input{#1}}}
-\def\FV@Frame@none{%
- \let\FV@BeginListFrame\relax
- \let\FV@LeftListFrame\relax
- \let\FV@RightListFrame\relax
- \let\FV@EndListFrame\relax}
-\def\FV@Frame@single{%
- \let\FV@BeginListFrame\FV@BeginListFrame@Single
- \let\FV@LeftListFrame\FV@LeftListFrame@Single
- \let\FV@RightListFrame\FV@RightListFrame@Single
- \let\FV@EndListFrame\FV@EndListFrame@Single}
-\def\FV@Frame@lines{%
- \let\FV@BeginListFrame\FV@BeginListFrame@Lines
- \let\FV@LeftListFrame\relax
- \let\FV@RightListFrame\relax
- \let\FV@EndListFrame\FV@EndListFrame@Lines}
-\def\FV@Frame@topline{%
- \let\FV@BeginListFrame\FV@BeginListFrame@Lines
- \let\FV@LeftListFrame\relax
- \let\FV@RightListFrame\relax
- \let\FV@EndListFrame\relax}
-\def\FV@Frame@bottomline{%
- \let\FV@BeginListFrame\relax
- \let\FV@LeftListFrame\relax
- \let\FV@RightListFrame\relax
- \let\FV@EndListFrame\FV@EndListFrame@Lines}
-%% To define a frame with only a left line
-\def\FV@Frame@leftline{%
- % To define the \FV@FrameFillLine macro (from \FV@BeginListFrame)
- \ifx\FancyVerbFillColor\relax
- \let\FV@FrameFillLine\relax
- \else
- \@tempdima\FV@FrameRule\relax
- \multiply\@tempdima-\tw@
- \edef\FV@FrameFillLine{%
- {\noexpand\FancyVerbFillColor{\vrule\@width\number\@tempdima sp}%
- \kern-\number\@tempdima sp}}%
- \fi
- \let\FV@BeginListFrame\relax
- \let\FV@LeftListFrame\FV@LeftListFrame@Single
- \let\FV@RightListFrame\relax
- \let\FV@EndListFrame\relax}
-\def\FV@BeginListFrame@Single{%
- \lineskip\z@
- \baselineskip\z@
- \ifx\FancyVerbFillColor\relax
- \let\FV@FrameFillLine\relax
- \else
- \@tempdima\FV@FrameRule\relax
- \multiply\@tempdima-\tw@
- \edef\FV@FrameFillLine{%
- {\noexpand\FancyVerbFillColor{\vrule\@width\number\@tempdima sp}%
- \kern-\number\@tempdima sp}}%
- \fi
-%% DG/SR modification begin - May. 19, 1998
-%% \FV@SingleFrameLine
- \FV@SingleFrameLine{\z@}%
-%% DG/SR modification end
- \penalty\@M
- \FV@SingleFrameSep
- \penalty\@M}
-%% DG/SR modification begin - May. 19, 1998
-\define@key{FV}{label}{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@None
- \let\FV@LabelBegin\relax
- \let\FV@LabelEnd\relax
- \else
- \FV@Label@i#1\@nil%
- \fi}
-\def\FV@Label@i{\@ifnextchar[{\FV@Label@ii}{\FV@Label@ii[]}}
-\def\FV@Label@ii[#1]#2\@nil{%
- \def\@tempa{#1}%
- \ifx\@tempa\empty
- \def\FV@LabelBegin{#2}%
- \else
- \def\FV@LabelBegin{#1}%
- \def\FV@LabelPositionBottomLine{\@ne}%
- \fi
- \def\FV@LabelEnd{#2}}
-\fvset{label=none}
-\define@key{FV}{labelposition}[none]{%
- \@ifundefined{FV@LabelPosition@#1}%
- {\FV@Error{Label position `#1' not defined.}\FV@eha}%
- {\@nameuse{FV@LabelPosition@#1}}}
-\def\FV@LabelPosition@none{%
- \let\FV@LabelPositionTopLine\relax%
- \let\FV@LabelPositionBottomLine\relax}
-\def\FV@LabelPosition@topline{%
- \def\FV@LabelPositionTopLine{\@ne}%
- \let\FV@LabelPositionBottomLine\relax}
-\def\FV@LabelPosition@bottomline{%
- \let\FV@LabelPositionTopLine\relax%
- \def\FV@LabelPositionBottomLine{\@ne}}
-\def\FV@LabelPosition@all{%
- \def\FV@LabelPositionTopLine{\@ne}%
- \def\FV@LabelPositionBottomLine{\@ne}}
-\fvset{labelposition=topline}
-%% DG/SR modification end
-%% DG/SR modification begin - May. 19, 1998
-%% \def\FV@SingleFrameLine{%
-\def\FV@SingleFrameLine#1{%
-%% DG/SR modification end
- \hbox to\z@{%
- \kern\leftmargin
-%% DG/SR modification begin - Jun. 22, 1998
- \ifnum#1=\z@
- \let\FV@Label\FV@LabelBegin
- \else
- \let\FV@Label\FV@LabelEnd
- \fi
- \ifx\FV@Label\relax
-%% DG/SR modification end
- \FancyVerbRuleColor{\vrule \@width\linewidth \@height\FV@FrameRule}%
-%% DG/SR modification begin - Jun. 22, 1998
- \else
- \ifnum#1=\z@
- \setbox\z@\hbox{\strut\enspace\FV@LabelBegin\enspace\strut}%
- \else
- \setbox\z@\hbox{\strut\enspace\FV@LabelEnd\enspace\strut}%
- \fi
- \@tempdimb=\dp\z@
- \advance\@tempdimb -.5\ht\z@
- \@tempdimc=\linewidth
- \advance\@tempdimc -\wd\z@
- \divide\@tempdimc\tw@
- \ifnum#1=\z@ % Top line
- \ifx\FV@LabelPositionTopLine\relax
- \FancyVerbRuleColor{\vrule \@width\linewidth \@height\FV@FrameRule}%
- \else
- \FV@FrameLineWithLabel
- \fi
- \else % Bottom line
- \ifx\FV@LabelPositionBottomLine\relax
- \FancyVerbRuleColor{\vrule \@width\linewidth \@height\FV@FrameRule}%
- \else
- \FV@FrameLineWithLabel
- \fi
- \fi
- \fi
-%% DG/SR modification end
- \hss}}
-%% DG/SR modification begin - May. 19, 1998
-\def\FV@FrameLineWithLabel{%
- \ht\z@\@tempdimb\dp\z@\@tempdimb%
- \FancyVerbRuleColor{%
- \vrule \@width\@tempdimc \@height\FV@FrameRule
- \raise\@tempdimb\box\z@
- \vrule \@width\@tempdimc \@height\FV@FrameRule}}
-%% DG/SR modification end
-\def\FV@BeginListFrame@Lines{%
- \begingroup
- \lineskip\z@skip
-%% DG modification begin - June 18, 1997 (effect of \baselineskip too earlier)
-%% \baselineskip\z@skip
-%% \FV@SingleFrameLine
-%% DG/SR modification begin - May. 19, 1998
-%% \FV@SingleFrameLine
- \FV@SingleFrameLine{\z@}%
-%% DG/SR modification end
- \kern-0.5\baselineskip\relax
- \baselineskip\z@skip
-%% DG modification end
- \kern\FV@FrameSep\relax
- \endgroup}%
-\def\FV@EndListFrame@Lines{%
- \begingroup
- \baselineskip\z@skip
- \kern\FV@FrameSep\relax
-%% DG/SR modification begin - May. 19, 1998
-%% \FV@SingleFrameLine
- \FV@SingleFrameLine{\@ne}%
-%% DG/SR modification end
- \endgroup}
-\def\FV@SingleFrameSep{%
- \hbox to \z@{%
- \kern\leftmargin
- \hbox to\linewidth{%
- \FancyVerbRuleColor{%
-%% DG modification begin - June 18, 1997 (\FV@FrameSep missing)
- \ifx\FancyVerbFillColor\relax
- \vrule\@width 0pt\@height\FV@FrameSep\relax
- \fi
-%% DG modification end
- \vrule\@width\FV@FrameRule\relax
- \ifx\FancyVerbFillColor\relax
- \hfil
- \else
- {\FancyVerbFillColor\leaders\hrule\@height\FV@FrameSep\hfil}%
- \fi
-%% DG modification begin - June 18, 1997 (\FV@FrameSep missing)
- \ifx\FancyVerbFillColor\relax
- \vrule\@width 0pt\@height\FV@FrameSep\relax
- \fi
-%% DG modification end
- \vrule\@width\FV@FrameRule\relax}}%
- \hss}}
-\def\FV@LeftListFrame@Single{%
- \strut
- {\FancyVerbRuleColor{\vrule \@width\FV@FrameRule}}%
- \FV@FrameFillLine
-%% DG modification begin - June 18, 1997 (to fill color on left side)
-%% \kern\FV@FrameSep}
- \ifx\FancyVerbFillColor\relax
- \kern\FV@FrameSep
- \else
- {\noexpand\leavevmode\FancyVerbFillColor{\vrule\@width\FV@FrameSep}}%
- \fi}
-%% DG modification end
-\def\FV@RightListFrame@Single{%
-%% DG modification begin - June 18, 1997 (to fill color on right side)
-%% \kern\FV@FrameSep
- \ifx\FancyVerbFillColor\relax
- \kern\FV@FrameSep
- \else
- {\noexpand\leavevmode\FancyVerbFillColor{\vrule\@width\FV@FrameSep}}%
- \fi
- {\noexpand\leavevmode\FancyVerbRuleColor{\vrule\@width\FV@FrameRule}}}
-%% DG modification end
-\def\FV@EndListFrame@Single{%
- \penalty\@M
- \FV@SingleFrameSep
- \penalty\@M
-%% DG/SR modification begin - May. 19, 1998
-%% \FV@SingleFrameLine}
- \FV@SingleFrameLine{\@ne}}
-%% DG/SR modification end
-\define@key{FV}{framerule}{%
- \@tempdima=#1\relax
- \edef\FV@FrameRule{\number\@tempdima sp\relax}}
-\def\KV@FV@framerule@default{\let\FV@FrameRule\fboxrule}
-\define@key{FV}{framesep}{%
- \@tempdima=#1\relax
- \edef\FV@FrameSep{\number\@tempdima sp\relax}}
-\def\KV@FV@framesep@default{\let\FV@FrameSep\fboxsep}
-\fvset{framerule,framesep}
-\define@key{FV}{rulecolor}{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@None
- \let\FancyVerbRuleColor\relax
- \else
- \let\FancyVerbRuleColor\@tempa
- \fi}
-\define@key{FV}{fillcolor}{%
- \def\@tempa{#1}%
- \ifx\@tempa\FV@None
- \let\FancyVerbFillColor\relax
- \else
- \let\FancyVerbFillColor\@tempa
- \fi}
-\fvset{rulecolor=none,fillcolor=none}
-\def\FV@Frame@double{%
- \let\FV@FrameBegin\FV@FrameBegin@double
- \let\FV@FrameLine\FV@FrameLine@double
- \let\FV@FrameEnd\FV@FrameEnd@double}
-\define@key{FV}{frame}[none]{%
- \@ifundefined{FV@Frame@#1}%
- {\FV@Error{Frame style `#1' not defined.}\FV@eha}%
- {\@nameuse{FV@Frame@#1}}}
-\fvset{frame=none}
-\newcounter{FancyVerbLine}
-\define@key{FV}{firstnumber}[auto]{%
- \def\@tempa{#1}\def\@tempb{auto}%
- \ifx\@tempa\@tempb
- \def\FV@SetLineNo{%
- \c@FancyVerbLine\FV@CodeLineNo
- \advance\c@FancyVerbLine\m@ne}%
- \else
- \def\@tempb{last}%
- \ifx\@tempa\@tempb
- \let\FV@SetLineNo\relax
- \else
-%% DG/SR modification begin - Jan. 19, 1998
-%% \def\FV@SetLineNo{\c@FancyVerbLine#1}%
- \def\FV@SetLineNo{%
- \c@FancyVerbLine#1
- \advance\c@FancyVerbLine\m@ne}%
-%% DG/SR modification end
- \fi
- \fi}
-\define@booleankey{FV}{numberblanklines}%
- {\let\if@FV@NumberBlankLines\iftrue}
- {\let\if@FV@NumberBlankLines\iffalse}
-\fvset{numberblanklines=true}
-%% DG/SR modification begin - May. 20, 1998
-%%\def\refstepcounter#1{% Adapted from latex.ltx
-\def\FV@refstepcounter#1{%
-%% DG/SR modification end
- \stepcounter{#1}%
- \protected@edef\@currentlabel
- {\csname p@#1\endcsname\arabic{FancyVerbLine}}}
-\def\FV@StepLineNo{%
- \FV@SetLineNo
-%% DG/SR modification begin - Apr. 28, 1998 and May 20, 1998
-%% \def\FV@StepLineNo{\refstepcounter{FancyVerbLine}}%
- \def\FV@StepLineNo{%
- \if@FV@NumberBlankLines
- \FV@refstepcounter{FancyVerbLine}
- \else
- \ifx\FV@Line\empty
- \else
- \FV@refstepcounter{FancyVerbLine}
- \fi
- \fi}%
-%% DG/SR modification end
- \FV@StepLineNo}
-%% DG/SR modification begin - 1995
-%%\def\theFancyVerbLine{\rm\tiny\arabic{FancyVerbLine}}
-\def\theFancyVerbLine{\rmfamily\tiny\arabic{FancyVerbLine}}
-%% DG/SR modification end
-\define@key{FV}{numbers}[none]{%
- \@ifundefined{FV@Numbers@#1}%
- {\FV@Error{Numbers style `#1' not defined.}\FV@eha}%
- {\@nameuse{FV@Numbers@#1}}}
-%% DG modification begin - Dec. 20, 1995 and Jan. 28, 1998
-%%\def\FV@Numbers@none{\let\FV@LeftListNumber\relax}
-\def\FV@Numbers@none{%
-\let\FV@LeftListNumber\relax
-\let\FV@RightListNumber\relax}
-\newcount\FV@StepNumber
-\define@key{FV}{stepnumber}{\FV@StepNumber#1}
-\def\KV@FV@stepnumber@default{\FV@StepNumber\@ne}
-\fvset{stepnumber}
-%% DG modification begin - Dec. 20, 1995
-%%\def\FV@Numbers@left{%
-%% \def\FV@LeftListNumber{\hbox to\z@{%
-%% \hss\theFancyVerbLine\kern\FV@NumberSep}}}
-\def\FV@Numbers@left{%
-%% DG/SR modification begin - Apr. 28, 1998
- \let\FV@RightListNumber\relax
-%% DG/SR modification end
- \def\FV@LeftListNumber{%
- \@tempcnta=\FV@CodeLineNo
- \@tempcntb=\FV@CodeLineNo
- \divide\@tempcntb\FV@StepNumber
- \multiply\@tempcntb\FV@StepNumber
- \ifnum\@tempcnta=\@tempcntb
-%% DG/SR modification begin - Apr. 28, 1998
-%% \hbox to\z@{\hss\theFancyVerbLine\kern\FV@NumberSep}%
- \if@FV@NumberBlankLines
- \hbox to\z@{\hss\theFancyVerbLine\kern\FV@NumberSep}%
- \else
- \ifx\FV@Line\empty
- \else
- \hbox to\z@{\hss\theFancyVerbLine\kern\FV@NumberSep}%
- \fi
- \fi
-%% DG/SR modification end
- \fi}}
-\def\FV@Numbers@right{%
-%% DG/SR modification begin - Apr. 28, 1998
- \let\FV@LeftListNumber\relax
-%% DG/SR modification end
- \def\FV@RightListNumber{%
- \@tempcnta=\FV@CodeLineNo
- \@tempcntb=\FV@CodeLineNo
- \divide\@tempcntb\FV@StepNumber
- \multiply\@tempcntb\FV@StepNumber
- \ifnum\@tempcnta=\@tempcntb
-%% DG/SR modification begin - Apr. 28, 1998
-%% \hbox to \z@{\kern\FV@NumberSep\theFancyVerbLine\hss}%
- \if@FV@NumberBlankLines
- \hbox to\z@{\kern\FV@NumberSep\theFancyVerbLine\hss}%
- \else
- \ifx\FV@Line\empty
- \else
- \hbox to\z@{\kern\FV@NumberSep\theFancyVerbLine\hss}%
- \fi
- \fi
-%% DG/SR modification end
- \fi}}
-%% DG modification end
-\define@key{FV}{numbersep}{%
- \@tempdima=#1\relax
- \edef\FV@NumberSep{\number\@tempdima sp\relax}}
-\fvset{numbers=none,numbersep=12pt,firstnumber=auto}
-\def\FV@BVerbatimBegin{%
- \begingroup
- \FV@UseKeyValues
- \FV@BeginVBox
- \let\FV@ProcessLine\FV@BProcessLine
- \FV@FormattingPrep
- \FV@ObeyTabsInit}%
-\def\FV@BVerbatimEnd{\FV@EndVBox\endgroup}
-\def\FV@BeginVBox{%
- \leavevmode
- \hbox\ifx\FV@boxwidth\relax\else to\FV@boxwidth\fi\bgroup
- \ifcase\FV@baseline\vbox\or\vtop\or$\vcenter\fi\bgroup}
-\def\FV@EndVBox{\egroup\ifmmode$\fi\hfil\egroup}
-\define@key{FV}{boxwidth}{%
- \def\@tempa{#1}\def\@tempb{auto}%
- \ifx\@tempa\@tempb
- \let\FV@boxwidth\relax
- \else
- \@tempdima=#1\relax
- \edef\FV@boxwidth{\number\@tempdima sp}%
- \fi}
-\def\KV@FV@boxwidth@default{\let\FV@boxwidth\relax}
-\define@key{FV}{baseline}{%
- \if t#1\@empty\let\FV@baseline\@ne\else
- \if c#1\@empty\let\FV@baseline\tw@\else\let\FV@baseline\z@\fi
- \fi}
-\fvset{baseline=b,boxwidth}
-\def\FV@BProcessLine#1{\hbox{\FancyVerbFormatLine{#1}}}
-\def\FVB@BVerbatim{\FV@BVerbatimBegin\FV@Scan}
-\def\FVE@BVerbatim{\FV@BVerbatimEnd}
-\DefineVerbatimEnvironment{BVerbatim}{BVerbatim}{}
-\def\FV@BUseVerbatim#1{\FV@BVerbatimBegin#1\FV@BVerbatimEnd}
-\def\BVerbatimInput{\FV@Command{}{BVerbatimInput}}
-\def\FVC@BVerbatimInput#1{\FV@BUseVerbatim{\FV@Input{#1}}}
-\def\SaveVerbatim{\FV@Environment{}{SaveVerbatim}}
-\def\FVB@SaveVerbatim#1{%
- \@bsphack
- \begingroup
- \FV@UseKeyValues
-%% \FV@BeginVBox
-%% \let\FV@ProcessLine\FV@BProcessLine
-%% \FV@FormattingPrep
-%% \FV@ObeyTabsInit%
-%%
- \def\SaveVerbatim@Name{#1}%
- \gdef\FV@TheVerbatim{}%
- \def\FV@ProcessLine##1{%
- \expandafter\gdef\expandafter\FV@TheVerbatim\expandafter{%
- \FV@TheVerbatim\FV@ProcessLine{##1}}}%
- \gdef\FV@TheVerbatim{}%
- \FV@Scan}
-\def\FVE@SaveVerbatim{%
- \expandafter\global\expandafter\let
- \csname FV@SV@\SaveVerbatim@Name\endcsname\FV@TheVerbatim
-%% \expandafter\gdef
-%% \csname FV@SV@\SaveVerbatim@Name\endcsname{\FV@TheVerbatim}
-%% \FV@EndVBox
-%% \endgroup}
- \endgroup\@esphack}
-\DefineVerbatimEnvironment{SaveVerbatim}{SaveVerbatim}{}
-\def\FV@CheckIfSaved#1#2{%
- \@ifundefined{FV@SV@#1}%
- {\FV@Error{No verbatim text has been saved under name `#1'}\FV@eha}%
- {#2{\csname FV@SV@#1\endcsname}}}
-\def\UseVerbatim{\FV@Command{}{UseVerbatim}}
-\def\FVC@UseVerbatim#1{\FV@CheckIfSaved{#1}{\FV@UseVerbatim}}
-\def\LUseVerbatim{\FV@Command{}{LUseVerbatim}}
-\def\FVC@LUseVerbatim#1{\FV@CheckIfSaved{#1}{\FV@LUseVerbatim}}
-\def\BUseVerbatim{\FV@Command{}{BUseVerbatim}}
-\def\FVC@BUseVerbatim#1{\FV@CheckIfSaved{#1}{\FV@BUseVerbatim}}
-\newwrite\FV@OutFile
-\def\VerbatimOut{\FV@Environment{}{VerbatimOut}}
-\def\FVB@VerbatimOut#1{%
- \@bsphack
- \begingroup
- \FV@UseKeyValues
- \FV@DefineWhiteSpace
- \def\FV@Space{\space}%
- \FV@DefineTabOut
- \def\FV@ProcessLine{\immediate\write\FV@OutFile}%
- \def\@inpenc@loop##1##2{%
- \@tempcnta`##1\relax
- \loop
- \catcode\@tempcnta12
- \ifnum\@tempcnta<`##2\relax
- \advance\@tempcnta\@ne
- \repeat}%
- \@inpenc@loop\^^A\^^H%
- \@inpenc@loop\^^K\^^K%
- \@inpenc@loop\^^N\^^_%
- \@inpenc@loop\^^?\^^ff%
- \immediate\openout\FV@OutFile #1\relax
- \let\FV@FontScanPrep\relax
-%% DG/SR modification begin - May. 18, 1998 (to avoid problems with ligatures)
- \let\@noligs\relax
-%% DG/SR modification end
- \FV@Scan}
-\def\FVE@VerbatimOut{\immediate\closeout\FV@OutFile\endgroup\@esphack}
-\DefineVerbatimEnvironment{VerbatimOut}{VerbatimOut}{}
-\def\FV@DefineTabOut{%
- \def\FV@Tab{}%
- \@tempcnta=\FancyVerbTabSize\relax
- \loop\ifnum\@tempcnta>\z@
- \edef\FV@Tab{\FV@Tab\space}%
- \advance\@tempcnta\m@ne
- \repeat}
-\def\SaveVerb{\FV@Command{}{SaveVerb}}
-\begingroup
-\catcode`\^^M=\active%
-\gdef\FVC@SaveVerb#1#2{%
- \@namedef{FV@SV@#1}{}%
- \begingroup%
- \FV@UseKeyValues%
- \FV@CatCodes%
- \outer\def^^M{\FV@EOL}%
- \global\let\@tempg\FancyVerbAfterSave%
- \catcode`#2=12%
- \def\@tempa{\def\FancyVerbGetVerb####1####2}%
- \expandafter\@tempa\string#2{\endgroup\@namedef{FV@SV@#1}{##2}\@tempg}%
- \FancyVerbGetVerb\FV@EOL}%
-\endgroup
-\def\FV@EOL{%
- \endgroup
- \FV@Error%
- {Could not find the end delimiter of a short verb command}%
- {You probably just forget the end delimiter of a \string\Verb\space or
- \string\SaveVerb^^J%
- command, or you broke the literal text across input lines.^^J%
- Hit <return> to procede.}}
-\define@key{FV}{aftersave}{\def\FancyVerbAfterSave{#1}}
-\fvset{aftersave=}
-\def\FV@UseVerb#1{\mbox{\FV@UseKeyValues\FV@FormattingPrep#1}}
-\def\UseVerb{\FV@Command{}{UseVerb}}
-\def\FVC@UseVerb#1{%
- \@ifundefined{FV@SV@#1}%
- {\FV@Error{Short verbatim text never saved to name `#1'}\FV@eha}%
- {\FV@UseVerb{\@nameuse{FV@SV@#1}}}}
-\def\Verb{\FV@Command{}{Verb}}
-\begingroup
-\catcode`\^^M=\active%
-\gdef\FVC@Verb#1{%
- \begingroup%
- \FV@UseKeyValues%
- \FV@FormattingPrep%
- \FV@CatCodes%
- \outer\def^^M{}%
- \catcode`#1=12%
- \def\@tempa{\def\FancyVerbGetVerb####1####2}%
- \expandafter\@tempa\string#1{\mbox{##2}\endgroup}%
- \FancyVerbGetVerb\FV@EOL}%
-\endgroup
-\def\DefineShortVerb{\FV@Command{}{DefineShortVerb}}
-\def\FVC@DefineShortVerb#1{%
- \@ifundefined{FV@CC@\string#1}%
- {\FVC@@DefineShortVerb#1}%
- {\FV@Error{`\expandafter\@gobble\string#1' is already a short
- verb character.}\FV@eha}}
-\def\FVC@@DefineShortVerb#1{%
- \begingroup
- \lccode`\~=`#1%
- \lowercase{\gdef\@tempg{\edef~}\global\let\@temph~}%
- \endgroup
- \expandafter\let\csname FV@AC@\string#1\endcsname\@temph
- \expandafter\edef\csname FV@CC@\string#1\endcsname{\the\catcode`#1}%
- \expandafter\let\csname FV@KV@\string#1\endcsname\FV@KeyValues
- \@tempg{%
- \let\noexpand\FV@KeyValues\expandafter\noexpand
- \csname FV@KV@\string#1\endcsname
- \noexpand\FVC@Verb\expandafter\@gobble\string#1}%
- \expandafter\def\expandafter\dospecials\expandafter{\dospecials\do#1}%
- \expandafter\def\expandafter\@sanitize\expandafter{\@sanitize\@makeother#1}%
- \catcode`#1=\active}%
-\def\UndefineShortVerb#1{%
- \@ifundefined{FV@CC@\string#1}%
- {\FV@Error{`\expandafter\@gobble\string#1' is not a short
- verb character}\FV@eha}%
- {\FV@UndefineShortVerb#1}}
-\def\FV@UndefineShortVerb#1{%
- \catcode`#1=\csname FV@CC@\string#1\endcsname
-%% DG/SR modification begin - Jun. 12, 1998
- \expandafter\let\csname FV@CC@\string#1\endcsname\relax
-%% DG/SR modification end
- \begingroup
- \lccode`\~=`#1%
- \lowercase{\gdef\@tempg{\let~}}%
- \endgroup
- \expandafter\@tempg\csname FV@AC@\string#1\endcsname
- \def\@tempa##1\do#1##2\@nil##3\@nil##4\@@nil{##3\def\dospecials{##1##2}\fi}%
- \expandafter\@tempa\dospecials\@nil\iftrue\@nil\do#1\@nil\iffalse\@nil\@@nil
- \def\@tempa##1\@makeother#1##2\@nil##3\@nil##4\@@nil{%
- ##3\def\@sanitize{##1##2}\fi}%
- \expandafter\@tempa\@sanitize\@nil\iftrue\@nil\do#1\@nil\iffalse\@nil\@@nil}
-\def\SaveMVerb{\FV@Command{}{SaveMVerb}}
-\begingroup
-\catcode`\^^M=\active%
-\gdef\FVC@SaveMVerb#1#2{%
- \@ifundefined{FV@SVM@#1}{}%
- {\FV@Error{Moving verbatim name `#1' already used}%
- {I will overwrite the old definition. Hit <return> to continue.}}%
- \global\@namedef{FV@SVM@#1}{}%
- \begingroup%
- \let\FV@SavedKeyValues\FV@KeyValues%
- \FV@UseKeyValues%
- \FV@CatCodes%
- \outer\def^^M{}%
- \global\let\@tempg\FancyVerbAfterSave%
- \catcode`#2=12%
- \def\@tempa{\def\FancyVerbGetVerb####1####2}%
- \expandafter\@tempa\string#2{%
- \if@filesw
- \FV@DefineWhiteSpace%
- \let\FV@Space\space%
- \let\FV@Tab\space%
- \FV@MakeUnActive%
- \let\protect\string
- \immediate\write\@auxout{%
- \noexpand\SaveGVerb[\FV@SavedKeyValues]{#1}\string#2##2\string#2}%
- \fi
- \endgroup%
- \@namedef{FV@SV@#1}{##2}%
- \@tempg}%
- \FancyVerbGetVerb\FV@EOL}%
-\endgroup
-\def\SaveGVerb{\FV@Command{}{SaveGVerb}}
-\begingroup
-\catcode`\^^M=\active%
-\gdef\FVC@SaveGVerb#1#2{%
- \global\@namedef{FV@SVG@#1}{}%
- \begingroup%
- \FV@UseKeyValues%
- \FV@CatCodes%
- \outer\def^^M{}%
- \catcode`#2=12%
- \def\@tempa{\def\FancyVerbGetVerb####1####2}%
- \expandafter\@tempa\string#2{\endgroup\global\@namedef{FV@SVG@#1}{##2}}%
- \FancyVerbGetVerb\FV@EOL}%
-\endgroup
-\def\UseMVerb{\protect\pUseMVerb}
-\def\pUseMVerb{\FV@Command{}{pUseMVerb}}
-\def\FVC@pUseMVerb#1{%
- \expandafter\ifx \csname FV@SVM@#1\endcsname\relax
- \expandafter\ifx \csname FV@SVG@#1\endcsname\relax
- \@warning{Moving verbatim text not defined for name `#1'}\FV@eha
- {\bf ??}%
- \else
- \FV@UseVerb{\@nameuse{FV@SVG@#1}}%
- \fi
- \else
- \FV@UseVerb{\@nameuse{FV@SVM@#1}}%
- \fi}
-\expandafter\ifx\csname documentclass\endcsname\relax
- \def\lrbox#1{%
- \edef\@tempa{%
- \endgroup
- \setbox#1\hbox{%
- \begingroup\aftergroup}%
- \def\noexpand\@currenvir{\@currenvir}}%
- %\def\noexpand\@currenvline{\on@line}}%
- \@tempa
- \@endpefalse
- \bgroup
- \ignorespaces}
- \def\endlrbox{\unskip\egroup}
-\fi
-%% DG/SR modification begin - Jan. 22, 1998
-%%\@input{fancyvrb.rc}
-\@input{fancyvrb.cfg}
-%% DG/SR modification end
-\endinput
-%%
-%% End of file `fancyvrb.sty'.