File: fonttabs.tex

package info (click to toggle)
tetex-base 3.0.dfsg.3-5etch1
  • links: PTS
  • area: main
  • in suites: etch
  • size: 239,592 kB
  • ctags: 10,610
  • sloc: xml: 103,461; perl: 9,398; ruby: 2,850; python: 1,551; php: 1,067; sh: 981; lisp: 494; makefile: 371; awk: 88
file content (28 lines) | stat: -rw-r--r-- 771 bytes parent folder | download | duplicates (17) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
% This macro prints font tables using of Knuth's TESTFONT macro
% March 25 1993                                         Petr Olsak

% In plain write following commands:
%
%       \input fonttabs
%       cmr10
%       cmbx10
%       ... etc.
%       \end
%
% The names of fonts are separed by space or endline.
% All fonts must been loadable.
% Each font takes place on one table on one page.

\let\noinit!
\input testfont
\vsize=24cm

\long\def\start#1{\expandafter\if\noexpand#1\relax
     \let\next\relax \let\nextnext\start
     \else \let\next\newtab \let\nextnext\relax
   \fi \next#1\nextnext}
\def\newtab#1\nextnext#2 {\message{font: #1#2}%
  \def\fontname{#1#2 }\startfont\table \vfill\eject \start}

\everypar={\egroup\everypar={} \start} \setbox0=\vbox\bgroup