]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/add-grace-property.ly
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / input / regression / add-grace-property.ly
1 \version "2.17.25"
2
3 \header {
4   texidoc = "@code{\\add-grace-property} can be used at various
5 context levels in order to override grace properties.  Overrides in
6 different parallel contexts are independent."
7 }
8
9 <<
10  \new Staff = "1" \with { instrumentName =
11                           \markup \center-column { Voice mensural } }
12    \new Voice \with { $(add-grace-property 'Voice 'NoteHead 'style 'mensural)
13                       $(add-grace-property 'Score 'NoteHead 'style 'cross) }
14    { \grace d'8 c'1 \bar "|." }
15
16  \new Staff = "2" \with { instrumentName =
17                           \markup \center-column { Voice diamond } }
18    \new Voice \with { $(add-grace-property 'Voice 'NoteHead 'style 'diamond)   }
19    { \grace d'8 c'1 }
20
21  \new Staff = "3" \with { instrumentName =
22                           \markup \center-column { Score cross } }
23    \new Voice
24    { \grace d'8 c'1 }
25 >>