#include "lookup.hh"
#include "dimensions.hh"
-#include "paper-def.hh"
+#include "output-def.hh"
#include "stencil.hh"
#include "warn.hh"
#include "item.hh"
do
{
SCM width_scm = me->get_property ("width");
- if (d == RIGHT && gh_number_p (width_scm))
+ if (d == RIGHT && ly_c_number_p (width_scm))
{
/*
don't multiply by Staff_symbol_referencer::staff_space (me),
since that would make aligning staff symbols of different sizes to
one right margin hell.
*/
- span_points[RIGHT] = gh_scm2double (width_scm);
+ span_points[RIGHT] = ly_scm2double (width_scm);
}
else
{
Staff_symbol::line_count (Grob*me)
{
SCM c = me->get_property ("line-count");
- if (gh_number_p (c))
- return gh_scm2int (c);
+ if (ly_c_number_p (c))
+ return ly_scm2int (c);
else
return 0;
}
Real
Staff_symbol::staff_space (Grob*me)
{
- return robust_scm2double ( me->get_property ("staff-space"), 1.0);
+ return robust_scm2double (me->get_property ("staff-space"), 1.0);
}
Real