]> git.donarmstrong.com Git - lilypond.git/blob - input/bugs/pc-mmrest.ly
e3800990ae8ea6d3c7b536b234a20b0940e2f4eb
[lilypond.git] / input / bugs / pc-mmrest.ly
1 \version "1.3.148"
2 %
3 % mmrests of second voice should not disappear
4 %
5 % the problem is more complex: the mmrest-engraver lives at staff level,
6 % but it seems that we need one per voice.
7 %
8
9 #(set! point-and-click line-column-location)
10 one = \notes\relative c'' {
11
12         f4 \!e-.\f r2|
13         R1|
14         f2\p()es|
15         \property Voice.crescendoText = #'(lines " " "cresc." " ")
16         \property Voice.crescendoSpanner = #'dashed-line
17         d1\<|
18         d1|
19         d2 d2|
20         d2 d2|
21         \!f1\ff  |
22         f1
23 }
24
25 two = \notes \relative c'' {
26         r4 c r2|
27         R1*6|
28         c1 ~|
29         c1
30 }
31         
32 \score {
33   \notes <
34     \context Staff = Viole <
35         \context Voice=one \partcombine Voice
36                 \context Thread=one \one
37                 \context Thread=two \two
38     > ~
39   >
40   \paper {
41     \translator {
42       \ThreadContext
43       \consists "Rest_engraver"
44     }
45     \translator {
46       \VoiceContext
47       \remove "Rest_engraver"
48       \consists Multi_measure_rest_engraver
49       \consists Bar_engraver
50     }
51     \translator {
52       \HaraKiriStaffContext
53       \remove Multi_measure_rest_engraver
54       \remove Bar_engraver
55     }
56     \translator {
57       \OrchestralScoreContext
58       RestCollision \override #'maximum-rest-count = #1
59     }
60   }
61 }