+ mol.add_stencil (b);
+ }
+ return mol;
+}
+
+MAKE_SCHEME_CALLBACK (Stem_tremolo, print, 1);
+SCM
+Stem_tremolo::print (SCM grob)
+{
+ Grob *me = unsmob_grob (grob);
+ Grob *stem = unsmob_grob (me->get_property ("stem"));
+ if (!stem)
+ {
+ programming_error ("No stem for stem-tremolo");
+ return SCM_EOL;