source file of the GNU LilyPond music typesetter
- (c) 2000--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 2000--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
+#include "math.h" // ceil
+
#include "beam.hh"
+#include "chord-tremolo-iterator.hh"
+#include "engraver-group.hh"
+#include "international.hh"
+#include "item.hh"
+#include "misc.hh"
#include "repeated-music.hh"
-#include "stem.hh"
#include "rhythmic-head.hh"
-#include "engraver-group-engraver.hh"
-#include "warn.hh"
-#include "misc.hh"
#include "spanner.hh"
-#include "item.hh"
-#include "chord-tremolo-iterator.hh"
#include "stem-tremolo.hh"
-#include "math.h" // ceil
+#include "stem.hh"
+#include "warn.hh"
#include "translator.icc"
if (Stem::duration_log (s) != 1)
beam_->set_property ("gap-count", scm_from_int (flags_ - total_duration_flags_));
- if (info.music_cause ()->is_mus_type ("rhythmic-event"))
+ if (info.ultimate_music_cause ()->is_mus_type ("rhythmic-event"))
Beam::add_stem (beam_, s);
else
{
- String s = _ ("stem must have Rhythmic structure");
+ string s = _ ("stem must have Rhythmic structure");
if (info.music_cause ())
info.music_cause ()->origin ()->warning (s);
else
stem_tremolo_->set_object ("stem",
info.grob ()->self_scm ());
stem_tremolo_->set_parent (info.grob (), X_AXIS);
+ info.grob ()->set_object ("tremolo-flag", stem_tremolo_->self_scm ());
}
}