2 lyric-performer.cc -- implement Lyric_performer
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2000 Jan Nieuwenhuizen <janneke@gnu.org>
9 #include "lyric-performer.hh"
10 #include "musical-request.hh"
11 #include "audio-item.hh"
13 ADD_THIS_TRANSLATOR (Lyric_performer);
15 Lyric_performer::Lyric_performer ()
22 Lyric_performer::deprecated_process_music ()
24 // FIXME: won't work with fancy lyrics
26 && gh_string_p (lreq_arr_[0]->get_mus_property ("text"))
27 && ly_scm2string (lreq_arr_[0]->get_mus_property ("text")).length_i ())
29 audio_p_ = new Audio_text (Audio_text::LYRIC,
30 ly_scm2string (lreq_arr_[0]->get_mus_property ("text")));
31 Audio_element_info info (audio_p_, lreq_arr_[0]);
32 announce_element (info);
38 Lyric_performer::do_pre_move_processing ()
42 play_element (audio_p_);
49 Lyric_performer::do_try_music (Music* req_l)
51 if (Lyric_req *lr = dynamic_cast <Lyric_req *> (req_l))