summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/fontinst/base/xfntinst.sty
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/fontinst/base/xfntinst.sty')
-rw-r--r--Master/texmf-dist/tex/fontinst/base/xfntinst.sty33
1 files changed, 27 insertions, 6 deletions
diff --git a/Master/texmf-dist/tex/fontinst/base/xfntinst.sty b/Master/texmf-dist/tex/fontinst/base/xfntinst.sty
index c499ee37b4e..c969deab6b3 100644
--- a/Master/texmf-dist/tex/fontinst/base/xfntinst.sty
+++ b/Master/texmf-dist/tex/fontinst/base/xfntinst.sty
@@ -32,13 +32,13 @@
\catcode`\}=2
\catcode`\#=6
\catcode`\^=7
-\def\fontinstversion{1.927}
+\def\fontinstversion{1.929}
\ifx\ProvidesPackage\undefined
\def\NeedsTeXFormat#1{}
\def\ProvidesPackage#1[#2]{}
\fi
\ProvidesPackage{fontinst}
-[2004/08/07 v\fontinstversion\space
+[2005/02/05 v\fontinstversion\space
fontinst installation package]
\def\a_macro#1{\catcode\number`#1=\the\catcode`#1 }
\edef\normalcc{%
@@ -363,6 +363,27 @@
\catcode`\t=12
\gdef\lose_measure#1pt{#1}
}
+\def\format_hex_i#1#2{
+ \if #2i \else
+ \b_count=\a_count
+ \divide \a_count \sixt@@n
+ \c_count=\a_count
+ \multiply \c_count \sixt@@n
+ \advance \b_count -\c_count
+ \edef#1{
+ \ifcase\b_count 0\or 1\or 2\or 3\or 4\or 5\or 6\or 7\or 8\or
+ 9\or a\or b\or c\or d\or e\or f\fi
+ #1
+ }
+ \expandafter\format_hex_i \expandafter#1
+ \fi
+}
+\def\format_hex#1#2#3{
+ \a_count=#2
+ \let#1\empty_command
+ \expandafter\format_hex_i \expandafter#1 \romannumeral
+ \expandafter\identity_one\expandafter{\number#3}001~
+}
\let\messagebreak\x_relax
\def\generic_info#1#2{
\begingroup
@@ -547,7 +568,6 @@
\expandafter\if_false
\fi
}
-
\let\setsomething_global=\x_relax
\def\x_setint#1#2{
\x_cs\ifx{i-#1}\x_relax
@@ -736,6 +756,7 @@
\let\usedas=\gobble_two
\let\makerightboundary=\gobble_one
\let\Unicode=\gobble_two
+\let\charseq=\gobble_one
\let\varchar=\empty_command
\let\vartop=\gobble_one
\let\varmid=\gobble_one
@@ -1793,7 +1814,7 @@
\inputmtx{\str{afm-name}}
\else
\fontinsterror{\string\install...}{
- Font/MTX~file~\file_name\space not found
+ Font/MTX~file~\file_name\space not~found
}{
You~can~insert~an~\string\inputmtx\space command~here
\messagebreak to~input~some~other~MTX~file~instead.
@@ -1805,7 +1826,7 @@
\fi
}
\def\metrics_given_encoding#1#2{
- \x_setstr{afm-name}{#1-#2}
+ \x_cs\edef{s-afm-name}{#1-#2}
\if_file_exists{#1.pl}\then
\generalpltomtx{#1}{#1-#2}{pl}{#2}
\else
@@ -2499,7 +2520,7 @@
\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{(COMMENT~pltotf~#2.pl~#2.tfm)}
\out_line{}
\out_line{(COMMENT~THIS~FILE~CAN~THEN~BE~DELETED.)}
\out_line{}