X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fduration.hh;h=b752e329b8404daa2ff603f5d36197152d4eee68;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=3376f081c0d2aeba3d7cffd538ea84c3083d6473;hpb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;p=lilypond.git diff --git a/lily/include/duration.hh b/lily/include/duration.hh index 3376f081c0..b752e329b8 100644 --- a/lily/include/duration.hh +++ b/lily/include/duration.hh @@ -1,9 +1,20 @@ /* - duration.hh -- declare Duration + This file is part of LilyPond, the GNU music typesetter. - source file of the LilyPond music typesetter + Copyright (C) 1997--2015 Jan Nieuwenhuizen - (c) 1997--2008 Jan Nieuwenhuizen + 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 DURATION_HH @@ -14,10 +25,11 @@ /** A musical duration. */ -struct Duration +struct Duration : public Simple_smob { -public: - + static SCM equal_p (SCM, SCM); + int print_smob (SCM, scm_print_state *); + static const char type_p_name_[]; Duration (); Duration (int, int); Duration (Rational, bool scale); @@ -32,7 +44,6 @@ public: static int compare (Duration const &, Duration const &); DECLARE_SCHEME_CALLBACK (less_p, (SCM a, SCM b)); - DECLARE_SIMPLE_SMOBS (Duration); private: /// Logarithm of the base duration. @@ -43,7 +54,7 @@ private: }; INSTANTIATE_COMPARE (Duration, Duration::compare); -DECLARE_UNSMOB (Duration, duration); -#endif // DURATION_HH +extern SCM Duration_type_p_proc; +#endif // DURATION_HH