]> git.donarmstrong.com Git - lilypond.git/blob - lily/rest-engraver.cc
release: 1.0.1
[lilypond.git] / lily / rest-engraver.cc
1 /*
2   rest-grav.cc -- implement Rest_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "rest-engraver.hh"
10 #include "musical-request.hh"
11 #include "dots.hh"
12 #include "rest.hh"
13 /*
14   Should merge with Note_head_engraver
15  */
16 Rest_engraver::Rest_engraver ()
17 {
18   rest_req_l_ =0;
19   rest_p_ =0;
20   dot_p_ =0;
21 }
22
23 void
24 Rest_engraver::do_post_move_processing ()
25 {
26   rest_req_l_ =0;
27 }
28
29 void
30 Rest_engraver::do_pre_move_processing ()
31 {
32   if (rest_p_)
33     {
34       typeset_element (rest_p_);
35       rest_p_ =0;
36     }
37   if (dot_p_)
38     {
39       typeset_element (dot_p_);
40       dot_p_ =0;
41     }    
42 }
43
44 void
45 Rest_engraver::do_process_requests ()
46 {
47   if (rest_req_l_ && !rest_p_) 
48     {
49       rest_p_ = new Rest;
50       rest_p_->balltype_i_ = rest_req_l_->duration_.durlog_i_; 
51       rest_p_->dots_i_ = rest_req_l_->duration_.dots_i_;
52       if (rest_p_->dots_i_)
53         {
54           dot_p_ = new Dots;
55           rest_p_->dots_l_  =dot_p_;
56           announce_element (Score_element_info (dot_p_,0));
57         }
58       announce_element (Score_element_info (rest_p_, rest_req_l_));
59     }
60 }
61
62 bool
63 Rest_engraver::do_try_request (Request *r)
64 {
65   Musical_req *m = r->access_Musical_req ();
66   if (!m || !m->access_Rest_req ())
67     return false;
68
69   rest_req_l_ = m->access_Rest_req ();  // ugh
70   return true;
71 }
72
73 IMPLEMENT_IS_TYPE_B1(Rest_engraver, Engraver);
74 ADD_THIS_TRANSLATOR(Rest_engraver);