#include "translator.icc"
-Paper_column_engraver::Paper_column_engraver ()
+Paper_column_engraver::Paper_column_engraver (Context *c)
+ : Engraver (c)
{
last_moment_.main_part_ = Rational (-1, 1);
command_column_ = 0;
command_column_->set_property ("when", m);
musical_column_->set_property ("when", m);
+ SCM mpos = get_property ("measurePosition");
+ SCM barnum = get_property ("internalBarNumber");
+ if (unsmob<Moment> (mpos)
+ && scm_is_integer (barnum))
+ {
+ SCM where = scm_cons (barnum,
+ mpos);
+
+ command_column_->set_property ("rhythmic-location", where);
+ musical_column_->set_property ("rhythmic-location", where);
+ }
+
for (vsize i = 0; i < items_.size (); i++)
{
Item *elem = items_[i];
first_ = false;
label_events_.clear ();
-
- SCM mpos = get_property ("measurePosition");
- SCM barnum = get_property ("internalBarNumber");
- if (unsmob<Moment> (mpos)
- && scm_is_integer (barnum))
- {
- SCM where = scm_cons (barnum,
- mpos);
-
- command_column_->set_property ("rhythmic-location", where);
- musical_column_->set_property ("rhythmic-location", where);
- }
}
void