summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/fontinst/base/test
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/fontinst/base/test')
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/comparemetrics.sty941
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/comparepls.tex73
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/scaledtest.tex8
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/speedtest1.tex62
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/testfont.tex208
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/testsc.tex41
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1901test.mtx22
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1901test.tex214
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1902test.tex11
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1905test.tex22
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1906test.mtx64
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1906test.tex12
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1913test.tex21
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1914test.tex50
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1914testmap.tex17
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1914testshow.tex22
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1915test.tex25
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1915testmap.tex9
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1916test.mtx23
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1916test.tex14
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1916test2.tex27
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1923test.tex47
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1927test.tex18
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1928test.tex13
-rw-r--r--Master/texmf-dist/doc/fontinst/base/test/v1928test2.tex32
25 files changed, 0 insertions, 1996 deletions
diff --git a/Master/texmf-dist/doc/fontinst/base/test/comparemetrics.sty b/Master/texmf-dist/doc/fontinst/base/test/comparemetrics.sty
deleted file mode 100644
index 7864da89731..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/comparemetrics.sty
+++ /dev/null
@@ -1,941 +0,0 @@
-% We start by making some default catcode assignments, in case we are
-% using ini\TeX{}.
-% \begin{macrocode}
-%<*pkg>
-\catcode`\{=1
-\catcode`\}=2
-\catcode`\#=6
-\catcode`\^=7
-%</pkg>
-% \end{macrocode}
-%
-% \package{fontinst} uses some unusual, but convenient, settings of
-% |\catcode|. |@| and |_| are made letters, |~| is made a space, and
-% space and newline are ignored. Before setting those however, we save
-% the current values of the catcodes, so that they can be restored at
-% the end of \texttt{fontinst.sty}.
-%
-% \begin{macrocode}
-%<*pkg>
-\edef\spacecatcode{\the\catcode`\ }
-\edef\nlcatcode{\the\catcode`\^^M}
-\edef\atcatcode{\the\catcode`\@}
-\edef\underscorecatcode{\the\catcode`\_}
-\edef\tildecatcode{\the\catcode`\~}
-% \end{macrocode}
-%
-% \begin{macrocode}
-\catcode`\ =9
-\catcode`\^^M=9
-\catcode`\@=11
-\catcode`\_=11
-\catcode`\~=10
-%</pkg>
-% \end{macrocode}
-%
-
-
-\newlinechar=`\^^J
-
-% \begin{macro}{\a_read}
-% \begin{macro}{\b_read}
-% \begin{macro}{\a_filelineno}
-% \begin{macro}{\b_filelineno}
-% These control sequences are used for keeping track of the ``physical''
-% side of the two input files. |\a_read| and |\b_read| are the stream
-% numbers. |\a_filelineno| and |\b_filelineno| are the respective
-% line numbers of the lines most recently read from these files.
-% \begin{macrocode}
-\newread\a_read
-\newread\b_read
-\newcount\a_filelineno
-\newcount\b_filelineno
-% \end{macrocode}
-% \end{macro}\end{macro}\end{macro}\end{macro}
-%
-% \begin{macro}{\a_lineno}
-% \begin{macro}{\b_lineno}
-% \begin{macro}{\a_bufbase}
-% \begin{macro}{\b_bufbase}
-% \begin{macro}{\a_bufmid}
-% \begin{macro}{\b_bufmid}
-% \begin{macro}{\a_buftop}
-% \begin{macro}{\b_buftop}
-% These count registers are used for managing the buffert of lines
-% that are read from the input files when a match between lines is
-% being looked for. This buffert consists of lines which are saved in
-% the macros
-% \begin{quote}
-% |\|\meta{letter}|_saved-|\meta{ofs}
-% \end{quote}
-% where \meta{letter} is |a| or |b| and \meta{ofs} is an integer,
-% being the index into the buffert. |\a_bufbase| and |\b_bufbase|
-% contain the \meta{ofs} of the first line currently in the buffert,
-% whereas |\a_buftop| and |\b_buftop| contain the \meta{ofs} of the
-% last such line. |\a_bufmid| and |\b_bufmid| hold the buffert
-% positions of the lines which are currently considered the next by
-% |\get_next_line|. If \(\mathtt{buftop}<\mathtt{bufmid}\) then the
-% buffert is empty. |\a_lineno| and |\b_lineno| are the respective
-% line numbers of the |\a_bufbase| and |\b_bufbase| lines.
-%
-% All these registers should be set globally.
-% \begin{macrocode}
-\newcount\a_lineno \newcount\b_lineno
-\newcount\a_bufbase \newcount\b_bufbase
-\newcount\a_bufmid \newcount\b_bufmid
-\newcount\a_buftop \newcount\b_buftop
-% \end{macrocode}
-% \end{macro}\end{macro}\end{macro}\end{macro}\end{macro}\end{macro}
-% \end{macro}\end{macro}
-
-
-% \begin{macro}{\get_next_line}
-% The |\get_next_line| macro is called as
-% \begin{quote}
-% |\get_next_line|\marg{letter}
-% \end{quote}
-% where \meta{letter} is |a| or |b|. This sets the
-% |\|\meta{letter}|_line| macro to the next line of that file and
-% updates the value of |\|\meta{letter}|_lineno|.
-%
-% The ``next line'' is normally read from input stream
-% |\|\meta{letter}|_read|, but if a line mismatch recently occured
-% then it might happen that the next line has already been read from
-% the file, and in that case it is taken from one of the
-% |\|\meta{letter}|_saved-|\meta{ofs} macros.
-% \begin{macrocode}
-\def\get_next_line#1{
- \ifnum \csname#1_buftop\endcsname<\csname#1_bufmid\endcsname
- \ifeof \csname#1_read\endcsname
- \x_cs\let{#1_line}\end_of_file_line
- \else
- \read\csname#1_read\endcsname t\x_cs{o}{#1_line}
- \global\advance \csname#1_filelineno\endcsname \@ne
- \fi
- \else
- \expandafter\let \csname#1_line\expandafter\endcsname
- \csname#1_saved-\the\csname#1_bufmid\endcsname\endcsname
- \fi
-}
-% \end{macrocode}
-% \end{macro}
-
-% \begin{macro}{\end_of_file_line}
-% This macro expands to the text \verb*|(ENDOFFILE) | with the
-% catcodes it would have if read from an input file. It is used as an
-% end-of-file marker.
-% \begin{macrocode}
-\begingroup
- \catcode`\(=13
- \catcode`\)=13
- \gdef\end_of_file_line{(ENDOFFILE)~}
-\endgroup
-% \end{macrocode}
-% \end{macro}
-
-% \begin{macro}{\the_line}
-% The |\the_line| macro is called as
-% \begin{quote}
-% |\the_line|\marg{letter}\marg{ofs}
-% \end{quote}
-% where \meta{letter} is |a| or |b|, and \meta{ofs} is a \TeX\ number.
-% It expands to the control sequence |\|\meta{letter}|_saved-|^^A
-% \meta{ofs}.
-% \begin{macrocode}
-\def\the_line#1#2{\csname#1_saved-\number#2\endcsname}
-% \end{macrocode}
-% \end{macro}
-
-% \begin{macro}{\initialise_search}
-% The |\initialise_search| macro sets everything up for a search for
-% a match between lines.
-%
-% \begin{macrocode}
-\def\initialise_search{
- \global\a_bufbase=\a_bufmid
- \global\b_bufbase=\b_bufmid
- \add_to_buffert{a}
- \add_to_buffert{b}
- \global\advance \a_bufmid \@ne
- \global\advance \b_bufmid \@ne
-}
-% \end{macrocode}
-% \end{macro}
-
-% \begin{macro}{\add_to_buffert}
-% The |\add_to_buffert| macro is called as
-% \begin{quote}
-% |\add_to_buffert|\marg{letter}
-% \end{quote}
-% It adds the line returned by |\get_next_line| to the corresponding
-% buffert (if it wasn't already there) and updates the counters for
-% that buffert. After this, the line following the line being put into
-% the buffert will be the line that |\get_next_line| returns.
-% \begin{macrocode}
-\def\add_to_buffert#1{
- \ifnum \csname#1_buftop\endcsname<\csname#1_bufmid\endcsname
- \expandafter\let
- \csname#1_saved-\the\csname#1_bufmid\endcsname
- \expandafter\endcsname
- \csname#1_line\endcsname
- \global\advance \csname#1_buftop\endcsname \@ne
- \fi
-}
-% \end{macrocode}
-% \end{macro}
-
-
-
-\newcount\first_integer
-\newcount\second_integer
-
-% \begin{macro}{\match_lines}
-% The |\match_lines| macro tests if two lines can be considered the
-% same (up to metrics changes, which need not be small). It is called as
-% \begin{quote}
-% |\match_lines|\marg{line a}\marg{line b}
-% \end{quote}
-% \meta{line a} and \meta{line b} may be any amount of text which
-% eventually expands to the lines in question. |\match_lines| returns
-% its answer by setting the |_a_| switch to |false| (if the lines
-% match) or |true| (if the lines don't match).
-%
-% |\match_lines| also causes the |\first_dimen| and |\second_dimen|
-% registers, as well as the |_histogram_dimen_| switch to be updated,
-% so it can be immediately followed by a test of the metrics.
-% \begin{macrocode}
-\def\match_lines#1#2{
- \first_integer=\z@
- \second_integer=\z@
- \first_dimen=\z@
- \second_dimen=\z@
- \x_cs\let{string-+}\empty_command
- \x_cs\let{string--}\empty_command
-% \end{macrocode}
-% \begin{macrocode}
- \def\sign{+}
- #1\line_stop
- \def\sign{-}
- #2\line_stop
-% \end{macrocode}
-% \begin{macrocode}
- \_a_false
- \expandafter\ifx \csname cmd-+ \expandafter\endcsname
- \csname cmd--\endcsname
- \else \_a_true \fi
- \ifnum \first_integer=\z@ \else \_a_true \fi
- \ifnum \second_integer=\z@ \else \_a_true \fi
- \expandafter\ifx \csname string-+ \expandafter\endcsname
- \csname string--\endcsname
- \else \_a_true \fi
-}
-% \end{macrocode}
-% \end{macro}
-
-% \begin{macro}{\try_matching}
-% \begin{macro}{\a_bufP}
-% \begin{macro}{\b_bufP}
-% The |\try_matching| descends through the buffert until the |_a_|
-% switch gets |false| or it has tried the bottommost lines in the
-% buffert. Since |\body| is already defined by the |\loop| in
-% |\process_lines|, |\try_matching| uses an explicit end recursion to
-% make the loop.
-% \begin{macrocode}
-\newcount\a_bufP
-\newcount\b_bufP
-\def\try_matching{
- \global\advance \a_bufP \m@ne
- \global\advance \b_bufP \m@ne
-% % Begin debug
-% \wlog{a_bufbase:~\the\a_bufbase\space\space\space
-% b_bufbase:~\the\b_bufbase}
-% \wlog{a_bufmid:~\the\a_bufmid\space\space\space
-% b_bufmid:~\the\b_bufmid}
-% \wlog{a_buftop:~\the\a_buftop\space\space\space
-% b_buftop:~\the\b_buftop}
-% \wlog{a_bufP:~\the\a_bufP\space\space\space
-% b_bufP:~\the\b_bufP}
-% \begingroup
-% \def\do_left_paren{(}\def\do_right_paren{)}
-% \wlog{a_line:~\a_line}
-% \wlog{b_buf_line:~\the_line{b}{\b_bufP}}
-% \wlog{b_line:~\b_line}
-% \wlog{a_buf_line:~\the_line{a}{\a_bufP}^^J}
-% \endgroup
-% % End debug
- \match_lines{\a_line}{\the_line{b}{\b_bufP}}
- \if_a_
- \match_lines{\the_line{a}{\a_bufP}}{\b_line}
- \if_a_ \else
- \global\a_bufmid=\a_bufP
- \fi
- \else
- \global\b_bufmid=\b_bufP
- \fi
- \ifnum \a_bufP>\a_bufbase \if_a_
- \expandafter\expandafter\expandafter\try_matching
- \fi \fi
-}
-% \end{macrocode}
-% \end{macro}
-
-% \begin{macro}{\report_mismatch}
-% The |\report_mismatch| macro does precisely what it says. It also increases
-% the \texttt{bufbase} and \texttt{lineno} registers to point at the
-% matching lines.
-% \begin{macrocode}
-\def\report_mismatch{
- \begingroup
- \def\do_left_paren{(}
- \def\do_right_paren{)}
- \wlog{Mismatch~in~first~file~(at~\the\a_lineno):}
- \loop
- \wlog{\the_line{a}{\a_bufbase}}
- \ifnum \a_bufbase<\a_bufmid
- \global\advance \a_bufbase \@ne
- \global\advance \a_lineno \@ne
- \repeat
- \wlog{Match~found~at~line~\the\a_lineno.}
- \wlog{Mismatch~in~second~file~(at~\the\b_lineno):}
- \loop
- \wlog{\the_line{b}{\b_bufbase}}
- \ifnum \b_bufbase<\b_bufmid
- \global\advance \b_bufbase \@ne
- \global\advance \b_lineno \@ne
- \repeat
- \wlog{Match~found~at~line~\the\b_lineno.}
- \endgroup
- \glyphified_location
- \ifnum 4>\compared_status
- \global\chardef\compared_status=4
- \fi
-}
-% \end{macrocode}
-% \end{macro}
-
-\def\glyphified_location{
- \ifx \encoding_name\empty_command
- \ifnum \m@ne<\last_character
- \wlog{This~is~related~to~slot~\the\last_character.^^J}
- \else
- \wlog{This~is~in~the~header.^^J}
- \fi
- \else
- \if_undefined{name-\encoding_name-\the\last_character}\then
- \ifnum \last_character=\m@ne
- \wlog{This~is~in~the~header.^^J}
- \else
- \wlog{This~is~related~to~slot~\the\last_character\space
- (unencoded).^^J}
- \fi
- \else
- \wlog{This~is~related~to~the~glyph~
- \csname name-\encoding_name-\the\last_character\endcsname
- .^^J}
- \fi
- \fi
-}
-% \begin{macro}{\compared_status}
-% |\compared_status| is a \meta{chardef token} which stores the
-% current status of the comparision, according to the following table
-% \begin{enumerate}
-% \item[0] The property lists are equal---there may be checksum
-% differences, but nothing else.
-% \item[1] The property lists are almost equal---there are
-% differences in the metrics, but these are within the |\tolerance|
-% level.
-% \item[2] The property lists are essentially equal---there are
-% differences in the metrics, but these are within the |\tolerance|
-% level, with the exception of some \texttt{CHARHT},
-% \texttt{CHARDP}, and \texttt{CHARIC} values.
-% \item[3] The property lists have metric differences---there are
-% metric differences not with category 2.
-% \item[4] The property lists are not completely matched.
-% \end{enumerate}
-% \end{macro}
-
-% \begin{macro}{\step_linenos}
-% The |\step_linenos| macro increments the |_lineno| line numbers. If
-% the current line was fetched from the buffert, then it also
-% increments the |_bufmid| and |_bufbase| registers, and checks
-% whether the buffert ended (in which case it is normalized to its
-% starting position, to conserve hash table space).
-% \begin{macrocode}
-\def\step_linenos{
- \global\advance \a_lineno \@ne
- \ifnum \a_bufmid=\a_buftop
- \global\a_bufbase=\z@
- \global\a_bufmid=\z@
- \global\a_buftop=\m@ne
- \else\ifnum \a_bufmid<\a_buftop
- \global\advance \a_bufmid \@ne
- \global\advance \a_bufbase \@ne
- \fi\fi
- \global\advance \b_lineno \@ne
- \ifnum \b_bufmid=\b_buftop
- \global\b_bufbase=\z@
- \global\b_bufmid=\z@
- \global\b_buftop=\m@ne
- \else\ifnum \b_bufmid<\b_buftop
- \global\advance \b_bufmid \@ne
- \global\advance \b_bufbase \@ne
- \fi\fi
-}
-% \end{macrocode}
-% \end{macro}
-
-
-\newdimen\first_dimen
-\newdimen\second_dimen
-\newcount\ht_hist_i
-\newcount\ht_hist_ii
-\newcount\ht_hist_iii
-\newcount\ht_hist_iv
-\newcount\dp_hist_i
-\newcount\dp_hist_ii
-\newcount\dp_hist_iii
-\newcount\dp_hist_iv
-\newcount\ic_hist_i
-\newcount\ic_hist_ii
-\newcount\ic_hist_iii
-\newcount\ic_hist_iv
-
-% \begin{macro}{\clear_histograms}
-% This macro clears all the histograms.
-% \begin{macrocode}
-\def\clear_histograms{
- \global\ht_hist_i=\z@
- \global\ht_hist_ii=\z@
- \global\ht_hist_iii=\z@
- \global\ht_hist_iv=\z@
- \global\dp_hist_i=\z@
- \global\dp_hist_ii=\z@
- \global\dp_hist_iii=\z@
- \global\dp_hist_iv=\z@
- \global\ic_hist_i=\z@
- \global\ic_hist_ii=\z@
- \global\ic_hist_iii=\z@
- \global\ic_hist_iv=\z@
-}
-% \enc{macrocode}
-% \end{macro}
-
-% \begin{macro}{\present_histograms}
-% This macro writes the histogram data to the log file.
-% \begin{macrocode}
-\def\present_histograms{
- \wlog{\string\tolerance*~\space CHARHT~\space CHARDP~\space CHARIC}
- \wlog{~\space\space 1--~\space\space 10\hist_to_eight{ht}{i}
- \hist_to_eight{dp}{i}\hist_to_eight{ic}{i}}
- \wlog{~\space 10--~\space 100\hist_to_eight{ht}{ii}
- \hist_to_eight{dp}{ii}\hist_to_eight{ic}{ii}}
- \wlog{~100--~1000\hist_to_eight{ht}{iii}\hist_to_eight{dp}{iii}
- \hist_to_eight{ic}{iii}}
- \wlog{1000--10000\hist_to_eight{ht}{iv}\hist_to_eight{dp}{iv}
- \hist_to_eight{ic}{iv}}
-}
-\def\hist_to_eight#1#2{\x_cs\hist_to_eight_i{#1_hist_#2}}
-\def\hist_to_eight_i#1{
- \ifnum #1<\@M
- \four_spaces
- \ifnum #1<\one_hundred
- \space\space
- \ifnum 10>#1 ~\fi
- \else \ifnum #1<\one_thousand \space\fi \fi
- \else
- \ifnum 1000000>#1
- \space\space
- \ifnum 100000>#1 ~\fi
- \else \ifnum 1000000>#1 ~\fi \fi
- \fi
- \the#1
-}
-% \end{macrocode}
-% \end{macro}
-
-
-% \begin{macro}{\metric_statistics}
-% \begin{macro}{\metric_origin}
-% The |\metric_statistics| macro takes care of comparing the metrics
-% by inspecting the values of |\first_dimen| and |\second_dimen|. It
-% has four classes of differences, which are represented by
-% |\compared_status| values 0--3: no difference, tolerable (almost no)
-% difference, histogrammed (essentially no) difference, and
-% non-tolerable difference. If a non-tolerable difference is found,
-% then the current lines are written to the log file. Histogrammed
-% differences causes the corresponding
-% |\|\meta{type}|_hist_|\meta{group} register to be incremented, and
-% tolerable differences only affect the value of |\compared_status|.
-%
-% The |\metric_origin| macro contains the \meta{type} of the metric
-% data. It is usually empty, but PL properties with metrics that have
-% histograms set it so that the correct histogram is updated.
-%
-% \begin{macrocode}
-\def\metric_statistics{
- \_a_false
- %
- \ifdim \first_dimen<\z@ \first_dimen=-\first_dimen \fi
- \ifdim \first_dimen=\z@
- \else\ifdim \first_dimen<\tolerance
- \ifnum 1>\compared_status
- \global\chardef\compared_status=1
- \fi
- \else\ifx \metric_origin\empty_command
- \_a_true
- \else
- \a_count=\@ne
- \def\a_macro{10}
- \loop\ifdim \a_macro\tolerance<\first_dimen
- \edef\a_macro{\a_macro 0}
- \advance \a_count \@ne
- \repeat
- \if_undefined{\metric_origin _hist_ \romannumeral\a_count}\then
- \_a_true
- \else
- \global\advance \csname \metric_origin _hist_
- \romannumeral\a_count \endcsname \@ne
- \ifnum 2>\compared_status
- \global\chardef\compared_status=2
- \fi
- \fi
- \fi\fi\fi
- %
- \ifdim \second_dimen<\z@ \second_dimen=-\second_dimen \fi
- \ifdim \second_dimen=\z@
- \else\ifdim \second_dimen<\tolerance
- \ifnum 1>\compared_status
- \global\chardef\compared_status=1
- \fi
- \else\ifx \metric_origin\empty_command
- \_a_true
- \else
- \a_count=\@ne
- \def\a_macro{10}
- \loop\ifdim \a_macro\tolerance<\second_dimen
- \edef\a_macro{\a_macro 0}
- \advance \a_count \@ne
- \repeat
- \if_undefined{\metric_origin _hist_ \romannumeral\a_count}\then
- \_a_true
- \else
- \global\advance \csname \metric_origin _hist_
- \romannumeral\a_count \endcsname \@ne
- \ifnum 2>\compared_status
- \global\chardef\compared_status=2
- \fi
- \fi
- \fi\fi\fi
- %
- \if_a_
- \ifnum 3>\compared_status
- \global\chardef\compared_status=3
- \fi
- \begingroup
- \def\do_left_paren{(}
- \def\do_right_paren{)}
- \wlog{Metric~differences~at~lines~\the\a_lineno\space
- and~\the\b_lineno\space respectively:}
- \wlog{\a_line}
- \wlog{\b_line}
- \endgroup
- \glyphified_location
- \fi
-}
-% \end{macrocode}
-% \end{macro}\end{macro}
-
-
-
-
-\newif\if_b_
-
-% \begin{macro}{\process_lines}
-% The |\process_lines| macro is the cheif executive in the comparision.
-% Its normal mode of operation is to retrive the next two lines from
-% the input files, match them, and update the metric differences
-% statistics. If the lines do not match, however, it starts building a
-% buffert of lines in which it searches for two matching lines. When
-% these two lines are found the mismatching portions of the files are
-% written to the log file, and the metric difference statistics are
-% updated for the two lines that matched.
-%
-% \begin{macrocode}
-\def\process_lines{
- \get_next_line{a}
- \get_next_line{b}
- \match_lines{\a_line}{\b_line}
- \if_a_
-% \end{macrocode}
-% Now the process of trying to find a match begins. At each step of
-% the search for a match, it tries all possible matches with the
-% lines read so far that haven't been tried at an earlier step.
-% \begin{macrocode}
-% \tracingmacros=\@ne\tracingcommands=\tw@ % DEBUG
- \initialise_search
- \loop
- \get_next_line{a}
- \get_next_line{b}
- \add_to_buffert{a}
- \add_to_buffert{b}
- \match_lines{\a_line}{\b_line}
- \if_a_
- \global\a_bufP=\a_bufmid
- \global\b_bufP=\b_bufmid
- \try_matching
- \fi
- \if_a_
- \global\advance \a_bufmid \@ne
- \global\advance \b_bufmid \@ne
- \ifnum \a_bufmid>\sixt@@n
- \errmessage{Big~buffert.~\the\a_lineno[\the\a_filelineno]:
- \the\b_lineno[\the\b_filelineno]}
- \fi % DEBUG
- \repeat
- \report_mismatch
-% \tracingcommands=\z@\tracingmacros=\z@ % DEBUG
-% \end{macrocode}
-% \begin{macrocode}
- \fi
- \metric_statistics
- \step_linenos
- \par % DEBUG
- \if \ifx \a_line\end_of_file_line
- \ifx \b_line\end_of_file_line 1\else 0\fi\else 0\fi 0
- % then
- \expandafter\process_lines
- \fi
-}
-% \end{macrocode}
-% \end{macro}
-
-\def\loadencoding#1{{
- \def\do_slot{\x_cs\xdef{name-#1-\the\slot_number}{\slot_name}}
- \inputetx{#1}
-}}
-
-% \begin{macro}{\comparePLs}
-% The |\comparePLs| command compares two property lists files. It is
-% geared against verifying that two different such files are as good
-% as equal, and it might take a very long time before it gives up on
-% trying to find any resemblance between them. It is furthermore only
-% meant to be used on (V)PL files generated by \package{TFtoPL} or
-% \package{VFtoVP}, because it assumes the property lists follow a
-% stricter syntax than \package{PLtoTF} and \package{VPtoVF} requires
-% them to. Finally it needs to be said that the comparision is rather
-% stupid in many respects, as it is completely line-oriented and
-% takes no notice of what kind of property list it is reading. This
-% may in some cases cause it to find ``matches'' between lines which
-% for syntactical reasons alone cannot match.
-%
-% |\comparePLs| is called as
-% \begin{quote}
-% |\comparePLs|\marg{first PL}\marg{second PL}\marg{encoding}
-% \end{quote}
-% where \meta{first PL} and \meta{second PL} are the complete names
-% (including extensions) of the files to compare. \meta{encoding} is
-% the name of the encoding to use when translating slots to glyph
-% names; leave it empty if you don't want to specify one. (One could
-% use the \texttt{CODINGSCHEME} property to determine the encoding in
-% that case, but this is not currently done). The slot to glyph
-% translation is only done to make it easier to locate the position of
-% some mismatch; it has not effect on the actual comparision.
-% \begin{macrocode}
-\newcount\last_character
-\def\comparePLs#1#2#3{{
- \def\encoding_name{#3}
- \last_character=\m@ne
- \openin\a_read=#1\x_relax
- \openin\b_read=#2\x_relax
- \immediate\write\sixt@@n{#1~and^^J #2}
- \pl_catcodes
- \let\do_left_paren=\do_property
- \let\do_right_paren=\empty_command
- \global\chardef\compared_status=\z@
- \clear_histograms
- \global\a_filelineno=\@ne
- \global\b_filelineno=\@ne
- \global\a_lineno=\@ne
- \global\b_lineno=\@ne
- \global\a_bufbase=\z@
- \global\b_bufbase=\z@
- \global\a_bufmid=\z@
- \global\b_bufmid=\z@
- \global\a_buftop=\m@ne
- \global\b_buftop=\m@ne
- \process_lines
- \closein\a_read
- \closein\b_read
- \ifcase \compared_status
- \immediate\write\sixt@@n{are~equal.^^J}
- \or
- \immediate\write\sixt@@n{are~almost~equal.^^J}
- \or
- \immediate\write\sixt@@n{are~essentially~equal.}
- \or
- \immediate\write\sixt@@n{have~non-tolerated~metric~differences.}
- \or
- \immediate\write\sixt@@n{do~not~completely~match.}
- \else
- \immediate\write\sixt@@n{could~not~be~matched!}
- \fi
- \ifnum 1<\compared_status
- \immediate\write\sixt@@n{See~log~file~for~specification.}
- \present_histograms
- \immediate\write\sixt@@n{}
- \fi
-}}
-% \end{macrocode}
-% \end{macro}
-
-
-\begingroup
- \catcode`\(=13 \catcode`\)=13
- \gdef\pl_catcodes{
- \catcode`\(=13 \def({\do_left_paren}
- \catcode`\)=13 \def){\do_right_paren}
- }
-\endgroup
-
-\def\do_property#1~{
- \x_cs\edef{cmd-\sign}{#1}
- \let\metric_origin=\empty_command
- \x_cs\ifx{pl-#1}\x_relax
- \expandafter\ignore_parens
- \else
- \csname pl-#1 \expandafter\endcsname
- \fi
-}
-\def\pl_def_s#1(#2){\x_cs\def{pl-#1}#2~}
-\begingroup
- \catcode`\!=13\lccode`\!=`\)
-\lowercase{\endgroup
- \def\pl_def_p#1(#2){\x_cs\def{pl-#1}#2!}
-}
-\def\pl_let#1#2{
- \expandafter\let
- \csname pl-#1 \expandafter\endcsname \csname pl-#2 \endcsname
-}
-
-
-
-\newdimen\tolerance \tolerance=110sp
-
-% The following is for gobbling to the next unmatched right parenthesis.
-% The |\catcode| trick used by the PL-to-MTX converter's
-% |\ignore_parens| cannot be used since the characters are already
-% tokenized, but one can do something similar with an |\edef| since one
-% does not have to worry about the PL files containing material which
-% expands in an undesirable way.
-%
-% The |\line_stop| is so that linebreaks in the parenthesis being
-% gobbled will not cause total havok (although the parenthesis won't be
-% gobbled completely). It inserts end-of-group tokens until the |\edef|
-% is terminated, and then the |\afterassignment| token will close the
-% group and restore the normal definition.
-
-\def\ignore_parens{
- \begingroup
- \def\do_left_paren{{\iffalse}\fi}
- \def\do_right_paren{\iffalse{\fi}}
- \def\line_stop{\do_right_paren\line_stop}
- \afterassignment\endgroup
- \edef\a_macro{\iffalse}\fi
-}
-\def\line_stop{\x_relax}
-% \end{macrocode}
-%
-\begingroup
- \catcode`\(=1
- \catcode`\)=2
- \gdef\pl_string{
- \begingroup
- \def\do_left_paren{(\iffalse)\fi}
- \def\do_right_paren{\iffalse(\fi)}
- \def\line_stop{\iffalse{\fi}\line_stop}
- \afterassignment\pl_string_i
- \edef\a_macro{\iffalse}\fi
- }
-\endgroup
-\def\pl_string_i{
- \expandafter\endgroup \expandafter\def
- \csname string-\sign \expandafter\endcsname
- \expandafter{\a_macro}
-}
-
-\def\pl_real#1{\sign#1\hundred_pt}
-\newdimen\hundred_pt \hundred_pt=100pt
-
-% Convert a PL int to a \TeX{} int, assuming it's prefixed
-% by |C|, |D|, |O|, or |H|.
-%
-% \begin{macrocode}
-\def\pl_int#1#2{
- \sign \ifx#1C `#2
- \else\ifx#1D #2
- \else\ifx#1O '#2
- \else\ifx#1H "#2
- \else -1\errmessage{Unknown~PL~number~prefix~`#1'}
- \fi\fi\fi\fi
-}
-% \end{macrocode}
-
-
-% \begin{macrocode}
-\pl_def_p{NEXTLARGER}(#1~#2){\advance \first_integer \pl_int{#1}{#2}}
-\pl_let{BOUNDARYCHAR}{NEXTLARGER}
-% \end{macrocode}
-%
-%
-% \begin{macrocode}
-\x_cs\let{pl-VTITLE}=\pl_string
-\pl_let{FONTNAME}{VTITLE}
-\pl_let{FONTAREA}{VTITLE}
-% \pl_let{CHECKSUM}{VTITLE}
-% % Not really a string, but unsigned numbers can become too large for TeX.
-% \pl_let{FONTCHECKSUM}{CHECKSUM}
-% Commented out since checksums vary too much.
-\pl_def_p{FONTAT}(R~#1){\advance \first_dimen \pl_real{#1}}
-\pl_let{FONTDSIZE}{FONTAT}
-\pl_let{SELECTFONT}{NEXTLARGER}
-\pl_let{SETCHAR}{NEXTLARGER}
-\pl_def_p{SETRULE}(R~#1~R~#2){
- \advance \first_dimen \pl_real{#1}
- \advance \second_dimen \pl_real{#2}
-}
-\x_cs\let{pl-POP}\empty_command
-\pl_let{PUSH}{POP}
-\pl_let{MOVERIGHT}{FONTAT}
-\pl_let{MOVELEFT}{FONTAT}
-\pl_let{MOVEUP}{FONTAT}
-\pl_let{MOVEDOWN}{FONTAT}
-\pl_let{SPECIAL}{VTITLE}
-\pl_let{SPECIALHEX}{VTITLE}
-% \end{macrocode}
-%
-%
-
-\pl_let{CODINGSCHEME}{VTITLE}
-\pl_let{DESIGNSIZE}{FONTAT}
-
-\def\pl_parameter#1#2#3{
- \advance \first_integer \pl_int{#1}{#2}
- \advance \first_dimen \pl_real{#3}
-}
-
-\pl_def_p{PARAMETER}(#1~#2~R~#3){\pl_parameter{#1}{#2}{#3}}
-
-\pl_def_p{SLANT}(R~#1){\pl_parameter{D}{1}{#1}}
-\pl_def_p{SPACE}(R~#1){\pl_parameter{D}{2}{#1}}
-\pl_def_p{STRETCH}(R~#1){\pl_parameter{D}{3}{#1}}
-\pl_def_p{SHRINK}(R~#1){\pl_parameter{D}{4}{#1}}
-\pl_def_p{XHEIGHT}(R~#1){\pl_parameter{D}{5}{#1}}
-\pl_def_p{QUAD}(R~#1){\pl_parameter{D}{6}{#1}}
-\pl_def_p{EXTRASPACE}(R~#1){\pl_parameter{D}{7}{#1}}
-
-\pl_def_p{NUM1}(R~#1){\pl_parameter{D}{8}{#1}}
-\pl_def_p{NUM2}(R~#1){\pl_parameter{D}{9}{#1}}
-\pl_def_p{NUM3}(R~#1){\pl_parameter{D}{10}{#1}}
-\pl_def_p{DENOM1}(R~#1){\pl_parameter{D}{11}{#1}}
-\pl_def_p{DENOM2}(R~#1){\pl_parameter{D}{12}{#1}}
-\pl_def_p{SUP1}(R~#1){\pl_parameter{D}{13}{#1}}
-\pl_def_p{SUP2}(R~#1){\pl_parameter{D}{14}{#1}}
-\pl_def_p{SUP3}(R~#1){\pl_parameter{D}{15}{#1}}
-\pl_def_p{SUB1}(R~#1){\pl_parameter{D}{16}{#1}}
-\pl_def_p{SUB2}(R~#1){\pl_parameter{D}{17}{#1}}
-\pl_def_p{SUPDROP}(R~#1){\pl_parameter{D}{18}{#1}}
-\pl_def_p{SUBDROP}(R~#1){\pl_parameter{D}{19}{#1}}
-\pl_def_p{DELIM1}(R~#1){\pl_parameter{D}{20}{#1}}
-\pl_def_p{DELIM2}(R~#1){\pl_parameter{D}{21}{#1}}
-\pl_def_p{AXISHEIGHT}(R~#1){\pl_parameter{D}{22}{#1}}
-
-\pl_let{DEFAULTRULETHICKNESS}{NUM1}
-\pl_let{BIGOPSPACING1}{NUM2}
-\pl_let{BIGOPSPACING2}{NUM3}
-\pl_let{BIGOPSPACING3}{DENOM1}
-\pl_let{BIGOPSPACING4}{DENOM2}
-\pl_let{BIGOPSPACING5}{SUP1}
-
-\def\boundarychar_name{BOUNDARYCHAR}
-\pl_def_s{LABEL}(#1){
- \def\a_macro{#1}
- \ifx \a_macro\boundarychar_name
- \x_cs\let{string-\sign}\a_macro
- \else
- \def\a_macro{\csname pl-LABEL(i\endcsname #1~}
- \expandafter\a_macro
- \fi
-}
-\pl_def_p{LABEL(i}(#1~#2){
- \last_character=\first_integer
- \advance \first_integer \pl_int{#1}{#2}
-}
-\pl_def_p{LIG}(#1~#2~#3~#4){
- \advance \first_integer \pl_int{#1}{#2}
- \advance \second_integer \pl_int{#3}{#4}
-}
-\pl_let{/LIG}{LIG}
-\pl_let{/LIG>}{LIG}
-\pl_let{LIG/}{LIG}
-\pl_let{LIG/>}{LIG}
-\pl_let{/LIG/}{LIG}
-\pl_let{/LIG/>}{LIG}
-\pl_let{/LIG/>>}{LIG}
-
-\pl_let{HEADER}{LIG}
-
-% \def\pl_lig#1~#2~#3~#4~#5~{
-% \x_cs\def{string-\sign}{#1}
-% \def\LIG#1~{
-% \if\ifx #1C 0
-% \else\ifx #1D 0
-% \else\ifx #1H 0
-% \else\ifx #1O 0 \else 1\fi\fi\fi\fi 0
-% % then
-% \expandafter\both_of_two
-% \else
-% \expandafter\first_of_two
-% \fi{\pl_lig LIG}{~}#1~
-% }
-% \def\/{\pl_lig/}
-
-\pl_let{KRN}{PARAMETER}
-\pl_let{SKIP}{NEXTLARGER}
-
-\pl_def_s{CHARACTER}(#1~#2){
- \last_character=\first_integer
- \advance \first_integer \pl_int{#1}{#2}
-}
-\pl_let{CHARWD}{FONTAT}
-\pl_def_p{CHARHT}(R~#1){
- \def\metric_origin{ht}
- \advance \first_dimen \pl_real{#1}
-}
-\pl_def_p{CHARDP}(R~#1){
- \def\metric_origin{dp}
- \advance \first_dimen \pl_real{#1}
-}
-\pl_def_p{CHARIC}(R~#1){
- \def\metric_origin{ic}
- \advance \first_dimen \pl_real{#1}
-}
-
-\pl_let{TOP}{NEXTLARGER}
-\pl_let{MID}{NEXTLARGER}
-\pl_let{BOT}{NEXTLARGER}
-\pl_let{REP}{NEXTLARGER}
-
-\pl_let{FONTDIMEN}{POP}
-\pl_let{LIGTABLE}{POP}
-\pl_let{VARCHAR}{POP}
-\pl_def_s{MAPFONT}(#1~#2){\advance \first_integer \pl_int{#1}{#2}}
-\pl_let{MAP}{POP}
-
-
-% \begin{macrocode}
-\catcode`\@=\atcatcode
-\catcode`\^^M=\nlcatcode
-\catcode`\ =\spacecatcode
-\catcode`\~=\tildecatcode
-\catcode`\_=\underscorecatcode
-% \end{macrocode}
diff --git a/Master/texmf-dist/doc/fontinst/base/test/comparepls.tex b/Master/texmf-dist/doc/fontinst/base/test/comparepls.tex
deleted file mode 100644
index a735a34ed79..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/comparepls.tex
+++ /dev/null
@@ -1,73 +0,0 @@
-\input fontinst.sty
-\input comparemetrics.sty
-
-% % \tracingmacros=1\tracingcommands=2
-% \comparePLs{cmr5.pl}{cmr5.pl}
-%
-% \bye
-
-\tracingstats=1
-
-\def\oldf{::efficiency:saved:v1.912:}
-\def\newf{::efficiency:saved:v1.913:}
-
-\loadencoding{t1}
-\loadencoding{ot1}
-\loadencoding{ts1}
-\loadencoding{8r}
-
-\comparePLs{\oldf padb7t.vpl}{\newf padb7t.vpl}{ot1} %OK 11sp
-\comparePLs{\oldf padb8c.vpl}{\newf padb8c.vpl}{ts1} %OK 11sp
-\comparePLs{\oldf padb8t.vpl}{\newf padb8t.vpl}{t1} %OK 11sp
-\comparePLs{\oldf padbc7t.vpl}{\newf padbc7t.vpl}{ot1} %OK 11sp
-\comparePLs{\oldf padbc8t.vpl}{\newf padbc8t.vpl}{t1}
-\comparePLs{\oldf padbi7t.vpl}{\newf padbi7t.vpl}{ot1}
-\comparePLs{\oldf padbi8c.vpl}{\newf padbi8c.vpl}{ts1}
-\comparePLs{\oldf padbi8t.vpl}{\newf padbi8t.vpl}{t1}
-\comparePLs{\oldf padbo7t.vpl}{\newf padbo7t.vpl}{ot1} %OK 11sp
-\comparePLs{\oldf padbo8c.vpl}{\newf padbo8c.vpl}{ts1} %OK 11sp
-\comparePLs{\oldf padbo8t.vpl}{\newf padbo8t.vpl}{t1}
-\comparePLs{\oldf padr7t.vpl}{\newf padr7t.vpl}{ot1} %OK 11sp
-\comparePLs{\oldf padr8c.vpl}{\newf padr8c.vpl}{ts1} %OK 11sp
-\comparePLs{\oldf padr8t.vpl}{\newf padr8t.vpl}{t1} %OK 11sp
-\comparePLs{\oldf padrc7t.vpl}{\newf padrc7t.vpl}{ot1} %OK 11sp
-\comparePLs{\oldf padrc8t.vpl}{\newf padrc8t.vpl}{t1} %OK 11sp
-\comparePLs{\oldf padri7t.vpl}{\newf padri7t.vpl}{ot1}
-\comparePLs{\oldf padri8c.vpl}{\newf padri8c.vpl}{ts1} %OK 11sp
-\comparePLs{\oldf padri8t.vpl}{\newf padri8t.vpl}{t1}
-\comparePLs{\oldf padro7t.vpl}{\newf padro7t.vpl}{ot1} %OK 11sp
-\comparePLs{\oldf padro8c.vpl}{\newf padro8c.vpl}{ts1} %OK 11sp
-\comparePLs{\oldf padro8t.vpl}{\newf padro8t.vpl}{t1}
-\comparePLs{\oldf pads7t.vpl}{\newf pads7t.vpl}{ot1}
-\comparePLs{\oldf pads8c.vpl}{\newf pads8c.vpl}{ts1}
-\comparePLs{\oldf pads8t.vpl}{\newf pads8t.vpl}{t1}
-\comparePLs{\oldf padsc7t.vpl}{\newf padsc7t.vpl}{ot1}
-\comparePLs{\oldf padsc8t.vpl}{\newf padsc8t.vpl}{t1} %OK 11sp
-\comparePLs{\oldf padsi7t.vpl}{\newf padsi7t.vpl}{ot1}
-\comparePLs{\oldf padsi8c.vpl}{\newf padsi8c.vpl}{ts1} %OK 11sp
-\comparePLs{\oldf padsi8t.vpl}{\newf padsi8t.vpl}{t1}
-\comparePLs{\oldf padso7t.vpl}{\newf padso7t.vpl}{ot1}
-\comparePLs{\oldf padso8c.vpl}{\newf padso8c.vpl}{ts1}
-\comparePLs{\oldf padso8t.vpl}{\newf padso8t.vpl}{t1}
-
-\comparePLs{\oldf padb8a.pl}{\newf padb8a.pl}{}
-\comparePLs{\oldf padb8r.pl}{\newf padb8r.pl}{8r}
-\comparePLs{\oldf padbi8a.pl}{\newf padbi8a.pl}{}
-\comparePLs{\oldf padbi8r.pl}{\newf padbi8r.pl}{8r}
-\comparePLs{\oldf padbo8r.pl}{\newf padbo8r.pl}{8r}
-\comparePLs{\oldf padr8a.pl}{\newf padr8a.pl}{}
-\comparePLs{\oldf padr8r.pl}{\newf padr8r.pl}{8r}
-\comparePLs{\oldf padrc8a.pl}{\newf padrc8a.pl}{}
-\comparePLs{\oldf padrc8r.pl}{\newf padrc8r.pl}{8r}
-\comparePLs{\oldf padri8a.pl}{\newf padri8a.pl}{}
-\comparePLs{\oldf padri8r.pl}{\newf padri8r.pl}{8r}
-\comparePLs{\oldf padro8r.pl}{\newf padro8r.pl}{8r}
-\comparePLs{\oldf pads8a.pl}{\newf pads8a.pl}{}
-\comparePLs{\oldf pads8r.pl}{\newf pads8r.pl}{8r}
-\comparePLs{\oldf padsc8a.pl}{\newf padsc8a.pl}{}
-\comparePLs{\oldf padsc8r.pl}{\newf padsc8r.pl}{8r}
-\comparePLs{\oldf padsi8a.pl}{\newf padsi8a.pl}{}
-\comparePLs{\oldf padsi8r.pl}{\newf padsi8r.pl}{8r}
-\comparePLs{\oldf padso8r.pl}{\newf padso8r.pl}{8r}
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/scaledtest.tex b/Master/texmf-dist/doc/fontinst/base/test/scaledtest.tex
deleted file mode 100644
index f5e9dd03a2d..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/scaledtest.tex
+++ /dev/null
@@ -1,8 +0,0 @@
-%&Plain
-\input fontinst.sty
-
-\installfonts
- \installfont{foo}{scaledtest scaled 300}{ot1}{OT1}{zzz}{m}{n}{}
-\endinstallfonts
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/speedtest1.tex b/Master/texmf-dist/doc/fontinst/base/test/speedtest1.tex
deleted file mode 100644
index a92823e7210..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/speedtest1.tex
+++ /dev/null
@@ -1,62 +0,0 @@
-\input fontinst.sty
-
-\edef\spacecatcode{\the\catcode`\ }
-\edef\nlcatcode{\the\catcode`\^^M}
-\edef\atcatcode{\the\catcode`\@}
-\edef\underscorecatcode{\the\catcode`\_}
-\edef\tildecatcode{\the\catcode`\~}
-\catcode`\ =9
-\catcode`\^^M=9
-\catcode`\@=11
-\catcode`\_=11
-\catcode`\~=10
-
-\def\Mtxtopl#1#2{{
- \open_out{#2.pl}
- \top_of_pl_hook
- \out_line{(COMMENT~raw~font~#2~created~by~fontinst~
- v\fontinstversion)}
- \out_line{}
- \out_line{(COMMENT~Filename:~#2.pl)}
- \out_line{(COMMENT~Created~by:~tex~\jobname)}
- \out_line{(COMMENT~Created~using:~\string\mtxtopl{#1}{#2})}
- \out_line{}
- \out_line{(COMMENT~This~file~can~be~turned~into~a~ligless~TeX~font~
- with)}
- \out_line{(COMMENT~pltotfm~#2.pl~#2.tfm)}
- \out_line{}
- \out_line{(COMMENT~THIS~FILE~CAN~THEN~BE~DELETED.)}
- \out_line{}
- \out_line{(DESIGNSIZE~R~10.0)}
- \out_line{}
- \let\setglyph=\iffalse
- \let\endsetglyph=\fi
- \let\setkern=\gobble_three
- \let\setrawglyph=\Pl_raw_glyph
- \inputmtx{#1}
- \out_line{}
- \out_line{(COMMENT~END~OF~FILE~#2.pl)}
- \close_out{Raw~font}
-}}
-\def\Pl_raw_glyph#1#2#3#4#5#6#7#8{
- \a_count=#4
- \out_line{(CHARACTER~\vpl_int\a_count\space(COMMENT~#1)}
- \out_lline{(CHARWD~R~\make_factor{#5})}
- \out_lline{(CHARHT~R~\make_factor{#6})}
- \out_lline{(CHARDP~R~\make_factor{#7})}
- \out_lline{(CHARIC~R~\make_factor{#8})}
- \out_lline{)}
-}
-
-
-\catcode`\@=\atcatcode
-\catcode`\^^M=\nlcatcode
-\catcode`\ =\spacecatcode
-\catcode`\~=\tildecatcode
-\catcode`\_=\underscorecatcode
-
-\batchmode
-\for(n){1}{500}{1}\Mtxtopl{cmr5}{cmr5.new}\endfor(n)
-
-\bye
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/testfont.tex b/Master/texmf-dist/doc/fontinst/base/test/testfont.tex
deleted file mode 100644
index 544642aae45..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/testfont.tex
+++ /dev/null
@@ -1,208 +0,0 @@
-% A testbed for font evaluation (see The METAFONTbook, Appendix H)
-
-\tracinglostchars=0
-\tolerance=1000
-\raggedbottom
-\nopagenumbers
-\parindent=0pt
-\newlinechar=`@
-\hyphenpenalty=200
-\doublehyphendemerits=30000
-\hyphenation{prom-i-nent}
-
-\newcount\m \newcount\n \newcount\p \newdimen\dim
-\chardef\other=12
-
-\def\today{\ifcase\month\or
- January\or February\or March\or April\or May\or June\or
- July\or August\or September\or October\or November\or December\fi
- \space\number\day, \number\year}
-\def\hours{\n=\time \divide\n 60
- \m=-\n \multiply\m 60 \advance\m \time
- \twodigits\n\twodigits\m}
-\def\twodigits#1{\ifnum #1<10 0\fi \number#1}
-
-\def\init{\message{@Name of the font to test = }
- \read-1 to\fontname \startfont
- \message{Now type a test command (\string\help\space for help):}}
-\def\startfont{\font\testfont=\fontname \spaceskip=0pt
- \leftline{\sevenrm Test of \fontname\unskip\ on \today\ at \hours}
- \medskip
- \testfont \setbaselineskip
- \ifdim\fontdimen6\testfont<10pt \rightskip=0pt plus 20pt
- \else\rightskip=0pt plus 2em \fi
- \spaceskip=\fontdimen2\testfont % space between words (\raggedright)
- \xspaceskip=\fontdimen2\testfont \advance\xspaceskip by\fontdimen7\testfont}
-
-{\catcode`\|=0 \catcode`\\=\other
-|gdef|help{|message{%
-\init switches to another font;@%
-\end or \bye finishes the run;@%
-\table prints the font layout in tabular format;@%
-\text prints a sample text, assuming TeX text font conventions;@%
-\sample combines \table and \text;@%
-\mixture mixes a background character with a series of others;@%
-\alternation interleaves a background character with a series;@%
-\alphabet prints all lowercase letters within a given background;@%
-\ALPHABET prints all uppercase letters within a given background;@%
-\series prints a series of letters within a given background;@%
-\lowers prints a comprehensive test of lowercase;@%
-\uppers prints a comprehensive test of uppercase;@%
-\digits prints a comprehensive test of numerals;@%
-\math prints a comprehensive test of TeX math italic;@%
-\names prints a text that mixes upper and lower case;@%
-\punct prints a punctuation test;@%
-\bigtest combines many of the above routines;@%
-\help repeats this message;@%
-and you can use ordinary TeX commands (e.g., to \input a file).}}}
-
-\def\setbaselineskip{\setbox0=\hbox{\n=0
-\loop\char\n \ifnum \n<255 \advance\n 1 \repeat}
-\baselineskip=6pt \advance\baselineskip\ht0 \advance\baselineskip\dp0 }
-
-\def\setchar#1{{\escapechar-1\message{\string#1 character = }%
- \def\do##1{\catcode`##1=\other}\dospecials
- \read-1 to\next
- \expandafter\finsetchar\next\next#1}}
-\def\finsetchar#1#2\next#3{\global\chardef#3=`#1
- \ifnum #3=`\# \global\chardef#3=#2 \fi}
-\def\promptthree{\setchar\background
- \setchar\starting \setchar\ending}
-
-\def\mixture{\promptthree \domix\mixpattern}
-\def\alternation{\promptthree \domix\altpattern}
-\def\mixpattern{\0\1\0\0\1\1\0\0\0\1\1\1\0\1}
-\def\altpattern{\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0\1\0}
-\def\domix#1{\par\chardef\0=\background \n=\starting
- \loop \chardef\1=\n #1\endgraf
- \ifnum \n<\ending \advance\n 1 \repeat}
-
-\def\!{\discretionary{\background}{\background}{\background}}
-\def\series{\promptthree \!\doseries\starting\ending\par}
-\def\doseries#1#2{\n=#1\loop\char\n\!\ifnum\n<#2\advance\n 1 \repeat}
-\def\complower{\!\doseries{`a}{`z}\doseries{'31}{'34}\par}
-\def\compupper{\!\doseries{`A}{`Z}\doseries{'35}{'37}\par}
-\def\compdigs{\!\doseries{`0}{`9}\par}
-\def\alphabet{\setchar\background\complower}
-\def\ALPHABET{\setchar\background\compupper}
-
-\def\lowers{\docomprehensive\complower{`a}{`z}{'31}{'34}}
-\def\uppers{\docomprehensive\compupper{`A}{`Z}{'35}{'37}}
-\def\digits{\docomprehensive\compdigs{`0}{`4}{`5}{`9}}
-\def\docomprehensive#1#2#3#4#5{\par\chardef\background=#2
- \loop{#1} \ifnum\background<#3\m=\background\advance\m 1
- \chardef\background=\m \repeat \chardef\background=#4
- \loop{#1} \ifnum\background<#5\m=\background\advance\m 1
- \chardef\background=\m \repeat}
-
-\def\names{ {\AA}ngel\aa\ Beatrice Claire
- Diana \'Erica Fran\c{c}oise Ginette H\'el\`ene Iris
- Jackie K\=aren {\L}au\.ra Mar{\'\i}a N\H{a}ta{\l}{\u\i}e {\O}ctave
- Pauline Qu\^eneau Roxanne Sabine T\~a{\'\j}a Ur\v{s}ula
- Vivian Wendy Xanthippe Yv{\o}nne Z\"azilie\par}
-\def\punct{\par\dopunct{min}\dopunct{pig}\dopunct{hid}
- \dopunct{HIE}\dopunct{TIP}\dopunct{fluff}
- \$1,234.56 + 7/8 = 9\% @ \#0\par}
-\def\dopunct#1{#1,\ #1:\ #1;\ `#1'\ ?`#1?\ !`#1!\ (#1)\ [#1]\ #1*\ #1.\par}
-
-\def\bigtest{\sample
- hamburgefonstiv HAMBURGEFONSTIV\par
- \names \punct \lowers \uppers \digits}
-
-\def\math{\textfont1=\testfont \skewchar\testfont=\skewtrial
- \mathchardef\Gamma="100 \mathchardef\Delta="101
- \mathchardef\Theta="102 \mathchardef\Lambda="103 \mathchardef\Xi="104
- \mathchardef\Pi="105 \mathchardef\Sigma="106 \mathchardef\Upsilon="107
- \mathchardef\Phi="108 \mathchardef\Psi="109 \mathchardef\Omega="10A
- \def\ii{i} \def\jj{j}
- \def\\##1{|##1|+}\mathtrial
- \def\\##1{##1_2+}\mathtrial
- \def\\##1{##1^2+}\mathtrial
- \def\\##1{##1/2+}\mathtrial
- \def\\##1{2/##1+}\mathtrial
- \def\\##1{##1,{}+}\mathtrial
- \def\\##1{d##1+}\mathtrial
- \let\ii=\imath \let\jj=\jmath \def\\##1{\hat##1+}\mathtrial}
-\newcount\skewtrial \skewtrial='177
-\def\mathtrial{$\\A \\B \\C \\D \\E \\F \\G \\H \\I \\J \\K \\L \\M \\N \\O
- \\P \\Q \\R \\S \\T \\U \\V \\W \\X \\Y \\Z \\a \\b \\c \\d \\e \\f \\g
- \\h \\\ii \\\jj \\k \\l \\m \\n \\o \\p \\q \\r \\s \\t \\u \\v \\w \\x \\y
- \\z \\\alpha \\\beta \\\gamma \\\delta \\\epsilon \\\zeta \\\eta \\\theta
- \\\iota \\\kappa \\\lambda \\\mu \\\nu \\\xi \\\pi \\\rho \\\sigma \\\tau
- \\\upsilon \\\phi \\\chi \\\psi \\\omega \\\vartheta \\\varpi \\\varphi
- \\\Gamma \\\Delta \\\Theta \\\Lambda \\\Xi \\\Pi \\\Sigma \\\Upsilon
- \\\Phi \\\Psi \\\Omega \\\partial \\\ell \\\wp$\par}
-\def\mathsy{\begingroup\skewtrial='060 % for math symbol font tests
- \def\mathtrial{$\\A \\B \\C \\D \\E \\F \\G \\H \\I \\J \\K \\L
- \\M \\N \\O \\P \\Q \\R \\S \\T \\U \\V \\W \\X \\Y \\Z$\par}
- \math\endgroup}
-
-\def\oct#1{\hbox{\rm\'{}\kern-.2em\it#1\/\kern.05em}} % octal constant
-\def\hex#1{\hbox{\rm\H{}\tt#1}} % hexadecimal constant
-\def\setdigs#1"#2{\gdef\h{#2}% \h=hex prefix; \0\1=corresponding octal
- \m=\n \divide\m by 64 \xdef\0{\the\m}%
- \multiply\m by-64 \advance\m by\n \divide\m by 8 \xdef\1{\the\m}}
-\def\testrow{\setbox0=\hbox{\penalty 1\def\\{\char"\h}%
- \\0\\1\\2\\3\\4\\5\\6\\7\\8\\9\\A\\B\\C\\D\\E\\F%
- \global\p=\lastpenalty}} % \p=1 if none of the characters exist
-\def\oddline{\cr
- \noalign{\nointerlineskip}
- \multispan{19}\hrulefill&
- \setbox0=\hbox{\lower 2.3pt\hbox{\hex{\h x}}}\smash{\box0}\cr
- \noalign{\nointerlineskip}}
-\newif\ifskipping
-\def\evenline{\loop\skippingfalse
- \ifnum\n<256 \m=\n \divide\m 16 \chardef\next=\m
- \expandafter\setdigs\meaning\next \testrow
- \ifnum\p=1 \skippingtrue \fi\fi
- \ifskipping \global\advance\n 16 \repeat
- \ifnum\n=256 \let\next=\endchart\else\let\next=\morechart\fi
- \next}
-\def\morechart{\cr\noalign{\hrule\penalty5000}
- \chartline \oddline \m=\1 \advance\m 1 \xdef\1{\the\m}
- \chartline \evenline}
-\def\chartline{&\oct{\0\1x}&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&\:&&}
-\def\chartstrut{\lower4.5pt\vbox to14pt{}}
-\def\table{$$\global\n=0
- \halign to\hsize\bgroup
- \chartstrut##\tabskip0pt plus10pt&
- &\hfil##\hfil&\vrule##\cr
- \lower6.5pt\null
- &&&\oct0&&\oct1&&\oct2&&\oct3&&\oct4&&\oct5&&\oct6&&\oct7&\evenline}
-\def\endchart{\cr\noalign{\hrule}
- \raise11.5pt\null&&&\hex 8&&\hex 9&&\hex A&&\hex B&
- &\hex C&&\hex D&&\hex E&&\hex F&\cr\egroup$$\par}
-\def\:{\setbox0=\hbox{\char\n}%
- \ifdim\ht0>7.5pt\reposition
- \else\ifdim\dp0>2.5pt\reposition\fi\fi
- \box0\global\advance\n 1 }
-\def\reposition{\setbox0=\vbox{\kern2pt\box0}\dim=\dp0
- \advance\dim 2pt \dp0=\dim}
-\def\centerlargechars{
- \def\reposition{\setbox0=\hbox{$\vcenter{\kern2pt\box0\kern2pt}$}}}
-
-\def\text{{\advance\baselineskip-4pt
-\setbox0=\hbox{abcdefghijklmnopqrstuvwxyz}
-\ifdim\hsize>2\wd0 \ifdim 15pc>2\wd0 \hsize=15pc \else \hsize=2\wd0 \fi\fi
-On November 14, 1885, Senator \& Mrs.~Leland Stanford called
-together at their San Francisco mansion the 24~prominent men who had
-been chosen as the first trustees of The Leland Stanford Junior University.
-They handed to the board the Founding Grant of the University, which they
-had executed three days before. This document---with various amendments,
-legislative acts, and court decrees---remains as the University's charter.
-In bold, sweeping language it stipulates that the objectives of the University
-are ``to qualify students for personal success and direct usefulness in life;
-and to promote the publick welfare by exercising an influence in behalf of
-humanity and civilization, teaching the blessings of liberty regulated by
-law, and inculcating love and reverence for the great principles of
-government as derived from the inalienable rights of man to life, liberty,
-and the pursuit of happiness.'' \moretext
-(!`THE DAZED BROWN FOX QUICKLY GAVE 12345--67890 JUMPS!)\par}}
-\def\moretext{?`But aren't Kafka's Schlo{\ss} and {\AE}sop's {\OE}uvres
-often na{\"\i}ve vis-\`a-vis the d{\ae}monic ph{\oe}nix's official r\^ole
-in fluffy souffl\'es? }
-\def\omitaccents{\let\moretext=\relax}
-
-\def\sample{\table\text}
-
-\ifx\noinit!\else\init\fi
diff --git a/Master/texmf-dist/doc/fontinst/base/test/testsc.tex b/Master/texmf-dist/doc/fontinst/base/test/testsc.tex
deleted file mode 100644
index c54452d45e1..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/testsc.tex
+++ /dev/null
@@ -1,41 +0,0 @@
-\input fontinst.sty
-
-\transformfont{padr8r} {\reencodefont{8r}{\fromafm{padr8a}}}
-\transformfont{padrc8r}{\reencodefont{8r}{\fromafm{padrc8a}}}
-\transformfont{pads8r} {\reencodefont{8r}{\fromafm{pads8a}}}
-\transformfont{padsc8r}{\reencodefont{8r}{\fromafm{padsc8a}}}
-\fromafm{padr8x}
-\fromafm{pads8x}
-
-\installfonts
-
-\installfamily{T1}{pad} {}
-\installfamily{T1}{padx}{}
-\installfamily{T1}{padj}{}
-
-\installfont{padrc8t}{padrc8r,latin}
- {T1}{T1}{pad}{m}{sc}{}
-\installfont{padrc9e}
- {kernoff,padr8r,padr8x,kernon,glyphoff,padrc8r,glyphon,
- resetsc,latinsc}
- {T1c}{T1}{padx}{m}{sc}{}
-\installfont{padrc9d}
- {kernoff,padr8r,padr8x,kernon,glyphoff,padrc8r,glyphon,
- resetosf,resetsc,latinsc}
- {T1cj}{T1}{padj}{m}{sc}{}
-
-\installfont{padsc8t}{padsc8r,latin}
- {T1}{T1}{pad}{m}{sc}{}
-\installfont{padsc9e}
- {kernoff,pads8r,pads8x,kernon,glyphoff,padsc8r,glyphon,
- resetsc,latinsc}
- {T1c}{T1}{padx}{sb}{sc}{}
-\installfont{padsc9d}
- {kernoff,pads8r,pads8x,kernon,glyphoff,padrc8r,glyphon,
- resetosf,resetsc,latinsc}
- {T1cj}{T1}{padj}{sb}{sc}{}
-
-\endinstallfonts
-\bye
-
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1901test.mtx b/Master/texmf-dist/doc/fontinst/base/test/v1901test.mtx
deleted file mode 100644
index 624a39bf81d..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1901test.mtx
+++ /dev/null
@@ -1,22 +0,0 @@
-\relax
-
-% This is a test MTX file for the new implementation of
-% the \transformfont stuff.
-
-\metrics
-
-\setint{italicslant}{0}
-\setint{italicslant}{100}
-\setint{xheight}{400}
-
-\setrawglyph{a}{v1901test}{10.95pt}{10} {500}{400}{0}{40}
-\setrawglyph{g}{v1901test}{10.95pt}{10} {500}{400}{-300}{40}
-
-\setkern{a}{g}{100}
-
-\setglyph{ag}
- \glyphpcc{a}{0}{500}
- \glyphpcc{g}{500}{0}
-\endsetglyph
-
-\endmetrics \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1901test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1901test.tex
deleted file mode 100644
index 81a6218f679..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1901test.tex
+++ /dev/null
@@ -1,214 +0,0 @@
-% Test of fontinst v1.901.
-% Started 1999/03/13.
-\input fontinst.sty
-
-% Part one---test of pooled file allocation.
-\catcode`\_=11
-\catcode`\@=11
-
-\def\show_out_filenames{%
- \immediate\write16{\string\count17=\the\count17}%
- \for(i){-1}{16}{1}%
- \immediate\write16{Stream \strint{i}:
- \x_cs\meaning{out_filename-\strint{i}}%
- }%
- \endfor(i)%
-}
-
-% %1 Standard usage
-% \show_out_filenames
-% \open_pout\tF{\jobname.out}
-% \show_out_filenames
-% \pout_line\tF{Hello world!}
-% \close_pout\tF{Test output}
-% \show_out_filenames
-% % Seems to work fine.
-
-% %2 Allocating LOTS of files.
-% \newcount\j_count
-% \newcount\k_count
-% \j_count=0
-% \k_count=1
-% \for(o){1}{48}{1}
-% \x_cs\open_pout{F-\strint{o}}{\jobname.\strint{o}}%
-% \ifodd \int{o} \else
-% \x_cs\pout_line{F-\the\k_count}{%
-% open=\strint{o} close=\the\j_count\space write=\the\k_count
-% }%
-% \multiply \k_count \thr@@
-% \advance \k_count \@ne
-% \d_count=\k_count
-% \divide \d_count \int{o}%
-% \multiply \d_count \int{o}%
-% \advance \k_count -\d_count
-% \advance \k_count \@ne
-% \advance \j_count \@ne
-% \x_cs\close_pout{F-\the\j_count}{Test data}%
-% \fi
-% \d_count=\int{o}%
-% \divide \d_count 8%
-% \multiply \d_count 8%
-% \advance \d_count -\int{o}%
-% \ifnum 0=\d_count \show_out_filenames \fi
-% \endfor(o)
-% % Seems to work fine as well.
-
-
-%% Part two---test of reimplemented \transformfont stuff
-%% Part two B---test of \recordtransforms stuff
-
-\recordtransforms{mapfrags.tex}
-\transformfont{v1901test1}{
- \xscalefont{2000}{\reencodefont{t1c}{\frommtx{v1901test}}}
-}
-\transformfont{v1901test2}{
- \yscalefont{500}{\xscalefont{2000}{\frommtx{v1901test}}}
-}
-\transformfont{v1901test3}{
- \reencodefont{t1}{\slantfont{100}{\frommtx{v1901test}}}
-}
-\endrecordtransforms
-
-
-\bye
-
-%% Part three---test of reglyphing
-
-\reglyphfonts
- \resetcommand\iftokeep#1\then{\ifnum 0<#1}
- % This means that an AFM command will survive the conversion only if
- % it refers to at least one renamed glyph and not refer to any killed
- % glyph.
-
-% \offmtxcommand\setrawglyph
-% \offmtxcommand\setglyph
-% % This reglyphing file is inteded for extracting information from the
-% % AFM file of a Caps, Small caps, and Oldstyle figures fonts--with the
-% % intention to build a corresponding virtual font with glyphs that are
-% % present in the Regular and Expert Regular variants instead. Hence
-% % there is no need for \setrawglyph or \setglyph commands (the
-% % dimensions of the characters are known from the Reg. and Exp.Reg.
-% % AFM's), but the \setkern commands are most interesting (since 8x
-% % fonts don't contain any upper case letters, and hence has no kerning
-% % pairs between these and the small caps either).
-
-
- \renameglyph{dollaroldstyle}{dollar}
- \renameglyph{ampersandsmall}{ampersand}
-
- \renameglyph{zerooldstyle}{zero}
- \renameglyph{oneoldstyle}{one}
- \renameglyph{twooldstyle}{two}
- \renameglyph{threeoldstyle}{three}
- \renameglyph{fouroldstyle}{four}
- \renameglyph{fiveoldstyle}{five}
- \renameglyph{sixoldstyle}{six}
- \renameglyph{sevenoldstyle}{seven}
- \renameglyph{eigtholdstyle}{eight}
- \renameglyph{nineoldstyle}{nine}
-
- \renameglyph{Asmall}{a}
- \renameglyph{Bsmall}{b}
- \renameglyph{Csmall}{c}
- \renameglyph{Dsmall}{d}
- \renameglyph{Esmall}{e}
- \renameglyph{Fsmall}{f}
- \renameglyph{Gsmall}{g}
- \renameglyph{Hsmall}{h}
- \renameglyph{Ismall}{i}
- \renameglyph{Jsmall}{j}
- \renameglyph{Ksmall}{k}
- \renameglyph{Lsmall}{l}
- \renameglyph{Msmall}{m}
- \renameglyph{Nsmall}{n}
- \renameglyph{Osmall}{o}
- \renameglyph{Psmall}{p}
- \renameglyph{Qsmall}{q}
- \renameglyph{Rsmall}{r}
- \renameglyph{Ssmall}{s}
- \renameglyph{Tsmall}{t}
- \renameglyph{Usmall}{u}
- \renameglyph{Vsmall}{v}
- \renameglyph{Wsmall}{w}
- \renameglyph{Xsmall}{x}
- \renameglyph{Ysmall}{y}
- \renameglyph{Zsmall}{z}
-
- \renameglyph{centoldstyle}{cent}
-
- % \renameglyph{FIsmall}{fi}
- % \renameglyph{FLsmall}{fl}
- % These two aren't really necessary, since the ligature `fi' looks
- % exactly as the letters `f'`i' next to each others.
- \killglyph{fi}
- \killglyph{fl}
-
- \renameglyph{Gravesmall}{grave}
- \renameglyph{Acutesmall}{acute}
- \renameglyph{Circumflexsmall}{circumflex}
- \renameglyph{Tildesmall}{tilde}
- \renameglyph{Macronsmall}{macron}
- \renameglyph{Brevesmall}{breve}
- \renameglyph{Dotaccentsmall}{dotaccent}
- \renameglyph{Dieresissmall}{dieresis}
- \renameglyph{Ringsmall}{ring}
- \renameglyph{Cedillasmall}{cedilla}
- \renameglyph{Ogoneksmall}{ogonek}
- \renameglyph{Caronsmall}{caron}
-
- \renameglyph{AEsmall}{ae}
- \renameglyph{dotlessIsmall}{dotlessi}
- \renameglyph{Lslashsmall}{lslash}
- \renameglyph{Oslashsmall}{oslash}
- \renameglyph{OEsmall}{oe}
- % \renameglyph{SSsmall}{germandbls}
- % This isn't really needed in the AGaramond font family, since `SSsmall'
- % looks exactly like `Ssmall'`Ssmall'
- \killglyph{germandbls}
-
- \renameglyph{Oacutesmall}{oacute}
- \renameglyph{Odieresissmall}{odieresis}
- \renameglyph{Ucircumflexsmall}{ucircumflex}
-
- \renameglyph{Uacutesmall}{uacute}
- \renameglyph{Eacutesmall}{eacute}
- \renameglyph{Iacutesmall}{iacute}
- \renameglyph{Icircumflexsmall}{icircumflex}
-
- \renameglyph{Thornsmall}{thorn}
- \renameglyph{Yacutesmall}{yacute}
-
- \renameglyph{Ocircumflexsmall}{ocircumflex}
- \renameglyph{Otildesmall}{otilde}
- \renameglyph{Ntildesmall}{ntilde}
- \renameglyph{Ydieresissmall}{ydieresis}
- \renameglyph{Ethsmall}{eth}
- \renameglyph{Acircumflexsmall}{acircumflex}
- \renameglyph{Aringsmall}{aring}
- \renameglyph{Ccedillasmall}{ccedilla}
-
- \renameglyph{Ugravesmall}{ugrave}
- \renameglyph{Zcaronsmall}{zcaron}
- \renameglyph{Idieresissmall}{idieresis}
- \renameglyph{Agravesmall}{agrave}
-
- \renameglyph{Ogravesmall}{ograve}
-
- \renameglyph{Udieresissmall}{udieresis}
- \renameglyph{Edieresissmall}{edieresis}
- \renameglyph{Aacutesmall}{aacute}
- \renameglyph{Igravesmall}{igrave}
- \renameglyph{Idieresissmall}{idieresis}
- \renameglyph{Adieresissmall}{adieresis}
-
- \renameglyph{Scaronsmall}{scaron}
- \renameglyph{Egravesmall}{egrave}
- \renameglyph{Atildesmall}{atilde}
- \renameglyph{Ecircumflexsmall}{ecircumflex}
-
- \reglyphfont{K-padrc}{gdsc}
- \reglyphfont{K-padsc}{padsc8a}
-\endreglyphfonts
-
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1902test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1902test.tex
deleted file mode 100644
index 7274fb76597..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1902test.tex
+++ /dev/null
@@ -1,11 +0,0 @@
-\input fontinst.sty
-
-\generalpltomtx{cmr5}{cmr5;1}{pl}{OT1}
-\generalpltomtx{padr9d}{padr9d;1}{vpl}{}
-\generalpltomtx{padr9d}{padr9d;2}{vpl}{OT1}
-
-\transformfont{cmr5;2}{\fromplgivenetx{cmr5}{OT1}}
-\transformfont{padr9d;3}{\fromvpl{padr9d}}
-\transformfont{padr9d;4}{\fromvplgivenetx{padr9d}{OT1}}
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1905test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1905test.tex
deleted file mode 100644
index 47117acc5fb..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1905test.tex
+++ /dev/null
@@ -1,22 +0,0 @@
-\input fontinst.sty
-\catcode`\_=11\catcode`\ =9\catcode`\^^M=9
-\catcode`\~=10\catcode`\@=11
-
-\fontinst_error{Hungarian}{
- I~will~not~buy~this~record,\message_break
- it~is~scratched
-}\error_help_a
-
-\fontinst_warning{Hungarian}{Your~hovercraft~is~full~of~eels}
-
-\fontinst_info{Hungarian}{That~will~be~six~pence,~please}
-
-\fontinst_warning_no_line{Hungarian}{
- Do~you~want~to~come~home~to~my~place\message_break
- and~pantsy~pantsy?
-}
-
-
-
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1906test.mtx b/Master/texmf-dist/doc/fontinst/base/test/v1906test.mtx
deleted file mode 100644
index 94306a07b32..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1906test.mtx
+++ /dev/null
@@ -1,64 +0,0 @@
-\relax
-% v1906test.mtx
-%
-% A test of the nokerning commands and the \glyphbboxright IE.
-
-
-\metrics
-
-\for(i){0}{20}{1}
- \setglyph{c\strint{i}}
- \glyphrule{20}{\mul{\add{\int{i}}{1}}{20}}
- \movert{\mul{20}{\int{i}}}
- \endsetglyph
-\endfor(i)
-
-
-\setglyph{d}
- \for(i){5}{10}{1}
- \glyphpcc{c\strint{i}}{\int{i}}{\int{i}}
- \endfor(i)
- \resetint{j}{\glyphbboxright}
- \immediate\write16{\string\glyphbboxright=\strint{j}}
- \glyph{c20}{1000}
- \resetint{j}{\glyphbboxright}
- \immediate\write16{\string\glyphbboxright=\strint{j}}
-\endsetglyph
-
-
-\for(i){0}{20}{1}
- \for(j){0}{20}{1}
- \setkern{c\strint{i}}{c\strint{j}}{\mul{\int{i}}{\int{j}}}
- \endfor(j)
-\endfor(i)
-
-\noleftkerning{c1,c3,c5,c7,c9,c11,c13,c15,c17,c19}
-\immediate\write16{\expandafter\meaning\csname a_macro\endcsname}
-\norightkerning{c1,c3,c5,c7,c9}
-
-% \resetint{i}{0}
-% \loop
-% \setkern{c\strint{i}}{c\strint{i}}{-50}
-% \resetint{j}{\sub{20}{\int{i}}}
-% \resetkern{c\strint{i}}{c\strint{j}}{-100}
-% \ifnum 20>\int{i}
-% \resetint{i}{\add{\int{i}}{1}}
-% \repeat
-
-
-% \resetint{i}{0}
-% \loop
-% \ifiskern{c3}{c\strint{i}}\then
-% \resetint{T}{\kerning{c3}{c\strint{i}}}
-% \message{c3:c\strint{i} has kern \strint{T} units^^J}
-% \else
-% \message{c3:c\strint{i} no kern^^J}
-% \fi
-% \ifnum 20>\int{i}
-% \resetint{i}{\add{\int{i}}{1}}
-% \repeat
-
-
-
-\endmetrics
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1906test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1906test.tex
deleted file mode 100644
index 92ed6281198..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1906test.tex
+++ /dev/null
@@ -1,12 +0,0 @@
-%&Plain
-% Test of fontinst v1.906.
-% Begun 1999/08/01.
-\input fontinst.sty
-
-\installfonts
- \installfamily{U}{ztest1}{}
- \installfont{v1906test}{v1906test}{v1906test}{U}{ztest1}{m}{n}{}
-\endinstallfonts
-
-\bye
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1913test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1913test.tex
deleted file mode 100644
index b9382cdf898..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1913test.tex
+++ /dev/null
@@ -1,21 +0,0 @@
-\input fontinst.sty
-
-\recordtransforms{v1913test.recs}
-
-\transformfont{padr8r}{\reencodefont{8r}{\fromafm{padr8a}}}
-\transformfont{padr8r-ys}{\yscalefont{\div{397000}{663}}{\frommtx{padr8r}}}
-\reglyphfonts
- \renameglyph{oneoldstyle}{one}
- \reglyphfont{padr8r-ys2}{padr8r-ys}
-\endreglyphfonts
-
-\installfonts
- \installfamily{T1}{pad}{}
- \installfamily{8r}{pad}{}
- \installfont{padr9d}{padr8r,padr8r-ys2,padr8x,latin}{t1j}{T1}{pad}{m}{n}{}
- \installrawfont{padr8r2}{padr8r-ys}{8r}{8r}{pad}{m}{n}{}
-\endinstallfonts
-
-\endrecordtransforms
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1914test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1914test.tex
deleted file mode 100644
index 73b271b986c..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1914test.tex
+++ /dev/null
@@ -1,50 +0,0 @@
-\input fontinst.sty
-
-%1
-\recordtransforms{v1914test.recs}
-
-\transformfont{padr8r}{\reencodefont{8r}{\fromafm{padr8a}}}
-\for(x){0}{2}{1}
- \for(y){0}{2}{1}
- \transformfont{p-ad-rr--8r--\strint{x}=\strint{y}}{
- \xscalefont{\add{\mul{\int{x}}{300}}{700}}{
- \yscalefont{\add{\mul{\int{y}}{300}}{700}}{
- \frommtx{padr8r}}}}
- \endfor(y)
-\endfor(x)
-
-\installfonts
- \installfamily{T1}{padxy}{}
- \installfamily{8r}{padxy}{}
- \for(x){0}{2}{1}
- \for(y){0}{2}{1}
- \installfont{p-ad-rr--8t--\strint{x}=\strint{y}}
- {p-ad-rr--8r--\strint{x}=\strint{y},latin}
- {t1}{T1}{padxy}{m\strint{x}\strint{y}}{n}{}
- \installrawfont{p-ad-rr--8r--\strint{x}=\strint{y}}
- {p-ad-rr--8r--\strint{x}=\strint{y},8r}
- {8r}{8r}{padxy}{m\strint{x}\strint{y}}{n}{}
- \endfor(y)
- \endfor(x)
-\endinstallfonts
-
-\endrecordtransforms
-
-% % \tracingmacros=1\tracingcommands=2
-% %2
-% \installfonts
-% \installrawfont{cmr5}{cmr5,\metrics
-% \resetint{xheight}{\mul{\int{xheight}}{2}},kernoff}{ot1}{OT1}
-% {cmr}{m}{n}{5}
-% \installfont{padr18t}{padr8r scaled 856,%
-% \metrics \message{%
-% \ifisint{rawscale}\then\strint{rawscale}\else None\fi
-% }%
-% \expandafter\show \csname g-A\endcsname
-% ,latin,%
-% \metrics \message{%
-% \ifisint{rawscale}\then\strint{rawscale}\else None\fi
-% }}{t1}{T1}{pad}{m}{ns}{}
-% \endinstallfonts
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1914testmap.tex b/Master/texmf-dist/doc/fontinst/base/test/v1914testmap.tex
deleted file mode 100644
index 9b1921bbc8d..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1914testmap.tex
+++ /dev/null
@@ -1,17 +0,0 @@
-\input finstmsc.sty
-
-\resetstr{PSfontsuffix}{.pfb}
-\adddriver{dvipdfm}{v1914test.dvipdfm}
-\adddriver{pltotf}{v1914test.sh} % v1.915 feature, actually
-\input v1914test.recs
-\donedrivers
-
-\AssumeLWFN
-\adddriver{dvips}{v1914test.map}
-\adddriver{debug}{v1914test.debug}
-\debugvalue{PS_font_file}
-\input v1914test.recs
-\donedrivers
-
-
-\bye
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1914testshow.tex b/Master/texmf-dist/doc/fontinst/base/test/v1914testshow.tex
deleted file mode 100644
index bd7a957b0a8..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1914testshow.tex
+++ /dev/null
@@ -1,22 +0,0 @@
-\documentclass{article}
-
-
-\newcommand\fontxy[2]{%
- \usefont{T1}{padxy}{m#1#2}{n}%
- Flygande b\"ackasiner s\"oka hwila p\r{a} mjuka tuvor%
-}
-
-
-\begin{document}
-
-$$
- \hss
- \begin{tabular}{lll}
- \fontxy00& \fontxy10& \fontxy20\\
- \fontxy01& \fontxy11& \fontxy21\\
- \fontxy02& \fontxy12& \fontxy22
- \end{tabular}
- \hss
-$$
-\end{document}
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1915test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1915test.tex
deleted file mode 100644
index b60946a402b..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1915test.tex
+++ /dev/null
@@ -1,25 +0,0 @@
-\input fontinst.sty
-
-% %1: Catcodes
-% \def\do#1{Catcode of `\string#1 = \the\catcode`#1 ^^J}
-% \def\showcatcodes{\message{\do{\ }\do{\^^M}\do{\@}\do{\_}\do{\~}}}
-%
-% \showcatcodes
-% \show\fontinstcc
-% \fontinstcc
-% \showcatcodes
-% \show\normalcc
-% \normalcc
-% \showcatcodes
-
-%2: Aliased glyphs
-\input Knuth:fontinst:New.fontinst:cyrfinst:etc:fnstcorr.tex
-\transformfont{padsc8r}{\reencodefont{8r}{\fromafm{padsc8a}}}
-\def\renameglyph#1#2{\galias{#1}{#2}}
-\input csc2x.tex
-\transformfont{padscx8r}{\reencodefont{8r}{\fromafm{padsc8a}}}
-% När glyfnamnen har tagits bort från de omkodade PL-filerna så är
-% de i allt väsentligt lika. Sålunda tycks det fungera!
-
-
-\bye \ No newline at end of file
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1915testmap.tex b/Master/texmf-dist/doc/fontinst/base/test/v1915testmap.tex
deleted file mode 100644
index 7e83526cd40..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1915testmap.tex
+++ /dev/null
@@ -1,9 +0,0 @@
-\input finstmsc.sty
-\adddriver{pltotf}{v1915test.sh}
-\input v1914test.recs
-\donedrivers
-\setstr{TFMfileprefix}{:a:b:c:}
-\adddriver{pltotf}{v1915test.sh2}
-\input v1913test.recs
-\donedrivers
-\bye
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1916test.mtx b/Master/texmf-dist/doc/fontinst/base/test/v1916test.mtx
deleted file mode 100644
index 1829c79d02d..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1916test.mtx
+++ /dev/null
@@ -1,23 +0,0 @@
-\relax
-
-\documentclass[twocolumn]{article}
-\usepackage{fontdoc}
-
-\errorcontextlines=999
-
-\begin{document}
-
-\metrics
-
-\foreach(glyph){a,b,c,d,tilde,\strint{a},db\str{a}ef,AB\str{glyph}CD}
- \resetglyph{\str{glyph}}
- \glyph{\str{glyph}}{1000}
- \resetitalic{0}
- \endresetglyph
-\endfor(glyph)
-
-
-\endmetrics
-
-
-\end{document}
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1916test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1916test.tex
deleted file mode 100644
index 56f26a51b0f..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1916test.tex
+++ /dev/null
@@ -1,14 +0,0 @@
-% v1916test.tex
-
-\input fontinst.sty
-
-% \half and \otherhalf
-\fontinstcc
-\for(i){-5}{5}{1}
- \eval_expr_to\b_count{\half{\int{i}}}
- \eval_expr{\otherhalf{\int{i}}}
- \immediate\write16{\strint{i}:~\the\b_count \space+~ \the\result}
-\endfor(i)
-\normalcc
-
-\bye
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1916test2.tex b/Master/texmf-dist/doc/fontinst/base/test/v1916test2.tex
deleted file mode 100644
index 8cc954f2615..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1916test2.tex
+++ /dev/null
@@ -1,27 +0,0 @@
-%&Plain
-\input fontinst.sty
-
-% %1 \ifareglyphs
-%
-% \setrawglyph{f}{xfont}{10pt}{102}{375}{750}{375}{50}
-% \setrawglyph{g}{xfont}{10pt}{102}{375}{750}{375}{50}
-% \setrawglyph{h}{xfont}{10pt}{102}{375}{750}{375}{50}
-%
-% \ifareglyphs{}\then True \else False \fi
-% \ifareglyphs{a}\then True \else False \fi
-% \ifareglyphs{f}\then True \else False \fi
-% \ifareglyphs{f,a}\then True \else False \fi
-% \ifareglyphs{a,f}\then True \else False \fi
-% \ifareglyphs{f,g}\then True \else False \fi
-% \ifareglyphs{f,g,a}\then True \else False \fi
-
-%2 \setfontdimen
-\generalpltomtx{ecrm1000}{ecrm1000}{pl}{t1draft}
-\generalpltomtx{ecss1000}{ecss1000}{pl}{t1draft}
-\transformfont{ecdh-shrunk}{%
- \yscalefont{500}{\fromplgivenetx{ecdh1000}{t1draft}}%
-}
-
-\bye
-
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1923test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1923test.tex
deleted file mode 100644
index ede00d90444..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1923test.tex
+++ /dev/null
@@ -1,47 +0,0 @@
-%&Plain
-
-\input fontinst.sty
-
-% %1
-% \transformfont{padr8r}{\reencodefont{8r}{\fromafm{padr8a}}}
-% \transformfont{padri8r}{\reencodefont{8r}{\fromafm{padri8a}}}
-%
-% \installfonts
-% \installfamily{T1}{pad2}{}
-% \installfont{zpad2i8t}{padri8r scaled 1009,%
-% padr8r scaled 999 suffix -upright scaled 1009,\metrics
-% % \expandafter\show \csname r-T-upright\endcsname
-% \unsetglyph{parenleft}
-% \setglyph{parenleft}
-% \glyph{parenleft-upright}{1000}
-% \endsetglyph
-% \resetglyph{parenright}
-% \glyph{parenright-upright}{1000}
-% \endresetglyph,latin}{t1}{T1}{pad2}{m}{it}{}
-% \endinstallfonts
-
-% %2
-%
-% \installfonts
-% \installfamily{U}{fad}{}
-% \installfont{fadrr}{fadrr}{textfdim,fadrr mtxasetx}{U}{fad}{m}{n}{}
-% \endinstallfonts
-
-% %3
-% \transformfont{pagk8r}{\reencodefont{8r}{\fromafm{pagk8a}}}
-% \installfonts
-% \installfont{pagk8t}{pagk8r,newlatin}{t1}{T1}{pag}{m}{n}{}
-% \endinstallfonts
-
-%4
-\installfonts
- \installfont{test}{rsfs10 encoding rsfs,cmsy10}{oms}{OMS}{xxx}{m}{n}{}
-\endinstallfonts
-% %4b
-% \installfonts
-% \installfont{test}{cmsy10,rsfs10 encoding rsfs}{oms}{OMS}{xxx}{m}{n}{}
-% \endinstallfonts
-
-
-\bye
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1927test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1927test.tex
deleted file mode 100644
index b21f16bf60e..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1927test.tex
+++ /dev/null
@@ -1,18 +0,0 @@
-%&Plain
-
-\input finstmsc.sty
-
-% %1
-% \etxtoenc{ot1}{temp}
-
-%2
-\storemapdata{a}{\fromafm{a}{XX}}{}
-\storemapdata{a}{\fromafm{a}{XX}}{}
-\storemapdata{a}{\fromafm{a}{XY}}{}
-\storemapdata{a}{\fromafm{a}{XX}}{}
-\storemapdata{a}{\fromafm{a}{XX}}{\reencodefont{8r}}
-
-
-
-\bye
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1928test.tex b/Master/texmf-dist/doc/fontinst/base/test/v1928test.tex
deleted file mode 100644
index 8242cc3438c..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1928test.tex
+++ /dev/null
@@ -1,13 +0,0 @@
-%&Plain
-
-\input finstmsc.sty
-
-%1
-\etxtocmap{t1draft}{temp}
-\etxtocmap{ot1draft}{ot1}
-\etxtocmap{omsdraft}{oms}
-
-
-
-\bye
-
diff --git a/Master/texmf-dist/doc/fontinst/base/test/v1928test2.tex b/Master/texmf-dist/doc/fontinst/base/test/v1928test2.tex
deleted file mode 100644
index c9b099e643c..00000000000
--- a/Master/texmf-dist/doc/fontinst/base/test/v1928test2.tex
+++ /dev/null
@@ -1,32 +0,0 @@
-\documentclass{article}
-
-
-
-
-\def\FontWithCMap#1#2#3{%
- \font#1=#2\relax
- \immediate\pdfobj stream file {#3}%
- \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
-}
-\def\AddCMapToFont#1#2{%
- \immediate\pdfobj stream file {#2}%
- \pdffontattr#1{/ToUnicode \the\pdflastobj\space 0 R}%
-}
-
-
-\begin{document}
-
-
-\FontWithCMap\test{cmr12}{ot1.cmap}
-\test abcdef ghijkl mnopqr stuvwx yz fi fl ffi ffl
-
-
-\begin{math}
- a
- \AddCMapToFont{\textfont2}{oms.cmap}
- \mathcal{A} - \mathcal{B} + \mathcal{C} * \mathcal{D} \cdot
- \mathcal{E} \bullet \mathcal{F} \spadesuit
-\end{math}
-
-
-\end{document}