]> git.donarmstrong.com Git - lilypond.git/blob - input/bugs/stem-through-beam.ly
patch::: 1.3.132.jcn1
[lilypond.git] / input / bugs / stem-through-beam.ly
1 % strange bug with stems through beams in second beam
2         
3 End = { \skip 1*8; }
4
5 violaii = \notes\relative c' {
6         [\!f8\sf(\>as f as][f g d)\!g]|
7 }
8
9 violai=\notes\relative c' {
10         [\!f8\sf(\>as f as][f g d)\!g]|
11 }
12
13 violeStaff =  \notes \context Staff = viole <
14  \context Voice=oneViola <
15                 \property Staff.instrument = #"Viola"
16                 \property Staff.instr = #"Vla."
17
18  \End
19  >
20  \context Voice=twoViola <
21                 \property Staff.instrument = #"Viola II"
22                 \property Staff.instr = #"Vla. II"
23  \End
24  >
25   \context Voice=oneViola \partcombine Voice
26     \context Thread=oneViola \violai
27     \context Thread=twoViola \violaii
28 >
29
30 \score {
31   \violeStaff
32   \paper {
33     % \paperSixteen
34     linewidth = 80 * \staffspace;
35     textheight = 200 * \staffspace;
36     \translator{
37       \ThreadContext
38       \consists "Rest_engraver";
39       % Set value for engraver at thread level,
40       % to override the default that is set in ScoreContext
41       % for added engraver at Voice level
42       devNullThread = #'()
43     }
44     \translator{
45       \VoiceContext
46       \remove "Rest_engraver";    
47
48       % The staff combine (bassi part) needs a
49       % thread_devnull_engraver here.
50       % Instead of maintaining two separate hierarchies,
51       % we switch add it, but switch it off immideately.
52       % The staff combine parts switch it on.
53       % devNullThread = #'never
54       \consists "Thread_devnull_engraver";
55     }
56     \translator{
57       \HaraKiriStaffContext
58       \consists "Mark_engraver";
59     }
60     \translator {
61       \OrchestralScoreContext
62       skipBars = ##t
63
64       % By default, turn off the Thread_devnull_engraver
65       % at Voice level
66       devNullThread = #'never
67       soloText = #"I."
68       soloIIText = #"II."
69
70       % Hmm
71       currentBarNumber = #218
72       BarNumber \override #'padding = #3
73       RestCollision \override #'maximum-rest-count = #1
74       marginScriptHorizontalAlignment = #1
75       TimeSignature \override #'style = #'C
76     }
77   }
78 }
79