X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fscm-hash.hh;h=d14997676add36b8419b022bec71513e7c539b54;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=9d1bcf8ca74effb26bb120475d3554b0ad4d380b;hpb=28558088e9af7cf017835c03838755499c654d07;p=lilypond.git diff --git a/lily/include/scm-hash.hh b/lily/include/scm-hash.hh index 9d1bcf8ca7..d14997676a 100644 --- a/lily/include/scm-hash.hh +++ b/lily/include/scm-hash.hh @@ -1,9 +1,20 @@ /* - scm-hash.hh -- declare Scheme hasher. + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1999--2015 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 SCM_HASH_HH @@ -32,9 +43,12 @@ scm_gc_unprotect_object (tab->self_scm_); */ -class Scheme_hash_table +class Scheme_hash_table : public Smob { public: + int print_smob (SCM, scm_print_state *); + SCM mark_smob (); + virtual ~Scheme_hash_table (); bool try_retrieve (SCM key, SCM *val); bool contains (SCM key) const; void set (SCM k, SCM v); @@ -48,8 +62,6 @@ public: private: SCM hash_tab_; void copy (Scheme_hash_table const &src); - DECLARE_SMOBS (Scheme_hash_table); }; #endif /* SCM_HASH_HH */ -