[metapost] Tfm generation broken

[Taco Hoekwater]

On 09/19/2013 09:40 PM, Paul Pichaureau wrote:
> Hi,
>
> I think the tfm generation is still broken in metapost 1.802 (I use the
> last Miktex distribution on windows 8).
>
> For example, if you compile the following file "test.mf"
>
>
> fontmaking:=1;
>
> designsize := 10;
> fontdimen5: 5;                 % xheight
>
> end.
>
> This is the pl file obtained:
>
> (DESIGNSIZE R 10.0)
> (COMMENT DESIGNSIZE IS IN POINTS)
> (COMMENT OTHER SIZES ARE MULTIPLES OF DESIGNSIZE)
> (CHECKSUM O 37700177400)
> (FONTDIMEN
>     (SLANT R 0.0)
>     (SPACE R 0.0)
>     (STRETCH R 0.0)
>     (SHRINK R 0.0)
>     (XHEIGHT R 0.03125)
>     )
>
> As you can see, the xheight has a completly wrong value.

This bug was easy to fix:

Index: ../../../source/texk/web2c/mplibdir/mp.w
===================================================================
--- ../../../source/texk/web2c/mplibdir/mp.w	(revision 1923)
+++ ../../../source/texk/web2c/mplibdir/mp.w	(working copy)
@@ -32727,7 +32727,7 @@
      mp_number arg1;
      new_number (arg1);
      number_clone (arg1, x);
-    number_multiply_int (x, 16);
+    number_multiply_int (arg1, 16);
      make_scaled (x, arg1, internal_value (mp_design_size));
      free_number (arg1);
    }



but I created a tracker item just in case:

   http://tracker.luatex.org/view.php?id=855

Best wishes,
Taco