X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fscheme-listener.hh;h=f7d8eac8b5c579eb1e10179f04205e133d8de2c4;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=c95347202cd69c15716518e6a0bf5ddc5243c31a;hpb=16cb456cabf477f6d398ff731aa0f10b60913394;p=lilypond.git diff --git a/lily/include/scheme-listener.hh b/lily/include/scheme-listener.hh index c95347202c..f7d8eac8b5 100644 --- a/lily/include/scheme-listener.hh +++ b/lily/include/scheme-listener.hh @@ -1,28 +1,39 @@ /* - scheme-listener.hh -- Declare Scheme_listener + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 2006--2015 Erik Sandberg - (c) 2006--2007 Erik Sandberg + 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 Free Software Foundation, either version 3 of the License, or + (at your option) any later version. + + LilyPond is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with LilyPond. If not, see . */ #ifndef SCHEME_LISTENER_HH #define SCHEME_LISTENER_HH #include "listener.hh" -#include "ly-smobs.icc" /* Scheme_listener is only used internally by scheme-listener-scheme.cc */ -class Scheme_listener +class Scheme_listener : public Smob { public: + int print_smob (SCM, scm_print_state *); + SCM mark_smob (); + virtual ~Scheme_listener (); Scheme_listener (SCM callback); DECLARE_LISTENER (call); -protected: - DECLARE_SMOBS (Scheme_listener); private: SCM callback_; };