X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ftranslator-scheme.cc;h=1be52621b34c92d3efbddd1dc6509523522d1401;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=bede8cac2d6a6906e9ba56f17376767eb2183419;hpb=08560a1b8076630c4fc6cb9b902614d8b74fd6fc;p=lilypond.git diff --git a/lily/translator-scheme.cc b/lily/translator-scheme.cc index bede8cac2d..1be52621b3 100644 --- a/lily/translator-scheme.cc +++ b/lily/translator-scheme.cc @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 2002--2012 Han-Wen Nienhuys + Copyright (C) 2002--2015 Han-Wen Nienhuys LilyPond is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -28,7 +28,7 @@ LY_DEFINE (ly_translator_name, "ly:translator-name", " The name is a symbol.") { LY_ASSERT_SMOB (Translator, trans, 1); - Translator *tr = unsmob_translator (trans); + Translator *tr = Translator::unsmob (trans); char const *nm = tr->class_name (); return ly_symbol2scm (nm); } @@ -38,7 +38,7 @@ LY_DEFINE (ly_translator_description, "ly:translator-description", "Return an alist of properties of translator @var{me}.") { LY_ASSERT_SMOB (Translator, me, 1); - Translator *tr = unsmob_translator (me); + Translator *tr = Translator::unsmob (me); return tr->translator_description (); } @@ -47,7 +47,7 @@ LY_DEFINE (ly_translator_context, "ly:translator-context", "Return the context of the translator object @var{trans}.") { LY_ASSERT_SMOB (Translator, trans, 1); - Translator *tr = unsmob_translator (trans); + Translator *tr = Translator::unsmob (trans); Context *c = tr->context (); return c ? c->self_scm () : SCM_BOOL_F;