X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fprofile.cc;h=dd38f0425b75ff73c6b3cb6be7e5a4521e682fc7;hb=47db9a3883d726ca53e2133a3b2298f78dd6a32e;hp=02c7da9e9b60eb0339e5cfa1626605d878ff875f;hpb=7f3f0083f89d87c5ed0422858e9648fc759e98a4;p=lilypond.git diff --git a/lily/profile.cc b/lily/profile.cc index 02c7da9e9b..dd38f0425b 100644 --- a/lily/profile.cc +++ b/lily/profile.cc @@ -1,9 +1,20 @@ /* - profile.cc -- implement profiling utilities. + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 2005--2015 Han-Wen Nienhuys - (c) 2005--2008 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 . */ #include "profile.hh" @@ -15,24 +26,23 @@ SCM grob_property_lookup_table; SCM prob_property_lookup_table; LY_DEFINE (ly_property_lookup_stats, "ly:property-lookup-stats", - 1, 0, 0, (SCM sym), - "Return hash table with a property access corresponding to" - " @var{sym}. Choices are @code{prob}, @code{grob}, and" - " @code{context}.") + 1, 0, 0, (SCM sym), + "Return hash table with a property access corresponding to" + " @var{sym}. Choices are @code{prob}, @code{grob}, and" + " @code{context}.") { if (sym == ly_symbol2scm ("context")) return context_property_lookup_table ? context_property_lookup_table - : scm_c_make_hash_table (1); + : scm_c_make_hash_table (1); if (sym == ly_symbol2scm ("prob")) return prob_property_lookup_table ? prob_property_lookup_table - : scm_c_make_hash_table (1); + : scm_c_make_hash_table (1); if (sym == ly_symbol2scm ("grob")) return grob_property_lookup_table ? grob_property_lookup_table - : scm_c_make_hash_table (1); + : scm_c_make_hash_table (1); return scm_c_make_hash_table (1); } - void note_property_access (SCM *table, SCM sym) {