X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fscore.cc;h=6783e8b76292f72b6a5da6afdb4cbc9a9c732cd5;hb=0a0da41d935f7744e7ffd934034f25c40d4c59be;hp=5b11a0d4271b34534a809ce84f1ac68183278c83;hpb=f9214bac21e9926dc3248416f58190c98c4167a9;p=lilypond.git diff --git a/lily/score.cc b/lily/score.cc index 5b11a0d427..6783e8b762 100644 --- a/lily/score.cc +++ b/lily/score.cc @@ -1,9 +1,20 @@ /* - score.cc -- implement Score + This file is part of LilyPond, the GNU music typesetter. - source file of the GNU LilyPond music typesetter + Copyright (C) 1997--2009 Han-Wen Nienhuys - (c) 1997--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 . */ #include "score.hh" @@ -193,3 +204,16 @@ Score::add_output_def (Output_def *def) { defs_.push_back (def); } + +SCM +Score::get_header () const +{ + return header_; +} + +void +Score::set_header (SCM module) +{ + assert (ly_is_module (module)); + header_ = module; +}