summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/tests/mltextst.tex
diff options
context:
space:
mode:
authorDenis Bitouzé <dbitouze@wanadoo.fr>2021-02-25 18:23:07 +0000
committerDenis Bitouzé <dbitouze@wanadoo.fr>2021-02-25 18:23:07 +0000
commitc6101f91d071883b48b1b4b51e5eba0f36d9a78d (patch)
tree1bf7f5a881d7a4f5c5bf59d0b2821943dd822372 /Build/source/texk/web2c/tests/mltextst.tex
parent07ee7222e389b0777456b427a55c22d0e6ffd267 (diff)
French translation for tlmgr updated
git-svn-id: svn://tug.org/texlive/trunk@57912 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/tests/mltextst.tex')
-rw-r--r--Build/source/texk/web2c/tests/mltextst.tex200
1 files changed, 0 insertions, 200 deletions
diff --git a/Build/source/texk/web2c/tests/mltextst.tex b/Build/source/texk/web2c/tests/mltextst.tex
deleted file mode 100644
index d7925fea208..00000000000
--- a/Build/source/texk/web2c/tests/mltextst.tex
+++ /dev/null
@@ -1,200 +0,0 @@
-% This is MLTEXTST.TEX (Version 1.2) in text format, as of Dec 07, 1995.
-% Test file to check MLTeX implementations.
-%
-% Copyright (C) 1995 by B.Raichle; all rights are reserved.
-%
-% Usage:
-%
-% Run iniTeX on this file. Do not try to use plain-TeX or LaTeX.
-% Needs the font metric files: cmr10.tfm, cmti10.tfm
-%
-%
-% Changes:
-%
-% 95/12/05 v1.0
-% - initial version
-% 95/12/06 v1.1
-% - don't show tracing output
-% - \nonstopmode and additional test for bug 2.
-% 95/12/07 v1.2
-% - added MLTeX version numbers (and release dates)
-% - added test for MLTeX version 2.2
-%
-%
-% History of MLTeX for TeX 3.x:
-%
-% 90/04/02 Version ?? (for TeX 3.0)
-% \charsublist, \charsublistmax
-% ??/??/?? Version 1.0
-% 92/02/03 Version 2 (for TeX 3.1--3.141)
-% |effective_char| uses explicit font information
-% 93/10/29 Version 2.01
-% fix \*leaders problem
-% 95/12/06 Version 2.2 (for TeX 3.14159)
-% fix font loading bug
-% fix invalid |font_info| access
-% in work Version 3.0
-% complete re-implementation
-%
-%
-\catcode`\{=1 \catcode`\}=2 \catcode`\#=6
-%
-\immediate\write16{}
-\immediate\write16{Test for bugs in MLTeX (1995/12/07 v1.2 [br])}
-\immediate\write16{}
-%
-% check for plain-TeX:
-% we have to ensure that _no_ fonts are preloaded
-\expandafter\ifx\csname active\endcsname\relax \else
- \message{Please (Ini)TeX this file, no plain-TeX, no LaTeX!}
- \expandafter\endinput\expandafter\end\fi
-% check for MLTeX
-\expandafter\ifx\csname charsubdef\endcsname\relax
- \message{This test file can only be used with MLTeX!}
- \expandafter\endinput\fi
-%
-\nonstopmode
-%%%\tracingonline=1 \tracingoutput=1 \showboxbreadth=255
-%%%\tracinglostchars=100 \tracingcharsubdef=1
-\hsize=5in
-%
-%
-% 1. Check for bug accessing the wrong character metrics:
-% (in versions before Feb 1992)
-%
-\font\tenrm=cmr10\relax
-%
-% The group is only necessary, if you want to use this
-% test in your own macros. \charsubdefmax is saved
-% explicitly for very old versions of MLTeX which have
-% an additional bug when assigning this special integer.
-\begingroup
- \count255=\charsubdefmax
- \charsubdefmax=256 % enable all substitutions
- % very old versions of MLTeX will
- \charsubdef`\i=1 `\M % substitute "i" by "M"
- \setbox0=\hbox{\tenrm i}% <-- here
- \dimen0=\wd0 % get width of box (either "i" or "M")
- % get width of "i"
- \charsubdefmax=-1 % disable all substitutions
- \setbox0=\hbox{\tenrm i}%
- \dimen2=\wd0 % get width of box
- % restore former value of \charsubdefmax
- \charsubdefmax=\count255
-\expandafter\endgroup
-\ifdim\dimen0=\dimen2\relax
- \immediate\write16{..... Ok, this is a newer MLTeX version (>= 2.0).}
- \immediate\write16{}
-\else
- \immediate\write16{%
-..... This is a very old version of MLTeX < 2.0 (released before Feb. 1992)}
- \immediate\write16{%
-..... immediately update to the newest MLTeX version!}
- \immediate\write16{}
- \expandafter\endinput\expandafter\end
-\fi
-%
-%
-% 2. Check for font loading bug:
-% (in versions before Dec 1995)
-%
-% - Define a \charsubdef of an existing character with
-% a non-existing base character
-%
-\charsubdef `A=`a 128
-%%%\message{now: \string\charsubdefmax=\number\charsubdefmax}
-%
-% - now load font (do not preload this font!!!!!!)
-%
-\immediate\write16{}
-\immediate\write16{..... If there will be an error "Bad metric (TFM) file",}
-\immediate\write16{..... please update to the newest MLTeX version!}
-\immediate\write16{}
-\font\test=cmti10\relax
-\begingroup
- \setbox0=\hbox{\test A}
-\expandafter\endgroup
-\ifdim\wd0>0pt\relax \else
- \immediate\write16{}
- \immediate\write16{%
-..... This seems to be MLTeX version 2.0 or 2.01 (released before Dec. 1995)}
- \immediate\write16{%
-..... this version has bugs,}
- \immediate\write16{%
-..... please update to the newest MLTeX version!}
- \immediate\write16{}
- \expandafter\endinput\expandafter\end
-\fi
-\immediate\write16{..... Good, no "Bad metric (TFM) file" bug,}
-\immediate\write16{..... seems to be the a MLTeX version > 2.01.}
-%
-%
-% 3. Check for invalid |font_info| access:
-%
-\immediate\write16{}
-\font\tenrm=cmr10\relax
-%
-\setbox0=\hbox{\tenrm \char`a}\dimen1=\wd0
-\setbox0=\hbox{\tenrm \char`M}\dimen3=\wd0
-\setbox0=\hbox{\tenrm \char0}\dimen5=\wd0
-%
-\charsubdef 128=`a `a
-\setbox0=\hbox{\tenrm \char128}
-\dimen0=\wd0 % get width of `a
-%
-% Now the \charsubdef is changed using
-% an existing base character:
-\charsubdef 128=`a `M
-\setbox0=\hbox{\unhbox0}
-\dimen2=\wd0 % get width of `a or `M
-%
-% And then we remove it. MLTeX will try to access the 128th
-% entry in the |char_base| array, which is the first entry in
-% the width index array.
-% For MLTeX 2.2 this was "fixed", now it will report a warning
-% "Missing char... no substitution for ..." and MLTeX will use
-% the first character of the font.
-\charsubdefmax=-1
-\setbox0=\hbox{\unhbox0}%
-\dimen4=\wd0
-%
-%%%\message{\the\dimen0-\the\dimen1-\the\dimen2-\the\dimen3-%
-%%% \the\dimen4-\the\dimen5-}
-%
-\def\x#1\fi\fi{\fi\fi#1}
-\ifdim\dimen0=\dimen2\relax \ifdim\dimen0=\dimen4\relax
- \immediate\write16{}
- \immediate\write16{%
-...... Seems to be MLTeX version 3.x (unreleased),}
- \immediate\write16{%
-...... from whom did you get this version? :-)}
- \immediate\write16{}
- \immediate\write16{%
-Congratulations, you have the best MLTeX version!}
- \immediate\write16{}
- \x{\endinput\csname end\endcsname}%
-\fi\fi
-%
-\def\x#1\fi{\fi#1}
-\ifdim\dimen4=\dimen5\relax \else
- \immediate\write16{}
- \immediate\write16{%
-..... Seems to be MLTeX version 2.0 or 2.01 (released before Dec. 1995)}
- \immediate\write16{%
-..... this version has bugs,}
- \immediate\write16{%
-..... please update to the newest MLTeX version!}
- \immediate\write16{}
- \expandafter\endinput\expandafter\end
-\fi
-%
-\immediate\write16{}
-\immediate\write16{%
-...... Seems to be MLTeX version 2.2 (released Dec. 1995).}
-\immediate\write16{}
-\immediate\write16{%
-Congratulations, you have a MLTeX version with all known bugs fixed.}
-\immediate\write16{}
-\end
-%
-%%% END OF FILE %%%