scm/define-stencil-commands.scm

   1 ;;
   2 ;; define-stencil-commands.scm -- define valid stencil expression heads
   3 ;;
   4 ;; source file of the GNU LilyPond music typesetter
   5 ;;
   6 ;; (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
   7 ;;
   8
   9 (map ly:register-stencil-expression
  10      '(beam
  11        bezier-sandwich
  12        blank
  13        bracket
  14        char
  15        circle
  16        dashed-line
  17        dashed-slur
  18        dot
  19        draw-line
  20        filledbox
  21        glyph-string
  22        named-glyph
  23        polygon
  24        repeat-slash
  25        round-filled-box
  26        text
  27        url-link
  28        utf8-string
  29        white-dot
  30        white-text
  31        embedded-ps
  32        zigzag-line
  33        setcolor
  34        resetcolor
  35
  36        grob-cause
  37        no-origin
  38        placebox
  39        unknown
  40        ))
  41
  42 ;; TODO:
  43 ;;  - generate this list by registering the output-backend-commands
  44 ;;    output-backend-commands should have docstrings.
  45 ;;  - remove hard copies in output-ps output-tex
  46
  47 (define-public (ly:all-output-backend-commands)
  48   "Return list of output backend commands."
  49   '(combine-stencil
  50     color
  51     translate-stencil))
  52
  53 (map ly:register-stencil-expression (ly:all-output-backend-commands))