[groff] 12/14: Replace pseudo slanted characters

[Deri James]

deri pushed a commit to branch deri-gropdf-ng
in repository groff.

commit 5a143514e2f361e87f6187c834a61dd73df7012a
Author: Deri James <deri@chuzzlewit.myzen.co.uk>
AuthorDate: Mon Jul 3 15:44:29 2023 +0100

    Replace pseudo slanted characters
    
    * font/devpdf/DESC.in:
    * font/devpdf/SS:
    * font/devpdf/StandardSymSL.pfb:
    * tmac/pdf.tmac:
    
    Preparation for replacing the pseudo slanted lowercase greek
    characters (used in equations) with real glyphs, i.e. provide a
    Symbol-Slanted pfb font for gropdf. At the moment it requires the
    following intervention to make it work with test-groff:-
    
    Copy files SS and StandardSymSL.pfb to the build directory.
    
    Add the following line to the download file:-
    
            Symbol-Slanted  ./StandardSymSL.pfb.
    
    This needs to be added to the devpdf.am makefile so that it happens
    during make, and ensure the two new files are copied to the install
    directory and are cleaned and uninstalled appropriately. The macro
    pdf:tmac which created the pseudo slanted glyphs previously has been
    removed.
    
    Without the intervention, it may appear that all is working when
    test-groff is run (looking a pdf of groff_char(7) the lower greek
    characters may be slanted, but if you look at the fonts used you will
    see that the slanted symbol font has been substituted by some italic
    font from the system), and also there will be problems when groff is
    run from its install directory.
    
    So don't cherry-pick this commit until the makefile has been suitably
    amended.
---
 font/devpdf/DESC.in           |   2 +-
 font/devpdf/SS                |  50 ++++++++++++++++++++++++++++++++++++++++++
 font/devpdf/StandardSymSL.pfb | Bin 0 -> 14534 bytes
 tmac/pdf.tmac                 |  31 --------------------------
 4 files changed, 51 insertions(+), 32 deletions(-)

diff --git a/font/devpdf/DESC.in b/font/devpdf/DESC.in
index 5cb254f37..ba90d26ee 100644
--- a/font/devpdf/DESC.in
+++ b/font/devpdf/DESC.in
@@ -6,6 +6,6 @@ unitwidth 1000
 sizes 1000-10000000 0
 styles R I B BI
 family T
-fonts 8 0 0 0 0 0 0 S ZD
+fonts 8 0 0 0 0 0 SS S ZD
 tcommand
 postpro gropdf
diff --git a/font/devpdf/SS b/font/devpdf/SS
new file mode 100644
index 000000000..a61fa8b7a
--- /dev/null
+++ b/font/devpdf/SS
@@ -0,0 +1,50 @@
+# This file has been generated with GNU afmtodit (groff) version 1.20.1
+#
+#   FullName Symbol Slanted
+#   Version 001.008
+#   FamilyName Symbol
+#
+# The original AFM file contains the following comments:
+#
+#   Notice Copyright (c) 1985, 1987, 1989, 1990, 1997 Adobe Systems 
Incorporated. All rights reserved.
+#   Comment Copyright (c) 1985, 1987, 1989, 1990, 1997 Adobe Systems 
Incorporated. All rights reserved.
+#   Comment Creation Date: Thu May  1 15:12:25 1997
+#   Comment UniqueID 43064
+#   Comment VMusage 30820 39997
+
+name SS
+internalname Symbol-Slanted
+special
+slant 15.5
+spacewidth 223
+
+charset
+space  223     0       32      space
++h     562,614,16,133,-58,99   3       74      theta1
+ts     391,445,208,151,-28,99  3       86      sigma1
+*a     562,445,16,145,-34,99   3       97      alpha
+*b     489,659,198,139,58,99   3       98      beta
+*x     489,445,206,134,98,99   3       99      chi
+*d     440,658,17,181,-32,99   3       100     delta
+*e     391,447,17,127,1,99     3       101     epsilon
+*f     464,599,199,106,-28,99  3       102     phi
+*g     366,444,200,252,-42,99  3       103     gamma
+*y     537,457,180,68,-50,68   3       104     eta
+*i     293,448,15,53,-47,53    3       105     iota
++f     537,444,199,117,-42,99  3       106     phi1
+*k     489,446,0,182,-56,99    3       107     kappa
+*l     489,658,15,91,29,91     3       108     lambda
+*m     513,445,198,70,68,70    3       109     mu
+*n     464,451,14,134,-69,99   3       110     nu
+*o     489,444,17,86,-36,86    3       111     omicron
+*p     489,433,17,161,-8,99    3       112     pi
+*h     464,614,15,140,-53,99   3       113     theta
+*r     489,444,205,82,69,82    3       114     rho
+*s     537,445,19,175,-37,99   3       115     sigma
+*t     391,445,17,170,-45,99   3       116     tau
+*u     513,451,16,95,-55,95    3       117     upsilon
++p     635,519,16,173,-28,99   3       118     omega1
+*w     611,445,15,126,-35,99   3       119     omega
+*c     439,681,200,126,-20,99  3       120     xi
+*q     611,445,203,198,-91,99  3       121     psi
+*z     440,673,200,190,-50,99  3       122     zeta
diff --git a/font/devpdf/StandardSymSL.pfb b/font/devpdf/StandardSymSL.pfb
new file mode 100644
index 000000000..94efbab40
Binary files /dev/null and b/font/devpdf/StandardSymSL.pfb differ
diff --git a/tmac/pdf.tmac b/tmac/pdf.tmac
index f30c76f3e..90c6b191e 100644
--- a/tmac/pdf.tmac
+++ b/tmac/pdf.tmac
@@ -35,37 +35,6 @@ am solely responsible for any bugs I may have introduced 
into this file.
 .
 .mso ps.tmac
 .
-.de pdf:SS
-.      fchar \\$1 \\S'16'\\$1\\S'0'
-..
-.pdf:SS \[+h]
-.pdf:SS \[ts]
-.pdf:SS \[*a]
-.pdf:SS \[*b]
-.pdf:SS \[*x]
-.pdf:SS \[*d]
-.pdf:SS \[*e]
-.pdf:SS \[*f]
-.pdf:SS \[*g]
-.pdf:SS \[*y]
-.pdf:SS \[*i]
-.pdf:SS \[+f]
-.pdf:SS \[*k]
-.pdf:SS \[*l]
-.pdf:SS \[*m]
-.pdf:SS \[*n]
-.pdf:SS \[*o]
-.pdf:SS \[*p]
-.pdf:SS \[*h]
-.pdf:SS \[*r]
-.pdf:SS \[*s]
-.pdf:SS \[*t]
-.pdf:SS \[*u]
-.pdf:SS \[+p]
-.pdf:SS \[*w]
-.pdf:SS \[*c]
-.pdf:SS \[*q]
-.pdf:SS \[*z]
 .char \[lh] \X'pdf: xrev'\[rh]\X'pdf: xrev'
 .nr pdf:bm.nl 1
 .de pdfmark