source file of the GNU LilyPond music typesetter
- (c) 2001--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 2001--2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include <math.h>
Molecule
Percent_repeat_item_interface::brew_slash ( Grob *me)
{
- Real slope = gh_scm2double (me->get_grob_property ("slope"));
+ Real slope = robust_scm2double (me->get_grob_property ("slope"), 1);
Real wid = 2.0 / slope;
/*
todo: check out if in staff-rule thickness normally.
*/
- Real thick = gh_scm2double (me->get_grob_property ("thickness"));
+ Real thick = robust_scm2double (me->get_grob_property ("thickness"), 1);
Molecule m = Lookup::repeat_slash (wid, slope, thick);
m.translate_axis (-m.extent (Y_AXIS).center (), Y_AXIS);
return m;
for (int i = count; i--;)
{
- m.add_at_edge (X_AXIS, RIGHT, s, -slash_neg_kern);
+ m.add_at_edge (X_AXIS, RIGHT, s, -slash_neg_kern,0);
}
Molecule d1 = Font_interface::get_default_font (me)->find_by_name ("dots-dot");
Molecule d2 = d1;
d1.translate_axis (0.5, Y_AXIS );
d2.translate_axis (-0.5, Y_AXIS);
- m.add_at_edge (X_AXIS, LEFT, d1, -dot_neg_kern);
- m.add_at_edge (X_AXIS, RIGHT, d2, -dot_neg_kern);
+ m.add_at_edge (X_AXIS, LEFT, d1, -dot_neg_kern,0);
+ m.add_at_edge (X_AXIS, RIGHT, d2, -dot_neg_kern,0);
return m;
}