diff options
author | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2019-09-02 13:46:59 +0900 |
commit | e0c6872cf40896c7be36b11dcc744620f10adf1d (patch) | |
tree | 60335e10d2f4354b0674ec22d7b53f0f8abee672 /info/examples/tip/ts-verb.tip |
Initial commit
Diffstat (limited to 'info/examples/tip/ts-verb.tip')
-rw-r--r-- | info/examples/tip/ts-verb.tip | 84 |
1 files changed, 84 insertions, 0 deletions
diff --git a/info/examples/tip/ts-verb.tip b/info/examples/tip/ts-verb.tip new file mode 100644 index 0000000000..cd9fd48b91 --- /dev/null +++ b/info/examples/tip/ts-verb.tip @@ -0,0 +1,84 @@ +% This macro source file is from the four volume series +% "TeX in Practice" by Stephan von Bechtolsheim, published +% 1993 by Springer-Verlag, New York. +% Copyright 1993 Stephan von Bechtolsheim. +% No warranty or liability is assumed. +% This macro may be copied freely if no fees other than +% media cost or shipping charges are charged and as long +% as this copyright and the following source code itself +% is not changed. Please see the series for further information. +% +% Version: 1.1 +% Date: Sep 9, 1993 +% +% +% This source code is documented in 18.3.15, p. III-57. +% Original source in file "tokens1.TEX", starting line 3306. +\wlog{L: "ts-verb.tip" ["tokens1.TEX," l. 3306, p. III-57]}% +% This file DOES belong to format "texip." +\InputD{verbdisp.tip} +\InputD{verb-mac.tip} +\InputD{verb.tip} +\InputD{verbwr.tip} +\InputD{vwrt-mac.tip} +\InputD{defauarg.tip} +\InputD{compst.tip} +\InputD{testsubs.tip} +\InputD{freespac.tip} +\InputD{fexist.tip} +\InputD{ts-verb1.tip} +\InputD{ts-verb2.tip} +\catcode`\@ = 11 +\def\verb{\Verb} +\VerbLineNumtrue +\VerbatimTab = 4 +\DisplayVerbatimVskip = 5pt +\def\VerbatimFont{\small\tt}% +\def\ListVerbTeXIP #1{% + \par + \medskip + \vskip 60pt + \vskip -60pt + \def\ListAsFileName{#1}% + \def\LabelName{code-#1}% + \if\SuffixConditional{#1}{.flf}% + \def\ListAsFileName ##1.flf{\def\ListAsFileName{##1.log}}% + \ListAsFileName #1% + \def\LabelName{}% + \else + \if\SuffixConditional{#1}{.flf2}% + \def\ListAsFileName ##1.flf2{\def\ListAsFileName{##1.log}}% + \ListAsFileName #1% + \def\LabelName{}% + \fi + \fi + \if\StringsEqualConditional{#1}{\jobname.ver}% + \def\ListAsFileName{}% + \def\LabelName{}% + \fi + \if\StringsEqualConditional{#1}{ex-verbwr.ver} + \def\LabelName{}% + \fi + \if\EmptyStringConditional{\LabelName}% + \else + \Label{code-#1}% + \fi + \if\EmptyStringConditional{\ListAsFileName} + \else + \centerline{% + $\bullet$% + \space + \tt\ListAsFileName + \space + $\bullet$% + }% + \fi + \@btex + \@StartVerbatim{1}% + \wlog{[\string\ListVerbTeXIP:}% + \input #1 + \wlog{]}% svb: this was \message before + \@DoneVerbatim + \@etex +} +\catcode`\@ = 12 |