+Span_bar::add_bar (Grob *me, Grob *b)
+{
+ Pointer_group_interface::add_grob (me, ly_symbol2scm ("elements"), b);
+}
+
+MAKE_SCHEME_CALLBACK (Span_bar, print, 1);
+
+/* Limitations/Bugs:
+
+(1) Elements from 'me->get_object ("elements")' must be
+ordered according to their y coordinates relative to their common
+axis group parent. Otherwise, the computation goes mad.
+
+(2) This method depends on bar_engraver not being removed from
+staff context. If bar_engraver is removed, the size of the staff
+lines is evaluated as 0, which results in a solid span bar line
+with faulty y coordinate. */
+
+/* This routine was originally by Juergen Reuter, but it was a on the
+ bulky side. Rewritten by Han-Wen. */
+SCM
+Span_bar::print (SCM smobbed_me)