return line_l_;
}
-
-
-
Paper_column*
Paper_column::column_l () const
{
return (Paper_column*)(this);
}
-
-
-
Paper_column::Paper_column (Moment w)
{
SCM when = (new Moment (w))->smobify_self ();
scm_unprotect_object (when);
set_elt_property ("when", when);
-
- axis_group (this).set_axes (X_AXIS, X_AXIS);
+
+ Axis_group_interface (this).set_interface ();
+ Axis_group_interface (this).set_axes (X_AXIS, X_AXIS);
line_l_=0;
rank_i_ = -1;
}
return s != Moment(0);
}
+
delete dim_cache_[Y_AXIS];
}
-
-Real
-Score_element::get_real (String s) const
-{
- return gh_scm2double (get_elt_property (s));
-}
-
-void
-Score_element::set_real (String s, Real r)
-{
- set_elt_property (s, gh_double2scm (r));
-}
-
// should also have one that takes SCM arg.
SCM
Score_element::get_elt_property (String nm) const
{
Score_element * newparent = parent->find_broken_piece (line_l ());
set_parent (newparent, ax);
+ if (!newparent)
+ {
+ programming_error ("Orphaned score-element.");
+ }
}
if (Item * i = dynamic_cast<Item*> (this))