X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mf%2Fparmesan-generic.mf;h=311b75d040fc5755ed96e758802f1a3ad3550421;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=d10526cfbdbcc0c4ff437af14bd793970dc146d2;hpb=91e7cbaa6e54e004365d28e0f10c9362a7f13320;p=lilypond.git diff --git a/mf/parmesan-generic.mf b/mf/parmesan-generic.mf index d10526cfbd..311b75d040 100644 --- a/mf/parmesan-generic.mf +++ b/mf/parmesan-generic.mf @@ -1,40 +1,42 @@ - -% -*-Fundamental-*- -% parmesan-generic.mf -- implement generic stuff: include lots of files, -% but don't set dims. +% -%-Fundamental-%- -*-Metafont-*- +% parmesan-generic.mf -- implement generic stuff: include lots of files, +% but don't set dimensions. % % source file of LilyPond's pretty-but-neat music font -% -% (c) 2002--2005 Juergen Reuter -% +% +% (c) 2002--2008 Juergen Reuter +% if test = -1: mode := smoke; -fi +fi; mode_setup; -% + staffsize# := design_size * pt#; input feta-macros; input feta-params; +input parmesan-macros; -font_x_height staff_space#; -fet_beginfont("parmesan", design_size, "parmesanMusic") -if test = 0: - input parmesan-rests; - input parmesan-heads; - input parmesan-clefs; - input parmesan-custodes - input parmesan-accidentals; - input parmesan-flags; - input parmesan-timesig; - input parmesan-scripts; -else: +font_x_height staff_space#; -fi -fet_endfont; +fet_beginfont ("parmesan", design_size, "parmesanMusic"); + if test = 0: + input parmesan-rests; + input parmesan-heads; + input parmesan-clefs; + input parmesan-custodes + input parmesan-accidentals; + input parmesan-flags; + input parmesan-timesig; + input parmesan-scripts; + input parmesan-dots; + else: + + fi; +fet_endfont;