]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/make-relative.ly
Issue 5167/6: Changes: show \markup xxx = ... \etc assignments
[lilypond.git] / input / regression / make-relative.ly
index c3bf0a01d376325b98e0dfe4fb52d342dd23db3f..ee458b57a7131f9ac1ed7039e77a2d8390527c05 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.19.2"
+\version "2.19.22"
 \header {
 
   texidoc = "@code{make-relative} is a Scheme utility macro mainly
@@ -14,7 +14,7 @@ The fragment should appear identical in both cases."
 \layout { ragged-right= ##t }
 
 ph =
-#(define-music-function (parser location p1 p2 p3 p4 p5)
+#(define-music-function (p1 p2 p3 p4 p5)
   (ly:pitch? ly:pitch? ly:pitch? ly:pitch? ly:pitch?)
   (make-relative (p1 p2 p3 p4 p5) (make-event-chord (list p1 p2 p3 p4 p5))
    #{
@@ -40,8 +40,8 @@ ph =
 }
 
 \score {
-  \new PianoStaff <<
-    \compressFullBarRests
+  \new PianoStaff
+  \compressMMRests <<
     \new Staff = "up" {
       << \high \\ \middle >>
     }
@@ -69,8 +69,8 @@ ph =
 }
 
 \score {
-  \new PianoStaff <<
-    \compressFullBarRests
+  \new PianoStaff
+  \compressMMRests <<
     \new Staff = "up" {
       << \high \\ \middle >>
     }