/*
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
SCM measureLength = timing->get_property ("measureLength");
- if (!Moment::unsmob (measureLength))
+ if (!Moment::is_smob (measureLength))
{
measureLength =
Moment (ly_scm2rational
context ()->set_property ("beamExceptions", beamExceptions);
SCM baseMoment = timing->get_property ("baseMoment");
- if (!Moment::unsmob (baseMoment))
+ if (!Moment::is_smob (baseMoment))
{
baseMoment =
Moment (ly_scm2rational
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);
Moment measposp;
SCM s = get_property ("measurePosition");
- if (Moment::unsmob (s))
+ if (Moment::is_smob (s))
measposp = *Moment::unsmob (s);
else
{