]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/translator.cc
Don't assign 'safe' values to self_scm_ outside of smobify_self
[lilypond.git] / lily / translator.cc
index 116f2849ac702e33bb6e892dd6d8774f36e26c4b..5f4a39bb0ea835121527082d9717c7b849a68c13 100644 (file)
@@ -36,7 +36,6 @@ Translator::~Translator ()
 void
 Translator::init ()
 {
-  self_scm_ = SCM_EOL;
   daddy_context_ = 0;
   smobify_self ();
 }
@@ -279,7 +278,7 @@ generic_get_acknowledger (SCM sym, vector<Acknowledge_information> const *ack_ar
 Moment
 get_event_length (Stream_event *e)
 {
-  Moment *m = unsmob_moment (e->get_property ("length"));
+  Moment *m = Moment::unsmob (e->get_property ("length"));
   if (m)
     return *m;
   else