🚀 go-pugleaf

In article <DAMIAN.CUGLEY.92Aug7154346@pierrot.comlab> I write:
> [...Malvern release 1.0...]

The following gibberish can be fed into Larry Wall's "patch" program to
correct a few obvious errors in release 1.0 of Malvern.  Applying
patches by hand is left as an exercise to the reader.

This patch should also be available alongside malvern-10.tar.Z as a file
called malvern-10-patch01.

Damian

----------------------------------------------------------------CUT HERE
Patch 01 to Malvern 1.0:
    Correct width of letter L
    Add colon after else (Norbert.Schwarz@de.dbp.ruhr-uni-bochum.RZ.RUBA)
    Changed hratio and width values in mff.rc to be more reasonable
pdc Thur. 13 Aug. 1992

diff -cw Malvern-1.0/ma.mf Malvern-1.0.01/ma.mf
*** Malvern-1.0/ma.mf	Thu Jul 16 19:36:20 1992
--- Malvern-1.0.01/ma.mf	Thu Aug 13 17:37:11 1992
***************
*** 1,7 ****
! %{{{ ma.mf 1.1.15 92/07/16 -- top-level driver file for the Malvern family
  % Copyright (C) 1991, 1992 Damian Cugley
  
! string maversion; maversion = "1.0 (alpha1.15) <pdc 92/07/16>";
  
  %  This software is available freely without warranty.
  %  See the file COPYING for details.
--- 1,7 ----
! %{{{ ma.mf 1.1.16 92/08/13 -- top-level driver file for the Malvern family
  % Copyright (C) 1991, 1992 Damian Cugley
  
! string maversion; maversion = "1.0.01 <pdc 92/08/13>";
  
  %  This software is available freely without warranty.
  %  See the file COPYING for details.
diff -cwr Malvern-1.0/macaps.mf Malvern-1.0.01/macaps.mf
*** Malvern-1.0/macaps.mf	Thu Jul 16 19:41:17 1992
--- Malvern-1.0.01/macaps.mf	Thu Aug 13 17:04:07 1992
***************
*** 1,4 ****
! %{{{ macaps.mf 1.1.12 92/07/16 -- capital letters program file
  % Copyright (c) 1991,1992 Damian Cugley
  
  %  This file produces capital letters of the Latin alphabet, including
--- 1,4 ----
! %{{{ macaps.mf 1.1.13 92/08/13 -- capital letters program file
  % Copyright (c) 1991,1992 Damian Cugley
  
  %  This file produces capital letters of the Latin alphabet, including
***************
*** 39,45 ****
  
  %{{{   L
  
! ma_cap("L", medium_wd# + pn_adj#)(1,1/2);
      box_points;
      draw (x.l, y.t) -- (x.l, y.b) -- (x.r, y.b);
  if not no_co:
--- 39,45 ----
  
  %{{{   L
  
! ma_cap("L", narrow_wd# + pn_adj#)(1,1/2);
      box_points;
      draw (x.l, y.t) -- (x.l, y.b) -- (x.r, y.b);
  if not no_co:
diff -cwr Malvern-1.0/maparams.mf Malvern-1.0.01/maparams.mf
*** Malvern-1.0/maparams.mf	Thu Jul 16 19:37:30 1992
--- Malvern-1.0.01/maparams.mf	Thu Aug 13 17:04:13 1992
***************
*** 1,4 ****
! %{{{ maparams.mf 1.1.10 92/07/16 -- Set ad-hoc parameters
  % Copyright (c) 1991,1992 Damian Cugley.
  
  %{{{  meta-parameters (should be set before |\input ma|)
--- 1,4 ----
! %{{{ maparams.mf 1.1.11 92/08/13 -- Set ad-hoc parameters
  % Copyright (c) 1991,1992 Damian Cugley.
  
  %{{{  meta-parameters (should be set before |\input ma|)
***************
*** 10,16 ****
      italicness := 0;
  elseif italicness > 0:
      italic := true;
! else
      italic := false;
  fi
  % |italicness| is not referred to again
--- 10,16 ----
      italicness := 0;
  elseif italicness > 0:
      italic := true;
! else:
      italic := false;
  fi
  % |italicness| is not referred to again
diff -cwr Malvern-1.0/mff.rc Malvern-1.0.01/mff.rc
*** Malvern-1.0/mff.rc	Fri Jul 17 16:46:28 1992
--- Malvern-1.0.01/mff.rc	Thu Aug 13 17:04:12 1992
***************
*** 1,4 ****
! # mff.rc 1.1.8 92/07/17 -- mff startup file for Malvern 1.0
  
  #  This file describes the translation of font names into assignments to
  #  METAFONT variables (see the file INSTALL for more info).
--- 1,4 ----
! # mff.rc 1.1.10 92/08/13 -- mff startup file for Malvern 1.0
  
  #  This file describes the translation of font names into assignments to
  #  METAFONT variables (see the file INSTALL for more info).
***************
*** 47,56 ****
  -W "3= weight = 3/4"	# light
  -W "4= weight = 7/8"	# book
  -W "5= weight = 1"	# medium
! -W "6= weight = 1.5"	# demi 
! -W "7= weight = 2"	# bold 
! -W "8= weight = 3"	# extra
! -W "9= weight = 4"	# ultra
  
  -W "t= weight = 1/4"	# thin [ultra-light]
  -W "i= weight = 1/2"	# extra-lIght
--- 47,56 ----
  -W "3= weight = 3/4"	# light
  -W "4= weight = 7/8"	# book
  -W "5= weight = 1"	# medium
! -W "6= weight = 1.3"	# demi 
! -W "7= weight = 1.6"	# bold 
! -W "8= weight = 2"	# extra
! -W "9= weight = 3"	# ultra
  
  -W "t= weight = 1/4"	# thin [ultra-light]
  -W "i= weight = 1/2"	# extra-lIght
***************
*** 57,104 ****
  -W "l= weight = 3/4"	# Light
  -W "k= weight = 7/8"	# booK
  -W "r= weight = 1"	# Regular
! -W "d= weight = 1.5" 	# Demi
! -W "b= weight = 2"	# Bold
! -W "x= weight = 3"	# eXtra
! -W "u= weight = 4"	# Ultra
  
  #  The table of widths.
  
  +C
! -C "9= hratio = 0.3"
! -C "0= hratio = 0.3; slant := 1/8; italicness = 1"
! -C "7= hratio = 0.6"
! -C "8= hratio = 0.6; slant := 1/8; italicness = 1"
! -C "5= hratio = 1"
! -C "6= hratio = 1; slant := 1/8; italicness = 1"
  -C "3= hratio = 1.15"
! -C "4= hratio = 1.15; slant := 1/8; italicness = 1"
  -C "1= hratio = 1.30"
! -C "2= hratio = 1.30; slant := 1/8; italicness = 1"
  
  +I
! -I "i=italicness = 1; slant := 1/8"	# italic
! -I "u=italicness = 1"			# vertical italic
! -I "o=slant := 1/8"			# oblique
  
- #  Berry's system has expansion after variant rather than before:
- +J
- -J "o= hratio = 0.3"	# narrow (extra condensed)
- -J "c= hratio = 0.6"	# compressed
- -J "x= hratio = 1.15"	# expanded
- -J "w= hratio = 1.30" 	# wide (extra expanded)
- 
- 
  #  "j" is a hack to prevent the programs from using features new
  #  to METAFONT 2.0 -- such as the |=: ligature step, which is used
  #  to fake an "fj" ligature.
! 
  -J "j=no_new_mf = 1"		# use when using METAFONT 1.x 
  
  -J "s=encoding=0"	# Standard TeX text (like cmr)
- -J "x=encoding=-200"	# Cork (TUGboat 11#4)
  -J "mi=encoding=-1"	# maths (like cmmi)
  -J "sy=encoding=-2"	# symbol (like cmsy)
  -J "ps=encoding=-1000"	# the AdobeStandardEncoding encoding
  -J "so=encoding=-1010"	# the ISOLatin1Encoding encoding
  
--- 57,103 ----
  -W "l= weight = 3/4"	# Light
  -W "k= weight = 7/8"	# booK
  -W "r= weight = 1"	# Regular
! -W "d= weight = 1.3" 	# Demi
! -W "b= weight = 1.6"	# Bold
! -W "x= weight = 2"	# eXtra
! -W "u= weight = 3"	# Ultra
  
  #  The table of widths.
  
  +C
! -C "9= hratio = 0.50"
! -C "0= hratio = 0.50; slant = 1/8; italicness = 1"
! -C "7= hratio = 0.80"
! -C "8= hratio = 0.80; slant = 1/8; italicness = 1"
! -C "5= hratio = 1.00"
! -C "6= hratio = 1.00; slant = 1/8; italicness = 1"
  -C "3= hratio = 1.15"
! -C "4= hratio = 1.15; slant = 1/8; italicness = 1"
  -C "1= hratio = 1.30"
! -C "2= hratio = 1.30; slant = 1/8; italicness = 1"
  
+ 
  +I
! -I "ro= hratio = 0.50"	# extra condensed
! -I "rc= hratio = 0.80"	# compressed
! -I "rx= hratio = 1.15"	# expanded
! -I "rw= hratio = 1.30" 	# extra expanded
! -I "io= hratio = 0.50; italicness = 1; slant = 1/8"	# extra condensed
! -I "ic= hratio = 0.80; italicness = 1; slant = 1/8"	# compressed
! -I "i=  hratio = 1.00; italicness = 1; slant = 1/8"	# normal width
! -I "ix= hratio = 1.15; italicness = 1; slant = 1/8"	# expanded
! -I "iw= hratio = 1.30; italicness = 1; slant = 1/8" 	# extra expanded
  
  #  "j" is a hack to prevent the programs from using features new
  #  to METAFONT 2.0 -- such as the |=: ligature step, which is used
  #  to fake an "fj" ligature.
! +J
  -J "j= no_new_mf = 1"		# use when using METAFONT 1.x 
  
  -J "s= encoding = 0"	# Standard TeX text (like cmr)
  -J "mi=encoding = -1"	# maths (like cmmi)
  -J "sy=encoding = -2"	# symbol (like cmsy)
+ -J "x= encoding = -200"	# Cork (TUGboat 11#4)
  -J "ps=encoding = -1000"	# the AdobeStandardEncoding encoding
  -J "so=encoding = -1010"	# the ISOLatin1Encoding encoding
  
***************
*** 106,108 ****
--- 105,111 ----
  -J "a= encoding = 1"	# Malvern A (simple letters)
  -J "b= encoding = 2"	# Malvern B (strange symbols)
  -J "c= encoding = 3"	# Malvern C (composites)
+ 
+ #  To prevent conflict between KB & PDC font names,
+ #  it is probably best to use "mff +J" when using KB fontnames.
+ #  Sorry.