]> git.donarmstrong.com Git - lilypond.git/blob - input/test/generic-output-property.ly
0e7d2695b701cc32bdc65cd8dc530a887d303d51
[lilypond.git] / input / test / generic-output-property.ly
1 \score{
2         \notes\relative c''{
3         \outputproperty #(make-type-checker 'Note_head) 
4                 #'extra-offset = #'(2 . 3)
5         c2
6         c
7         \context Score {
8                 \outputproperty #(make-type-checker 'Mark) 
9                 #'extra-offset = #'(-1 . 4)
10         }
11         \mark A;
12         d1
13         \mark;
14         e
15 }
16 \paper{
17         linewidth=-1.0;
18         \translator {
19                 \ScoreContext
20                 \consists "Mark_engraver";
21         }
22 }
23 }