2 staff-bar.cc -- implement Staff_bar
4 source file of the GNU LilyPond music typesetter
6 (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "staff-bar.hh"
13 Staff_bar::get_bar_size () const
15 SCM size
= get_elt_property ("bar-size");
16 if (gh_number_p (size
))
17 return gh_scm2double (size
);
19 return (lines_i () -1) * staff_line_leading_f ();
23 Staff_bar::do_pre_processing ()
25 Bar::do_pre_processing ();
26 Staff_symbol_referencer::do_pre_processing ();