* lily/grob.cc (mark_smob): mark \layout block from Grob::mark_smob().

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

diff --git a/lily/paper-system.cc b/lily/paper-system.cc
index 9c70473c405ccf75e0aad4f020b5ec247ca87bdb..e78a1e9be90722987e9d077997efd09ce66203aa 100644 (file)
--- a/lily/paper-system.cc
+++ b/lily/paper-system.cc
@@ -16,8 +16,6 @@ IMPLEMENT_SMOBS (Paper_system);
 IMPLEMENT_TYPE_P (Paper_system, "ly:paper-system?");
 IMPLEMENT_DEFAULT_EQUAL_P (Paper_system);
 
-
-
 Paper_system::Paper_system (Stencil s, bool is_title)
 {
   is_title_ = is_title;
@@ -25,7 +23,7 @@ Paper_system::Paper_system (Stencil s, bool is_title)
   break_before_penalty_ = 0;
   smobify_self ();
   stencil_ = s;
-  staff_refpoints_ = Interval(0, 0);
+  staff_refpoints_ = Interval (0, 0);
 }
 
 Paper_system::~Paper_system ()
@@ -35,19 +33,19 @@ Paper_system::~Paper_system ()
 SCM
 Paper_system::mark_smob (SCM smob)
 {
-  Paper_system *system = (Paper_system*) SCM_CELL_WORD_1 (smob);
-  return system-> stencil_.expr ();
+  Paper_system *system = (Paper_system *) SCM_CELL_WORD_1 (smob);
+  return system->stencil_.expr ();
 }
 
 int
 Paper_system::print_smob (SCM smob, SCM port, scm_print_state*)
 {
-  Paper_system *p = (Paper_system*) SCM_CELL_WORD_1 (smob);
+  Paper_system *p = (Paper_system *) SCM_CELL_WORD_1 (smob);
   scm_puts ("#<", port);
   scm_puts (classname (p), port);
-  scm_puts (" ", port);
+  scm_puts ("n ", port);
   scm_puts (to_string (p->number_).to_str0 (), port);
-  scm_puts ("p ", port);
+  scm_puts (", p ", port);
   scm_puts (to_string (p->break_before_penalty_).to_str0 (), port);
   if (p->is_title ())
     scm_puts (" t", port);