X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fregression%2Frest-ledger.ly;h=f06bda4a7e3831e6afa744049f5b4756b59491ae;hb=13da8b2;hp=58e02fd7f17c1df530e5a56eed1c22d21259b385;hpb=1dff29aea8a32c30f7fcfadf8a00afa0371dbf7a;p=lilypond.git diff --git a/input/regression/rest-ledger.ly b/input/regression/rest-ledger.ly index 58e02fd7f1..f06bda4a7e 100644 --- a/input/regression/rest-ledger.ly +++ b/input/regression/rest-ledger.ly @@ -1,30 +1,41 @@ -\version "2.11.51" +\version "2.17.6" \header { -texidoc = "Whole and half rests moving outside the staff should get +texidoc = "Breve, whole and half rests moving outside the staff should get ledger lines." } -\paper { ragged-right = ##t } +\paper { ragged-right = ##t } + +rPos = +#(define-music-function (parser location y) (number?) + #{ \override Rest.staff-position = #y #}) { - \override Rest #'staff-position = #4 - r1 \override Rest #'staff-position = #5 - r1 \override Rest #'staff-position = #6 - - r1 \override Rest #'staff-position = #-6 - r1 \override Rest #'staff-position = #-7 - r1 \override Rest #'staff-position = #-8 - r1 - - \override Rest #'staff-position = #6 - r2 \override Rest #'staff-position = #7 - r2 \override Rest #'staff-position = #8 - - r2 \override Rest #'staff-position = #-4 - r2 \override Rest #'staff-position = #-5 - r2 \override Rest #'staff-position = #-6 - r2 + \set Score.timing = ##f + \rPos #2 + r\breve \rPos #4 + r \rPos #5 + r \rPos #-4 + r \rPos #-6 + r \rPos #-7 + r + + \rPos #2 + r1 \rPos #4 + r \rPos #5 + r \rPos #-6 + r \rPos #-7 + r \rPos #-8 + r + + \rPos #4 + r2 \rPos #6 + r \rPos #7 + r \rPos #-4 + r \rPos #-6 + r \rPos #-7 + r }