Singing tests added

14 files changed, 271 insertions, 0 deletions

diff --git a/input/regression/song-associated-voice.ly b/input/regression/song-associated-voice.ly
new file mode 100644
index 0000000000..ff62c03b1d
--- /dev/null
+++ b/input/regression/song-associated-voice.ly
@@ -0,0 +1,18 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-associated-voice.xml" { \tempo 4 = 100 }
+\relative c'
+{
+<< \context Voice = melody {
+     \time 3/4
+     c2 e4 g2.
+  }
+  \new Lyrics \lyricmode {
+    \set associatedVoice = #"melody"
+    play2 the4 game2.
+  } >>
+}
+#(display "song-associated-voice")
+#(ly:progress "~a" (ly:gulp-file "song-associated-voice.xml"))
diff --git a/input/regression/song-basic-nonenglish.ly b/input/regression/song-basic-nonenglish.ly
new file mode 100644
index 0000000000..06d1dbdae1
--- /dev/null
+++ b/input/regression/song-basic-nonenglish.ly
@@ -0,0 +1,11 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festivalsyl #"song-basic-nonenglish.xml" { \tempo 4 = 100 }
+{
+\relative { c e g r }
+\addlyrics { ov -- čá -- ci }
+}
+#(display "song-basic-nonenglish")
+#(ly:progress "~a" (ly:gulp-file "song-basic-nonenglish.xml"))
diff --git a/input/regression/song-basic.ly b/input/regression/song-basic.ly
new file mode 100644
index 0000000000..80b898fe96
--- /dev/null
+++ b/input/regression/song-basic.ly
@@ -0,0 +1,12 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-basic.xml" { \tempo 4 = 100 }
+{
+\time 3/4
+\relative { c2 r2 e4 g2. }
+\addlyrics { play the game }
+}
+#(display "song-basic")
+#(ly:progress "~a" (ly:gulp-file "song-basic.xml"))
diff --git a/input/regression/song-breathe.ly b/input/regression/song-breathe.ly
new file mode 100644
index 0000000000..091bc2fc5e
--- /dev/null
+++ b/input/regression/song-breathe.ly
@@ -0,0 +1,12 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-breathe.xml" { \tempo 4 = 100 }
+{
+\time 3/4
+\relative { c2 e \breathe g }
+\addlyrics { play the game }
+}
+#(display "song-breathe")
+#(ly:progress "~a" (ly:gulp-file "song-breathe.xml"))
diff --git a/input/regression/song-melisma.ly b/input/regression/song-melisma.ly
new file mode 100644
index 0000000000..5ab5ffc6bd
--- /dev/null
+++ b/input/regression/song-melisma.ly
@@ -0,0 +1,23 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-melisma.xml" { \tempo 4 = 100 }
+\relative c''
+{
+<<
+  \context Voice = "lala" {
+    \time 3/4
+    f4 g8
+    \melisma
+    f e f
+    \melismaEnd
+    e2
+  }
+  \lyricsto "lala" \new Lyrics {
+    la di __ daah
+  }
+>>
+}
+#(display "song-melisma")
+#(ly:progress "~a" (ly:gulp-file "song-melisma.xml"))
diff --git a/input/regression/song-reordering.ly b/input/regression/song-reordering.ly
new file mode 100644
index 0000000000..b8470d4fde
--- /dev/null
+++ b/input/regression/song-reordering.ly
@@ -0,0 +1,37 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-reordering.xml" { \tempo 4 = 100 }
+<<
+  \relative \context Voice = "lahlah" {
+    \set Staff.autoBeaming = ##f
+    c4
+    <<
+      \context Voice = alternative {
+        \voiceOne
+        \times 2/3 {
+          \override NoteColumn #'force-hshift = #-3
+          f8 f g
+        }
+      }
+      {
+        \voiceTwo
+        f8.[ g16]
+        \oneVoice
+      } >>
+    a8( b) c
+  }
+  \new Lyrics \lyricsto "lahlah" {
+    Ju -- ras -- sic Park
+  }
+  \new Lyrics \lyricsto "lahlah" {
+    \set associatedVoice = alternative % applies to "ran"
+    Ty --
+    ran --
+    no --
+    \set associatedVoice = lahlah % applies to "rus"
+    sau -- rus Rex
+  } >>
+#(display "song-reordering")
+#(ly:progress "~a" (ly:gulp-file "song-reordering.xml"))
diff --git a/input/regression/song-reordering2.ly b/input/regression/song-reordering2.ly
new file mode 100644
index 0000000000..f0bef6576d
--- /dev/null
+++ b/input/regression/song-reordering2.ly
@@ -0,0 +1,38 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-reordering2.xml" { \tempo 4 = 100 }
+<<
+  \relative \context Voice = "lahlah" {
+    \set Staff.autoBeaming = ##f
+    c4
+    <<
+      {
+        \voiceTwo
+        f8.[ g16]
+        \oneVoice
+      }
+      \context Voice = alternative {
+        \voiceOne
+        \times 2/3 {
+          \override NoteColumn #'force-hshift = #-3
+          f8 f g
+        }
+      }
+    >>
+    a8( b) c
+  }
+  \new Lyrics \lyricsto "lahlah" {
+    Ju -- ras -- sic Park
+  }
+  \new Lyrics \lyricsto "lahlah" {
+    \set associatedVoice = alternative % applies to "ran"
+    Ty --
+    ran --
+    no --
+    \set associatedVoice = lahlah % applies to "rus"
+    sau -- rus Rex
+  } >>
+#(display "song-reordering2")
+#(ly:progress "~a" (ly:gulp-file "song-reordering2.xml"))
diff --git a/input/regression/song-repetition.ly b/input/regression/song-repetition.ly
new file mode 100644
index 0000000000..e929d0ee7e
--- /dev/null
+++ b/input/regression/song-repetition.ly
@@ -0,0 +1,22 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\score{
+\festival #"song-repetition.xml" { \tempo 4 = 100 }
+<<
+  \context Voice = melody \relative c' {
+    c2 e4 r4 | g2 e | c1 |
+    \context Voice = verse \repeat volta 2 {c4 d e f | g1 | }
+    a2 b | c1}
+  \lyricsto melody  \context Lyrics = mainlyrics \lyricmode {
+    do mi sol mi do
+    la si do }
+  \lyricsto verse \context Lyrics = mainlyrics \lyricmode {
+   do re mi fa sol }
+  \lyricsto verse \context Lyrics = repeatlyrics \lyricmode {
+   dodo rere mimi fafa solsol }
+>>
+}
+#(display "song-repetition")
+#(ly:progress "~a" (ly:gulp-file "song-repetition.xml"))
diff --git a/input/regression/song-skip-noword.ly b/input/regression/song-skip-noword.ly
new file mode 100644
index 0000000000..806973f12e
--- /dev/null
+++ b/input/regression/song-skip-noword.ly
@@ -0,0 +1,13 @@
+\version "2.11.16"
+
+\include "festival.ly"
+#(set! *skip-word* #f)
+
+\festival #"song-skip-noword.xml" { \tempo 4 = 100 }
+\relative { c c g' }
+\addlyrics {
+  twin -- \skip 4
+  kle
+}
+#(display "song-skip-noword")
+#(ly:progress "~a" (ly:gulp-file "song-skip-noword.xml"))
diff --git a/input/regression/song-skip.ly b/input/regression/song-skip.ly
new file mode 100644
index 0000000000..5762603caf
--- /dev/null
+++ b/input/regression/song-skip.ly
@@ -0,0 +1,12 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-skip.xml" { \tempo 4 = 100 }
+\relative { c c g' }
+\addlyrics {
+  twin -- \skip 4
+  kle
+}
+#(display "song-skip")
+#(ly:progress "~a" (ly:gulp-file "song-skip.xml"))
diff --git a/input/regression/song-slurs.ly b/input/regression/song-slurs.ly
new file mode 100644
index 0000000000..7dc199fb71
--- /dev/null
+++ b/input/regression/song-slurs.ly
@@ -0,0 +1,25 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-slurs.xml" { \tempo 4 = 100 }
+<<
+  \relative \context Voice = "lahlah" {
+    \set Staff.autoBeaming = ##f
+    c4
+    \slurDotted
+    f8.[( g16])
+    a4
+  }
+  \new Lyrics \lyricsto "lahlah" {
+    more slow -- ly
+  }
+  \new Lyrics \lyricsto "lahlah" {
+    \set ignoreMelismata = ##t % applies to "fas"
+    go fas -- ter
+    \unset ignoreMelismata
+    still
+  }
+>>
+#(display "song-slurs")
+#(ly:progress "~a" (ly:gulp-file "song-slurs.xml"))
diff --git a/input/regression/song-splitpart.ly b/input/regression/song-splitpart.ly
new file mode 100644
index 0000000000..bfb901ea24
--- /dev/null
+++ b/input/regression/song-splitpart.ly
@@ -0,0 +1,22 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\score{
+\festival #"song-splitpart.xml" { \tempo 4 = 100 }
+<<
+  \context Voice = "melody" {
+    \relative c' {
+      c4
+      <<
+        { \voiceOne c8 e }
+        \context Voice = splitpart { \voiceTwo c4 }
+      >>
+      \oneVoice c4 c | c
+    }
+  }
+  \new Lyrics \lyricsto "melody" { we shall not o- ver- come }
+  \new Lyrics \lyricsto "splitpart" { will }
+>> }
+#(display "song-splitpart")
+#(ly:progress "~a" (ly:gulp-file "song-splitpart.xml"))
diff --git a/input/regression/song-stanzas.ly b/input/regression/song-stanzas.ly
new file mode 100644
index 0000000000..0a85f878c3
--- /dev/null
+++ b/input/regression/song-stanzas.ly
@@ -0,0 +1,14 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-stanzas.xml" { \tempo 4 = 100 }
+{
+\time 3/4
+\relative { c2 e4 g2. }
+\addlyrics { play the game }
+\addlyrics { speel het spel }
+\addlyrics { joue le jeu }
+}
+#(display "song-stanzas")
+#(ly:progress "~a" (ly:gulp-file "song-stanzas.xml"))
diff --git a/input/regression/song-tempo.ly b/input/regression/song-tempo.ly
new file mode 100644
index 0000000000..934039bfa1
--- /dev/null
+++ b/input/regression/song-tempo.ly
@@ -0,0 +1,12 @@
+\version "2.11.16"
+
+\include "festival.ly"
+
+\festival #"song-tempo.xml" { \tempo 4=90 }
+{
+\time 3/4
+\relative { c4 e g \tempo 4=60 c, e g }
+\addlyrics { do re mi do re mi }
+}
+#(display "song-tempo")
+#(ly:progress "~a" (ly:gulp-file "song-tempo.xml"))