lilypond-1.3.66
[lilypond.git] / lily / rest-engraver.cc
blob96f34bfe961eab776a46db7a0f52970f130870f4
1 /*
2 rest-grav.cc -- implement Rest_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8 #include "staff-symbol-referencer.hh"
9 #include "rest-engraver.hh"
10 #include "musical-request.hh"
11 #include "dots.hh"
12 #include "rest.hh"
15 Should merge with Note_head_engraver
17 Rest_engraver::Rest_engraver ()
19 rest_req_l_ =0;
20 rest_p_ =0;
21 dot_p_ =0;
24 void
25 Rest_engraver::do_post_move_processing ()
27 rest_req_l_ =0;
30 void
31 Rest_engraver::do_pre_move_processing ()
33 if (rest_p_)
35 typeset_element (rest_p_);
36 rest_p_ =0;
38 if (dot_p_)
40 typeset_element (dot_p_);
41 dot_p_ =0;
45 void
46 Rest_engraver::do_process_music ()
48 if (rest_req_l_ && !rest_p_)
50 rest_p_ = new Rest (get_property ("basicRestProperties"));
51 Staff_symbol_referencer_interface si (rest_p_);
52 si.set_interface ();
54 rest_p_->set_elt_property ("duration-log",
55 gh_int2scm (rest_req_l_->duration_.durlog_i_));
57 if (rest_req_l_->duration_.dots_i_)
59 dot_p_ = new Item (get_property ("basicDotsProperties"));
61 Staff_symbol_referencer_interface si (dot_p_);
62 si.set_interface ();
64 rest_p_->add_dots (dot_p_);
65 dot_p_->set_elt_property ("dot-count",
66 gh_int2scm (rest_req_l_->duration_.dots_i_));
67 announce_element (Score_element_info (dot_p_,0));
70 announce_element (Score_element_info (rest_p_, rest_req_l_));
74 bool
75 Rest_engraver::do_try_music (Music *req)
77 if (Rest_req *r = dynamic_cast <Rest_req *> (req))
79 rest_req_l_ = r;
80 return true;
82 return false;
86 ADD_THIS_TRANSLATOR(Rest_engraver);