/*
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
}
Score::Score (Score const &s)
+ : Smob<Score> ()
{
header_ = SCM_EOL;
music_ = SCM_EOL;
void
Score::set_music (SCM music)
{
- if (Music::unsmob (music_))
+ if (Music::is_smob (music_))
{
Music::unsmob (music)->origin ()->error (_ ("already have music in score"));
Music::unsmob (music_)->origin ()->error (_ ("this is the previous music"));