From a494a509f3f4a13a450c898488155f7aa5353bd3 Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Thu, 1 Feb 2024 03:00:51 +0000 Subject: CTAN sync 202402010300 --- info/examples/tip/topinfix.tip | 40 ---------------------------------------- 1 file changed, 40 deletions(-) delete mode 100644 info/examples/tip/topinfix.tip (limited to 'info/examples/tip/topinfix.tip') diff --git a/info/examples/tip/topinfix.tip b/info/examples/tip/topinfix.tip deleted file mode 100644 index ec2accf885..0000000000 --- a/info/examples/tip/topinfix.tip +++ /dev/null @@ -1,40 +0,0 @@ -% 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.0 -% Date: May 1, 1993 -% -% -% This source code is documented in 35.5.2, p. IV-110. -% Original source in file "o2.TEX", starting line 1246. -\wlog{L: "topinfix.tip" ["o2.TEX," l. 1246, p. IV-110]}% -% This file DOES belong to format "texip." -\InputD{mspaces.tip} -\InputD{op-endin.tip} -\InputD{maxmindi.tip} -\catcode`\@ = 11 -\def\EndInsertTopInsFix{% - \ifdim\dp0 > 10pt - \wlog{\string\endinsert: \string\topinsert - material deeper than 10pt}% - \dp0 = 10pt - \fi - \MaxDimen{\dimen0}{\dp0}{0pt}{} - \dimen1 = \vsize - \advance\dimen1 by -\dimen0 - \advance\dimen1 by -12pt - \ifdim\ht0 > \dimen1 - \wlog{\string\endinsert: \noexpand\topinsert - material too long (\the\ht0),}% - \wlog{\EightSpaces shortened to \the\dimen1.}% - \ht0 = \dimen1 - \fi -} -\catcode`\@ = 12 -- cgit v1.2.3