* lily/note-column.cc (dir): idem.

[lilypond.git] / lily / paper-score.cc

diff --git a/lily/paper-score.cc b/lily/paper-score.cc
index eb431864b2dd460e4cf12502cd63d00b3e9fbc09..98b734a6534da32429d9a409a45d25824c86b0f3 100644 (file)
--- a/lily/paper-score.cc
+++ b/lily/paper-score.cc
@@ -39,6 +39,8 @@ Paper_score::Paper_score (Paper_score const &s)
 void
 Paper_score::derived_mark () const
 {
+  if (layout_)
+    scm_gc_mark (layout_->self_scm ());
   scm_gc_mark (systems_);
   scm_gc_mark (paper_systems_);
 }
@@ -74,8 +76,8 @@ Paper_score::process ()
 {
   if (be_verbose_global)
     message (_f ("Element count %d (spanners %d) ",
-                            system_->element_count (),
-                            system_->spanner_count ()));
+                system_->element_count (),
+                system_->spanner_count ()));
 
   message (_ ("Preprocessing graphical objects...") + " ");
 
@@ -109,7 +111,7 @@ Paper_score::layout () const
   
 
 SCM
-Paper_score::get_systems () const
+Paper_score::get_paper_systems () const
 {
   return paper_systems_;
 }