X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fsmobs.hh;h=27f9ff4b0f8508d47ebec8532644742944cc78cc;hb=b7a0cffbf9d1069860368f289a5b50e9d1d90ba8;hp=5bd403bce45364763f307fb2014960034e146b58;hpb=e172d5758ac4e3755640dac9374bd9e7ca0c6ed6;p=lilypond.git diff --git a/lily/include/smobs.hh b/lily/include/smobs.hh index 5bd403bce4..27f9ff4b0f 100644 --- a/lily/include/smobs.hh +++ b/lily/include/smobs.hh @@ -1,9 +1,20 @@ /* - smobs.hh -- declare smob related stuff. + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1999--2009 Han-Wen Nienhuys - (c) 1999--2007 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 + 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 SMOBS_HH @@ -96,13 +107,14 @@ #define DECLARE_BASE_SMOBS(CL) \ friend class Non_existent_class; \ private: \ + static const char* smob_name_; \ static scm_t_bits smob_tag_; \ static SCM mark_smob (SCM); \ static size_t free_smob (SCM s); \ static int print_smob (SCM s, SCM p, scm_print_state*); \ public: \ static SCM equal_p (SCM a, SCM b); \ - static CL *unsmob (SCM s) \ + static CL *unsmob (SCM s) __attribute__((pure)) \ { \ if (SCM_NIMP (s) && SCM_CELL_TYPE (s) == smob_tag_) \ return (CL *) SCM_CELL_WORD_1 (s); \ @@ -142,7 +154,7 @@ void unprotect_smob (SCM smob, SCM *prot_cons); extern bool parsed_objects_should_be_dead; -#ifndef NDEDUG +#ifndef NDEBUG #define ASSERT_LIVE_IS_ALLOWED() \ static bool passed_here_once;\ if (parsed_objects_should_be_dead && !passed_here_once) { \