Extend regtest rest-dot-position.ly up to four voices (issue 331150043 by address@hidden)

[thomasmorley65]

Reviewers: ,

Message:
Please review.

Description:
Extend regtest rest-dot-position.ly up to four voices

Please review this at https://codereview.appspot.com/331150043/

Affected files (+22, -22 lines):
  M input/regression/rest-dot-position.ly


Index: input/regression/rest-dot-position.ly
diff --git a/input/regression/rest-dot-position.ly  
b/input/regression/rest-dot-position.ly
index  
649ac2c463f2892dd044625c512c3fa76337e09f..41b8a57a830bc72e40f1f2a7607a41bb80c0deff  
100644
--- a/input/regression/rest-dot-position.ly
+++ b/input/regression/rest-dot-position.ly
@@ -9,27 +9,27 @@
 \layout { indent = 0 }
 \paper { ragged-right = ##t }

-{
-    \set Score.timing = ##f
-    \set Score.initialTimeSignatureVisibility = #(vector #f #f #f)
-    r\longa. r\breve.
-    r1. r2. r4.
-    \once \override Rest.style = #'classical r4.
-    \once \override Rest.style = #'z r4.
-    r8. r16. r32. r64. r64.
-    \bar ""
-    << {
-        r\longa. r\breve.
-        r1. r2. r4.
-        \once \override Rest.style = #'classical r4.
-        \once \override Rest.style = #'z r4.
-        r8. r16. r32. r64. r64.
-    } \\ {
-        r\longa. r\breve.
-        r1. r2. r4.
-        \once \override Rest.style = #'classical r4.
-        \once \override Rest.style = #'z r4.
-        r8. r16. r32. r64. r64.
-    } >>
+mus = {
+  r\longa. r\breve.
+  r1. r2. r4.
+  \once \override Rest.style = #'classical r4.
+  \once \override Rest.style = #'z r4.
+  r8. r16. r32. r64. r64.
+}

+vI = \new Voice { \voiceOne   \mus }
+vII = \new Voice { \voiceTwo   \mus }
+vIII = \new Voice { \voiceThree \mus }
+vIV = \new Voice { \voiceFour  \mus }
+
+{
+  \set Score.timing = ##f
+  \set Score.initialTimeSignatureVisibility = ##(#f #f #f)
+  \mus
+  \bar "" \break
+  << \vI \vII >>
+  \bar "" \break
+  << \vI \vII \vIII >>
+  \bar "" \break
+  << \vI \vII \vIII \vIV >>
 }