/*
This file is part of LilyPond, the GNU music typesetter.
- Copyright (C) 1996--2014 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ Copyright (C) 1996--2015 Han-Wen Nienhuys <hanwen@xs4all.nl>
Jan Nieuwenhuizen <janneke@gnu.org>
LilyPond is free software: you can redistribute it and/or modify
VIRTUAL_COPY_CONSTRUCTOR (Translator, Performer);
friend class Performer_group;
Performer_group *get_daddy_performer () const;
+ static Performer *unsmob (SCM perf) {
+ return dynamic_cast <Performer *> (Translator::unsmob (perf));
+ }
+ static bool is_smob (SCM perf) {
+ return Translator::is_smob (perf) && unsmob (perf);
+ }
protected:
virtual void announce_element (Audio_element_info);
virtual void create_audio_elements ();
};
-Performer *unsmob_performer (SCM perf);
-
#endif /* PERFORMER_HH */