CVSROOT:        /cvsroot/lilypond
Module name:    lilypond
Branch:         
Changes by:     Han-Wen Nienhuys <[EMAIL PROTECTED]>    05/04/18 12:47:17

Modified files:
        lily           : paper-book.cc 

Log message:
        * lily/text-spanner.cc: add bound-padding.
        
        * lily/paper-book.cc (systems): accept Paper_score
        iso. Paper_system vector.
        
        * lily/line-interface.cc (make_arrow): new function. Patch by
        Jonatan Liljedahl <http://kymatica.com>
        (arrows): idem.
        
        * lily/line-spanner.cc (line_stencil): add arrows.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/paper-book.cc.diff?tr1=1.105&tr2=1.106&r1=text&r2=text

Patches:
Index: lilypond/lily/paper-book.cc
diff -u lilypond/lily/paper-book.cc:1.105 lilypond/lily/paper-book.cc:1.106
--- lilypond/lily/paper-book.cc:1.105   Mon Apr 18 12:29:24 2005
+++ lilypond/lily/paper-book.cc Mon Apr 18 12:47:17 2005
@@ -265,23 +265,31 @@
          if (header_0_ == SCM_EOL)
            header_0_ = header;
        }
-      else if (Paper_score *pscore
-              = dynamic_cast<Paper_score *> (unsmob_music_output (scm_car 
(s))))
+      else if (Music_output *mop = unsmob_music_output (scm_car (s)))
+       
        {
-         add_score_title (header);
+         if (Paper_score *pscore = dynamic_cast<Paper_score *> (mop))
+           {
+             add_score_title (header);
          
-         header = SCM_EOL;
-
+             header = SCM_EOL;
          
-         SCM system_list = scm_vector_to_list (pscore->get_paper_systems ());
-         system_list = scm_reverse (system_list);
-         systems_ = scm_append (scm_list_2 (system_list, systems_));
+             SCM system_list = scm_vector_to_list (pscore->get_paper_systems 
());
+             system_list = scm_reverse (system_list);
+             systems_ = scm_append (scm_list_2 (system_list, systems_));
+           }
+         else
+           {
+             /*
+               Ignore MIDI
+             */
+           }
        }
       else if (scm_is_vector (scm_car (s)))
        {
          /*
            UGH. code dup.  
-          */
+         */
          add_score_title (header);
          header = SCM_EOL;
          


_______________________________________________
Lilypond-cvs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs

Reply via email to