+MAKE_SCHEME_CALLBACK (Music_wrapper, start_callback, 1);
+SCM
+Music_wrapper::start_callback (SCM m)
+{
+ Music *me = unsmob<Music> (m);
+ Music *elt = unsmob<Music> (me->get_property ("element"));
+ if (elt)
+ return elt->start_mom ().smobbed_copy ();
+ else
+ return Moment ().smobbed_copy ();
+}