scm/define-stencil-commands.scm

   1 ;;;; This file is part of LilyPond, the GNU music typesetter.
   2 ;;;;
   3 ;;;; Copyright (C) 2005--2010 Han-Wen Nienhuys <hanwen@xs4all.nl>
   4 ;;;;
   5 ;;;; LilyPond is free software: you can redistribute it and/or modify
   6 ;;;; it under the terms of the GNU General Public License as published by
   7 ;;;; the Free Software Foundation, either version 3 of the License, or
   8 ;;;; (at your option) any later version.
   9 ;;;;
  10 ;;;; LilyPond is distributed in the hope that it will be useful,
  11 ;;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 ;;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 ;;;; GNU General Public License for more details.
  14 ;;;;
  15 ;;;; You should have received a copy of the GNU General Public License
  16 ;;;; along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
  17
  18 ;; TODO:
  19 ;;  - stencil-commands should have docstrings.
  20
  21 (define-public (ly:all-stencil-commands)
  22   "Return the list of stencil commands that can be
  23 defined in the output modules (output-*.scm)"
  24   '(beam
  25     bezier-sandwich
  26     blank
  27     bracket
  28     char
  29     circle
  30     connected-shape
  31     dashed-line
  32     dashed-slur
  33     dot
  34     draw-line
  35     ellipse
  36     embedded-ps
  37     embedded-svg
  38     glyph-string
  39     grob-cause
  40     named-glyph
  41     no-origin
  42     oval
  43     path
  44     partial-ellipse
  45     placebox
  46     polygon
  47     repeat-slash
  48     resetcolor
  49     resetrotation
  50     round-filled-box
  51     setcolor
  52     setrotation
  53     text
  54     unknown
  55     url-link
  56     utf-8-string
  57     white-dot
  58     white-text
  59     zigzag-line
  60     ))
  61
  62 ;; TODO:
  63 ;;  - output-backend-commands should have docstrings.
  64
  65 (define-public (ly:all-output-backend-commands)
  66   "Return the list of extra output backend commands that
  67 are used internally in lily/stencil-interpret.cc."
  68   '(color
  69     combine-stencil
  70     delay-stencil-evaluation
  71     rotate-stencil
  72     translate-stencil
  73     ))
  74
  75 (map ly:register-stencil-expression
  76   (append (ly:all-stencil-commands)
  77           (ly:all-output-backend-commands)))