grob.cc: Don't start consing before smobify_self

diff --git a/lily/grob.cc b/lily/grob.cc
index 41a445d5bfbb361971e19d4e9824aa469b4aa8ae..d8aeedd5ad2d3f53fff33bfd5761e5ff7e91953a 100644 (file)
--- a/lily/grob.cc
+++ b/lily/grob.cc
@@ -88,13 +88,16 @@ Grob::Grob (Grob const &s)
   self_scm_ = SCM_EOL;
 
   immutable_property_alist_ = s.immutable_property_alist_;
-  mutable_property_alist_ = ly_deep_copy (s.mutable_property_alist_);
+  mutable_property_alist_ = SCM_EOL;
   interfaces_ = s.interfaces_;
   object_alist_ = SCM_EOL;
 
   layout_ = 0;
 
   smobify_self ();
+
+  mutable_property_alist_ = ly_deep_copy (s.mutable_property_alist_);
+
 }
 
 Grob::~Grob ()