lilypond-0.0.56

diff --git a/lily/my-lily-parser.cc b/lily/my-lily-parser.cc
index 73761360f9cd025f2ed8a70e3a621f13df2530a5..21645d93bc6dd4838a06b5668012485bd07065ba 100644 (file)
--- a/lily/my-lily-parser.cc
+++ b/lily/my-lily-parser.cc
@@ -140,6 +140,11 @@ My_lily_parser::get_rest_element(String,  Duration * duration_p )
     rest_req_p->set_spot( here_input());
 
     velt_p->add(rest_req_p);
+    
+    Stem_req * stem_p = new Stem_req;
+    stem_p->duration_ = *duration_p;
+    stem_p->set_spot ( here_input ());
+    velt_p->add(stem_p);
     delete duration_p;
     return velt_p;
 }
@@ -149,6 +154,8 @@ My_lily_parser::get_note_element(Note_req *rq, Duration * duration_p )
 {
     Voice_element*v = new Voice_element;
     v->set_spot( here_input());
+
+    v->add(rq);
     
     if (duration_p->type_i_ >= 2) {
        Stem_req * stem_req_p = new Stem_req();
@@ -160,9 +167,6 @@ My_lily_parser::get_note_element(Note_req *rq, Duration * duration_p )
 
     rq->set_duration(*duration_p);
     rq->set_spot( here_input());
-
-
-    v->add(rq);
     delete duration_p ;
     return v;
 }

diff --git a/lily/parser.y b/lily/parser.y
index ec5646b8d41676ef5fb2fa190937e1c5ea068966..f0e6481f34ab64b21950e12df73ffe22c94f6b77 100644 (file)
--- a/lily/parser.y
+++ b/lily/parser.y
@@ -985,6 +985,7 @@ voice_elt:
        steno_note_req notemode_duration                {
                if (!THIS->lexer_p_->note_state_b())
                        THIS->parser_error("have to be in Note mode for notes");
+               $1->set_duration (*$2);
                $$ = THIS->get_note_element($1, $2);
        }
        | RESTNAME notemode_duration            {