Encapsulate Score::header_ , and provide scheme binding for setting it.

[lilypond.git] / lily / score.cc

diff --git a/lily/score.cc b/lily/score.cc
index 5b11a0d4271b34534a809ce84f1ac68183278c83..6e1a9ff3e0d1f9af30063b2f5ec9322f77fa2f77 100644 (file)
--- a/lily/score.cc
+++ b/lily/score.cc
@@ -193,3 +193,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;
+}