]> git.donarmstrong.com Git - lilypond.git/blob - input/test/staff-lines.ly
* configure.in: bump GCC requirements to 3.x
[lilypond.git] / input / test / staff-lines.ly
1
2 \version "1.9.1"
3
4 \header { texidoc="@cindex Staff Lines
5 Staff symbol property set workaround. "
6 }
7
8
9 upper = \notes\relative c'' {
10   c1-"x" d-"x" e-"x" f-"x"
11 }
12
13 lower = \notes\relative c {
14   c1-"x" b-"x" a-"x" g-"x"
15 }
16
17 \score {
18   \context PianoStaff <
19     %\time 4/4
20     \context Staff = upper <
21       \upper
22       \outputproperty #(make-type-checker 'staff-symbol-interface)
23         #'line-count = #5
24     >  
25     \context Staff = lower <
26       \clef bass
27       \lower
28       \outputproperty #(make-type-checker 'staff-symbol-interface)
29         #'line-count = #4
30     >  
31   >
32   \paper { raggedright=##t}  
33 }