Rhythmic_head::dot_count (Grob*me)
{
return get_dots (me)
- ? gh_scm2int (get_dots (me)->get_property ("dot-count")) : 0;
+ ? ly_scm2int (get_dots (me)->get_property ("dot-count")) : 0;
}
void
Rhythmic_head::duration_log (Grob*me)
{
SCM s = me->get_property ("duration-log");
- return gh_number_p (s) ? gh_scm2int (s) : 0;
+ return ly_number_p (s) ? ly_scm2int (s) : 0;
}
ADD_INTERFACE (Rhythmic_head,"rhythmic-head-interface",