do
{
SCM width_scm = me->get_property ("width");
- if (d == RIGHT && is_number (width_scm))
+ if (d == RIGHT && ly_c_number_p (width_scm))
{
/*
don't multiply by Staff_symbol_referencer::staff_space (me),
Staff_symbol::line_count (Grob*me)
{
SCM c = me->get_property ("line-count");
- if (is_number (c))
+ if (ly_c_number_p (c))
return ly_scm2int (c);
else
return 0;