#include "warn.hh"
#include "performance.hh"
#include "paper-score.hh"
+#include "page-marker.hh"
#include "ly-smobs.icc"
Score *newscore = unsmob_score (scm_car (p))->clone ();
*t = scm_cons (newscore->self_scm (), SCM_EOL);
- t = SCM_CDRLOC(*t);
+ t = SCM_CDRLOC (*t);
newscore->unprotect ();
}
}
paper_book->add_performance (perf->self_scm ());
else if (Paper_score *pscore = dynamic_cast<Paper_score *> (output))
{
- if (ly_is_module (score->header_))
- paper_book->add_score (score->header_);
+ if (ly_is_module (score->get_header ()))
+ paper_book->add_score (score->get_header ());
paper_book->add_score (pscore->self_scm ());
}
outputs = scm_cdr (outputs);
}
}
- else if (Text_interface::is_markup (scm_car (s)))
+ else if (Text_interface::is_markup_list (scm_car (s))
+ || unsmob_page_marker (scm_car (s)))
paper_book->add_score (scm_car (s));
else
assert (0);