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\PSsetTeXdimen#1{\expandafter\special{! /#1 (\csname #1\endcsname) set_tex_dimen}}
  13 \def\lilySpace{ }
  14 \def\turnOnPostScript{%
  15         % This sets CTM so that you get to the currentpoint
  16         % by executing a 0 0 moveto
  17         \def\embeddedps##1{%
  18                 \special{ps\string: @beginspecial @setspecial
  19                         \lilypondpaperoutputscale\lilySpace
  20                         \lilypondpaperoutputscale\lilySpace
  21                         % FUCKING REDHAT XDVI -- ARG!
  22                         skeel ##1 @endspecial}%
  23         }
  24         \PSsetTeXdimen{lilypondpaperblotdiameter}
  25 }
  26 \def\turnOnExperimentalFeatures{}
  27