/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 2002--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 2002--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
" The name is a symbol.")
{
LY_ASSERT_SMOB (Translator, trans, 1);
- Translator *tr = unsmob_translator (trans);
+ Translator *tr = unsmob<Translator> (trans);
char const *nm = tr->class_name ();
return ly_symbol2scm (nm);
}
"Return an alist of properties of translator @var{me}.")
{
LY_ASSERT_SMOB (Translator, me, 1);
- Translator *tr = unsmob_translator (me);
+ Translator *tr = unsmob<Translator> (me);
return tr->translator_description ();
}
"Return the context of the translator object @var{trans}.")
{
LY_ASSERT_SMOB (Translator, trans, 1);
- Translator *tr = unsmob_translator (trans);
+ Translator *tr = unsmob<Translator> (trans);
Context *c = tr->context ();
return c ? c->self_scm () : SCM_BOOL_F;