X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fpitch.hh;h=90b4317f685e66fb72d4d20dd0c912285c4f4477;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=91c527455712cb4f6a1f388921d1328fc23d7530;hpb=f4abbfff5f0d985a457e15586dbcc3ae473b0dee;p=lilypond.git diff --git a/lily/include/pitch.hh b/lily/include/pitch.hh index 91c5274557..90b4317f68 100644 --- a/lily/include/pitch.hh +++ b/lily/include/pitch.hh @@ -1,7 +1,7 @@ /* This file is part of LilyPond, the GNU music typesetter. - Copyright (C) 1998--2014 Han-Wen Nienhuys + Copyright (C) 1998--2015 Han-Wen Nienhuys LilyPond is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -32,8 +32,13 @@ Pitch is lexicographically ordered by (octave, notename, alteration). */ -class Pitch +class Pitch : public Simple_smob { +public: + static SCM equal_p (SCM, SCM); + int print_smob (SCM, scm_print_state *); + SCM mark_smob (); + static const char type_p_name_[]; private: int octave_; int notename_; @@ -70,7 +75,6 @@ public: string to_string () const; DECLARE_SCHEME_CALLBACK (less_p, (SCM a, SCM b)); - DECLARE_SIMPLE_SMOBS (Pitch); }; enum