/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 2001--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 2001--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
Accidental_interface::horizontal_skylines (SCM smob)
{
- Grob *me = Grob::unsmob (smob);
+ Grob *me = unsmob<Grob> (smob);
if (!me->is_live ())
return Skyline_pair ().smobbed_copy ();
- Stencil *my_stencil = Stencil::unsmob (me->get_property ("stencil"));
+ Stencil *my_stencil = unsmob<Stencil> (me->get_property ("stencil"));
if (!my_stencil)
return Skyline_pair ().smobbed_copy ();
Skyline_pair *sky =
- Skyline_pair::unsmob
+ unsmob<Skyline_pair>
(Stencil::skylines_from_stencil
(my_stencil->smobbed_copy (), 0.0, Y_AXIS));
SCM
Accidental_interface::height (SCM smob)
{
- Grob *me = Grob::unsmob (smob);
- Grob *tie = Grob::unsmob (me->get_object ("tie"));
+ Grob *me = unsmob<Grob> (smob);
+ Grob *tie = unsmob<Grob> (me->get_object ("tie"));
if (tie
&& !to_boolean (me->get_property ("forced"))
SCM
Accidental_interface::remove_tied (SCM smob)
{
- Grob *me = Grob::unsmob (smob);
- Grob *tie = Grob::unsmob (me->get_object ("tie"));
+ Grob *me = unsmob<Grob> (smob);
+ Grob *tie = unsmob<Grob> (me->get_object ("tie"));
if (tie
&& !to_boolean (me->get_property ("forced"))
SCM
Accidental_interface::print (SCM smob)
{
- Grob *me = Grob::unsmob (smob);
+ Grob *me = unsmob<Grob> (smob);
return get_stencil (me);
}