source file of the GNU LilyPond music typesetter
- (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2007 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "context.hh"
"Catch groups (staffs, lyrics lines, etc.) and stack "
"them vertically.",
/* create */ "VerticalAlignment",
- /* accept */ "",
- /* read */ "",
+ /* read */
+ "alignAboveContext "
+ "alignBelowContext ",
+
/* write */ "");
Vertical_align_engraver::Vertical_align_engraver ()
{
valign_ = make_spanner ("VerticalAlignment", SCM_EOL);
valign_->set_bound (LEFT, unsmob_grob (get_property ("currentCommandColumn")));
- Align_interface::set_axis (valign_, Y_AXIS);
+ Align_interface::set_ordered (valign_);
}
}
int sz = i.origin_contexts ((Translator *)this).size ();
return sz > 0 && Axis_group_interface::has_interface (i.grob ())
- && !i.grob ()->get_parent (Y_AXIS) && Axis_group_interface::has_axis (i.grob (), Y_AXIS);
+ && !i.grob ()->get_parent (Y_AXIS)
+ && Axis_group_interface::has_axis (i.grob (), Y_AXIS);
}
void
{
if (qualifies (i))
{
- String id = i.context ()->id_string ();
+ string id = i.context ()->id_string ();
- scm_hash_set_x (id_to_group_hashtab_, scm_makfrom0str (id.to_str0 ()),
+ scm_hash_set_x (id_to_group_hashtab_, ly_string2scm (id),
i.grob ()->self_scm ());
SCM before_id = i.context ()->get_property ("alignAboveContext");
Grob *after_grob = unsmob_grob (after);
Align_interface::add_element (valign_, i.grob ());
-
+
if (before_grob || after_grob)
{
Grob_array *ga = unsmob_grob_array (valign_->get_object ("elements"));
- Link_array<Grob> &arr = ga->array_reference ();
+ vector<Grob*> &arr = ga->array_reference ();
- Grob *added = arr.pop ();
- for (int i = 0; i < arr.size (); i++)
+ Grob *added = arr.back ();
+ arr.pop_back ();
+ for (vsize i = 0; i < arr.size (); i++)
{
if (arr[i] == before_grob)
{
- arr.insert (added, i);
+ arr.insert (arr.begin () + i, added);
break;
}
else if (arr[i] == after_grob)
{
- arr.insert (added, i + 1);
+ arr.insert (arr.begin () + i + 1, added);
break;
}
}