-/*
- repeated-music.cc -- implement Repeated_music
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1999--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-
-#include "repeated-music.hh"
-#include "music-list.hh"
-#include "pitch.hh"
-#include "debug.hh"
-
-Music *
-Repeated_music::body ()const
-{
- return unsmob_music (get_mus_property ("element"));
-}
-
-SCM
-Repeated_music::alternatives ()const
-{
- return get_mus_property ("elements");
-}
-