]> git.donarmstrong.com Git - lilypond.git/commitdiff
Test more parts of Page_turn_engraver
authorJoe Neeman <joeneeman@gmail.com>
Sun, 7 Jan 2007 09:25:32 +0000 (11:25 +0200)
committerJoe Neeman <joeneeman@gmail.com>
Sun, 7 Jan 2007 09:25:32 +0000 (11:25 +0200)
input/regression/page-turn-page-breaking-repeats.ly [new file with mode: 0644]

diff --git a/input/regression/page-turn-page-breaking-repeats.ly b/input/regression/page-turn-page-breaking-repeats.ly
new file mode 100644 (file)
index 0000000..f43184d
--- /dev/null
@@ -0,0 +1,43 @@
+\version "2.10.0"
+
+\header {
+  texidoc = "The page-turn engraver will not count potential page
+turns if they occur in the middle of a repeat unless there is a
+long gap at the beginning or at the end of the repeat.
+"
+}
+
+\layout {
+  \context {
+    \Staff
+    \consists "Page_turn_engraver"
+  }
+}
+
+\book {
+  \paper {
+    #(define page-breaking ly:page-turn-breaking)
+    paper-height = #80
+    print-page-number = ##t
+    print-first-page-number = ##t
+  }
+
+  \score {
+    \relative {
+      \set Score.skipBars = ##t
+      % this should be kept on one page
+      \repeat volta 2 {
+       \repeat unfold 7 {a4 b c d16 d d d} R1*10
+       \repeat unfold 8 {a4 b c d16 d d d} \pageTurn
+      }
+      % use up a page
+      a4 b c d a b c d \pageBreak
+
+      % this should be allowed to have a page turn
+      \repeat volta 2 {
+       \repeat unfold 7 {a4 b c d16 d d d} R1*10
+       \repeat unfold 7 {a4 b c d16 d d d} R1*3
+      }
+    }
+  }
+}
\ No newline at end of file