2 score-scheme.cc -- implement
4 source file of the GNU LilyPond music typesetter
6 (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
14 LY_DEFINE (ly_music_scorify, "ly:music-scorify",
16 (SCM music, SCM parser),
17 "Return MUSIC encapsulated in SCORE.")
20 SCM_ASSERT_TYPE (ly_c_music_p (music), music, SCM_ARG1, __FUNCTION__, "music");
22 Score *score = new Score;
24 score->set_music (music, parser);
26 scm_gc_unprotect_object (score->self_scm ());
27 return score->self_scm ();