tex/lily-ps-defs.tex

   1 %
   2 % WARNING: don't leave blank lines in the PS-code; they are
   3 % transformed into \par
   4 %
   5
   6 %
   7 % header info (macros/defs, etc) should go into a \special{! ... },
   8 % note the ! sign.  See dvips.info for details.
   9 %
  10 % escape the colon with \string to avoid problems with french babel
  11 %
  12 \def\lilySpace{ }
  13 \def\turnOnPostScript{%
  14         % This sets CTM so that you get to the currentpoint
  15         % by executing a 0 0 moveto
  16         \def\embeddedps##1{%
  17                 \special{ps\string: @beginspecial @setspecial
  18                         \lilypondpaperoutputscale\lilySpace
  19                         \lilypondpaperoutputscale\lilySpace
  20                         % FUCKING REDHAT XDVI -- ARG!
  21                         skeel ##1 @endspecial}%
  22         }
  23 }
  24 \def\PSsetTeXdimen#1{\expandafter\special{! /#1 (\csname #1\endcsname) set_tex_dimen}}
  25 \PSsetTeXdimen{lilypondpaperblotdiameter}
  26 \def\turnOnExperimentalFeatures{}
  27