/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 1998--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 1998--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
for (SCM s = arts; scm_is_pair (s); s = scm_cdr (s))
{
- Stream_event *ev = unsmob_stream_event (scm_car (s));
+ Stream_event *ev = Stream_event::unsmob (scm_car (s));
if (!ev)
continue;
f->set_parent (ft.head_, Y_AXIS);
f->set_property ("avoid-slur", ly_symbol2scm ("inside"));
if (hordir == LEFT
- && Grob::unsmob (ft.head_->get_object ("accidental-grob")))
+ && Grob::is_smob (ft.head_->get_object ("accidental-grob")))
Side_position_interface::add_support (f,
Grob::unsmob (ft.head_->get_object ("accidental-grob")));
- else if (Grob::unsmob (ft.head_->get_object ("dot")))
+ else if (Grob::is_smob (ft.head_->get_object ("dot")))
Side_position_interface::add_support (f,
Grob::unsmob (ft.head_->get_object ("dot")));