source file of the GNU LilyPond music typesetter
- (c) 1997--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "context.hh"
DECLARE_ACKNOWLEDGER (slur);
DECLARE_ACKNOWLEDGER (rhythmic_head);
DECLARE_ACKNOWLEDGER (stem);
+ DECLARE_ACKNOWLEDGER (stem_tremolo);
DECLARE_ACKNOWLEDGER (note_column);
public:
}
SCM preset = p->get_property_data (sym);
- if (scm_call_1 (type, preset) == SCM_BOOL_F)
+ if (val == SCM_EOL
+ || scm_call_1 (type, preset) == SCM_BOOL_F)
p->internal_set_property (sym, val);
}
}
}
+void
+Script_engraver::acknowledge_stem_tremolo (Grob_info info)
+{
+ int script_count = scripts_.size ();
+ for (int i = 0; i < script_count; i++)
+ {
+ Grob *e = scripts_[i].script_;
+ Side_position_interface::add_support (e, info.grob ());
+ }
+}
+
+
void
Script_engraver::acknowledge_rhythmic_head (Grob_info info)
{
ADD_ACKNOWLEDGER (Script_engraver, rhythmic_head);
ADD_ACKNOWLEDGER (Script_engraver, stem);
ADD_ACKNOWLEDGER (Script_engraver, note_column);
+ADD_ACKNOWLEDGER (Script_engraver, stem_tremolo);
ADD_TRANSLATOR (Script_engraver,
/* doc */ "Handles note scripted articulations.",