CVSROOT: /cvsroot/lilypond Module name: lilypond Branch: Changes by: Han-Wen Nienhuys <[EMAIL PROTECTED]> 05/07/21 16:20:24
Modified files: . : ChangeLog Documentation/user: basic-notation.itely lily : lyric-engraver.cc ly : music-functions-init.ly Log message: * Documentation/user/basic-notation.itely (Barnumber check): add section. * lily/lyric-engraver.cc (process_music): don't typeset text for _ syllable text. Instead, assume that the previous lyric text is a melismated text. CVSWeb URLs: http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ChangeLog.diff?tr1=1.3907&tr2=1.3908&r1=text&r2=text http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/Documentation/user/basic-notation.itely.diff?tr1=1.29&tr2=1.30&r1=text&r2=text http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/lyric-engraver.cc.diff?tr1=1.81&tr2=1.82&r1=text&r2=text http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ly/music-functions-init.ly.diff?tr1=1.29&tr2=1.30&r1=text&r2=text Patches: Index: lilypond/ChangeLog diff -u lilypond/ChangeLog:1.3907 lilypond/ChangeLog:1.3908 --- lilypond/ChangeLog:1.3907 Thu Jul 21 14:45:52 2005 +++ lilypond/ChangeLog Thu Jul 21 16:20:24 2005 @@ -1,5 +1,7 @@ 2005-07-21 Han-Wen Nienhuys <[EMAIL PROTECTED]> + * Documentation/user/basic-notation.itely (Barnumber check): add section. + * scm/music-functions.scm (skip-to-last): new function. Show only last showLastLength part of the \score. Index: lilypond/Documentation/user/basic-notation.itely diff -u lilypond/Documentation/user/basic-notation.itely:1.29 lilypond/Documentation/user/basic-notation.itely:1.30 --- lilypond/Documentation/user/basic-notation.itely:1.29 Thu Jul 21 14:53:42 2005 +++ lilypond/Documentation/user/basic-notation.itely Thu Jul 21 16:20:24 2005 @@ -490,6 +490,7 @@ * Octave check:: * Transpose:: * Bar check:: +* Barnumber check:: * Skipping corrected music:: * Automatic note splitting:: @end menu @@ -747,6 +748,23 @@ { c'2 c' | c'2 c' } @end lilypond + + [EMAIL PROTECTED] Barnumber check [EMAIL PROTECTED] Barnumber check + +When copying large pieces of music, it can be helpful to check that +the LilyPond bar number corresponds to the original that you are +entering from. This can be checked with @code{\barNumberCheck}, for +example, + [EMAIL PROTECTED] +\barNumberCheck #123 [EMAIL PROTECTED] verbatim + [EMAIL PROTECTED] +will print a warning if the @code{currentBarNumber} is not 123 when it +is processed. @node Skipping corrected music Index: lilypond/lily/lyric-engraver.cc diff -u lilypond/lily/lyric-engraver.cc:1.81 lilypond/lily/lyric-engraver.cc:1.82 --- lilypond/lily/lyric-engraver.cc:1.81 Thu Jul 21 14:45:55 2005 +++ lilypond/lily/lyric-engraver.cc Thu Jul 21 16:20:24 2005 @@ -40,6 +40,7 @@ Lyric_engraver::Lyric_engraver () { text_ = 0; + last_text_ = 0; event_ = 0; } Index: lilypond/ly/music-functions-init.ly diff -u lilypond/ly/music-functions-init.ly:1.29 lilypond/ly/music-functions-init.ly:1.30 --- lilypond/ly/music-functions-init.ly:1.29 Fri Jul 8 21:34:52 2005 +++ lilypond/ly/music-functions-init.ly Thu Jul 21 16:20:24 2005 @@ -190,6 +190,20 @@ (make-music 'GraceMusic 'element grace))))))) + +barNumberCheck = +#(def-music-function (parser location n) (integer?) + (make-music 'ApplyContext + 'origin location + 'procedure + (lambda (c) + (let* + ((cbn (ly:context-property c 'currentBarNumber))) + (if (not (= cbn n)) + (ly:input-message location "Barcheck failed got ~a expect ~a" + cbn n)))))) + + %{ TODO: @@ -204,3 +218,4 @@ * ? %} + _______________________________________________ Lilypond-cvs mailing list Lilypond-cvs@gnu.org http://lists.gnu.org/mailman/listinfo/lilypond-cvs