- There is no real processing to a property: just lookup the
- translation unit, and set the property.
- */
+ There is no real processing to a property: just lookup the
+ translation unit, and set the property.
+*/
+void
+Property_iterator::process (Moment mom)
+{
+ Context *o = get_outlet ();
+ Music *m = get_music ();
+
+ send_stream_event (o, "SetProperty", m->origin (),
+ ly_symbol2scm ("symbol"), m->get_property ("symbol"),
+ ly_symbol2scm ("value"), m->get_property ("value"),
+ ly_symbol2scm ("once"), m->get_property ("once"));
+
+ Simple_music_iterator::process (mom);
+}
+