- Real inter_f = Staff_symbol_referencer::staff_space (me)/2;
- int sz = Staff_symbol_referencer::line_count (me)-1;
- return gh_double2scm (inter_f * sz * d);
+ Real inter = Staff_symbol_referencer::staff_space (me) / 2;
+ int sz = Staff_symbol_referencer::line_count (me) - 1;
+ return scm_from_double (inter * sz * d);