fix tuplet example

[lilypond.git] / lily / paper-score.cc

diff --git a/lily/paper-score.cc b/lily/paper-score.cc
index bd6d3a6ede9976aeec333e0a5bca38c51f3e41f7..4a2eceef12e8e6462da1474efe5f798a537bfdd5 100644 (file)
--- a/lily/paper-score.cc
+++ b/lily/paper-score.cc
@@ -157,3 +157,9 @@ Paper_score::get_paper_systems ()
   return paper_systems_;
 }
 
+
+Paper_score *
+unsmob_paper_score (SCM x)
+{
+  return dynamic_cast<Paper_score*> (unsmob_music_output (x));
+}