]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/timing-translator.cc
Run grand replace for 2015.
[lilypond.git] / lily / timing-translator.cc
index 4930d35d03933c6fe6651660e602eea9791f5177..6c3a5c88c233343a2fad6fba9450cb58e72c6472 100644 (file)
@@ -1,7 +1,7 @@
 /*
   This file is part of LilyPond, the GNU music typesetter.
 
-  Copyright (C) 1997--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  Copyright (C) 1997--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
 
   LilyPond is free software: you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
@@ -78,7 +78,7 @@ Timing_translator::initialize ()
 
   SCM measureLength = timing->get_property ("measureLength");
 
-  if (!Moment::unsmob (measureLength))
+  if (!Moment::is_smob (measureLength))
     {
       measureLength =
         Moment (ly_scm2rational
@@ -115,7 +115,7 @@ Timing_translator::initialize ()
   context ()->set_property ("beamExceptions", beamExceptions);
 
   SCM baseMoment = timing->get_property ("baseMoment");
-  if (!Moment::unsmob (baseMoment))
+  if (!Moment::is_smob (baseMoment))
     {
       baseMoment =
         Moment (ly_scm2rational
@@ -147,7 +147,7 @@ Rational
 Timing_translator::measure_length () const
 {
   SCM l = get_property ("measureLength");
-  if (Moment::unsmob (l))
+  if (Moment::is_smob (l))
     return Moment::unsmob (l)->main_part_;
   else
     return Rational (1);
@@ -181,7 +181,7 @@ Timing_translator::start_translation_timestep ()
   Moment measposp;
 
   SCM s = get_property ("measurePosition");
-  if (Moment::unsmob (s))
+  if (Moment::is_smob (s))
     measposp = *Moment::unsmob (s);
   else
     {