scm/define-stencil-commands.scm

   1 ;;;; This file is part of LilyPond, the GNU music typesetter.
   2 ;;;;
   3 ;;;; Copyright (C) 2005--2012 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 (@file{output-*.scm})."
  24   '(bezier-sandwich
  25     blank
  26     char
  27     circle
  28     dashed-line
  29     dot
  30     draw-line
  31     ellipse
  32     embedded-ps
  33     embedded-svg
  34     end-enclosing-id-node
  35     glyph-string
  36     grob-cause
  37     named-glyph
  38     no-origin
  39     oval
  40     page-link
  41     path
  42     partial-ellipse
  43     placebox
  44     polygon
  45     repeat-slash
  46     resetcolor
  47     resetrotation
  48     resetscale
  49     round-filled-box
  50     setcolor
  51     setrotation
  52     setscale
  53     start-enclosing-id-node
  54     text
  55     unknown
  56     url-link
  57     utf-8-string
  58     zigzag-line
  59     ))
  60
  61 ;; TODO:
  62 ;;  - output-backend-commands should have docstrings.
  63
  64 (define-public (ly:all-output-backend-commands)
  65   "Return the list of extra output backend commands that
  66 are used internally in @file{lily/@/stencil-interpret.cc}."
  67   '(color
  68     combine-stencil
  69     delay-stencil-evaluation
  70     footnote
  71     id
  72     rotate-stencil
  73     scale-stencil
  74     translate-stencil
  75     ))
  76
  77 (map ly:register-stencil-expression
  78   (append (ly:all-stencil-commands)
  79           (ly:all-output-backend-commands)))