-// junk me
-Simultaneous_music*
-My_lily_parser::get_word_element (String s, Duration * duration_p)
-{
- Simultaneous_music* velt_p = new Request_chord;
-
- Lyric_req* lreq_p = new Lyric_req;
- lreq_p ->text_str_ = s;
- lreq_p->duration_ = *duration_p;
- lreq_p->set_spot (here_input());
-
- velt_p->add_music (lreq_p);
-
- delete duration_p;
- return velt_p;
-}
-
-// junk me
-Simultaneous_music *
-My_lily_parser::get_rest_element (String s, Duration * duration_p)
-{
- Simultaneous_music* velt_p = new Request_chord;
- velt_p->set_spot (here_input());
-
- if (s=="s")
- { /* Space */
- Skip_req * skip_p = new Skip_req;
- skip_p->duration_ = *duration_p;
-
- skip_p->set_spot (here_input());
- velt_p->add_music (skip_p);
- }
- else
- {
- Rest_req * rest_req_p = new Rest_req;
- rest_req_p->duration_ = *duration_p;
- rest_req_p->set_spot (here_input());
-
- velt_p->add_music (rest_req_p);
- }
-
- delete duration_p;
- return velt_p;
-}
-
-// junk me
-Simultaneous_music *
-My_lily_parser::get_chord (Musical_pitch tonic, Array<Musical_pitch>* add_arr_p, Array<Musical_pitch>* sub_arr_p, Musical_pitch* inversion_p, Duration d)
-{
- Simultaneous_music*v = new Request_chord;
- v->set_spot (here_input ());
-
- Chord chord (tonic, add_arr_p, sub_arr_p, inversion_p);
-
- Tonic_req* t = new Tonic_req;
- t->pitch_ = tonic;
- v->add_music (t);
-
- for (int i = 0; i < chord.pitch_arr_.size (); i++)
- {
- Musical_pitch p = chord.pitch_arr_[i];
- Note_req* n = new Note_req;
- n->pitch_ = p;
- n->duration_ = d;
- v->add_music (n);
- }
-
- return v;
-}
-
-