Commits

Philipp Gesang committed f9e15b5

expand test for loading type1 fonts with absolute paths

Comments (0)

Files changed (1)

pln-psfonts-1-abspath.tex

-\input luaotfload.sty
-%font\x="[/home/phg/src/fonts/adobe/source/Italic/BoldIt/font.pfa]"
-\directlua{
-}
-\font\x="file:/home/phg/src/fonts/adobe/source/Roman/Semibold/font.pfa"
-\x
+%% load a pfa file
 
-foo bar baz
+\pdfpagewidth  297mm
+\pdfpageheight 210mm
+\hsize 277mm
+\vsize 190mm
+
+\def \scaleto {12dd}
+\baselineskip 14.4dd
+
+\def \srcdir {/home/phg/src}
+
+\edef \pfaone   {\srcdir/fonts/adobe/source/Roman/Semibold/font.pfa}
+\edef \pfatwo   {\srcdir/texlive2013/texmf-dist/fonts/type1/public/brushscr/BrushScriptX-Italic.pfa}
+
+\edef \pfbone   {\srcdir/texlive2013/texmf-dist/fonts/type1/urw/grotesq/ugqb8a.pfb}
+\edef \pfbtwo   {\srcdir/texlive2013/texmf-dist/fonts/type1/gust/poltawski/antpr17.pfb}
+\edef \pfbthree {\srcdir/texlive2013/texmf-dist/fonts/type1/impallari/quattrocento/QuattrocentoRegular.pfb}
+\edef \pfbfour  {\srcdir/texlive2013/texmf-dist/fonts/type1/bitstrea/charter/bchr8a.pfb}
+
+\ifdefined \directlua
+  \ifdefined \luatexsuppresslongerror
+    \input luaotfload.sty
+  \fi
+
+  \font\pfaa = "file:\pfaone"   at \scaleto
+  \font\pfab = "file:\pfatwo"   at \scaleto
+
+  \font\pfba = "file:\pfbone"   at \scaleto
+  \font\pfbb = "file:\pfbtwo"   at \scaleto
+  \font\pfbc = "file:\pfbthree" at \scaleto
+  \font\pfbd = "file:\pfbfour"  at \scaleto
+\else
+\fi
+
+\def\test#1{before
+            \bgroup
+              #1
+              \fontname#1
+            \egroup
+            after
+            \par}
+
+normal font: \fontname\font
+
+\hrule
+ascii postscript\par
+\test\pfaa
+\test\pfab
+
+\hrule
+binary postscript\par
+\test\pfba
+\test\pfbb
+\test\pfbc
+\test\pfbd
 
 \bye