- set_mus_property ("music", m->self_scm_);
- set_mus_property ("lyrics", l->self_scm_);
-}
-
-
-void
-Lyric_combine_music::transpose (Musical_pitch p)
-{
- music_l ()->transpose (p);
- lyrics_l () ->transpose (p);
-}
-
-void
-Lyric_combine_music::do_print () const
-{
- music_l ()->print();
- lyrics_l () ->print ();