Add regtest for mensural and neomensural time signature styles.

Add regtest for "compound" time signatures that are merely simple
fractions and compound time signatures with simple-fraction
components.

diff --git a/input/regression/compound-time-signature-style.ly b/input/regression/compound-time-signature-style.ly
new file mode 100644 (file)
index 0000000..5315361
--- /dev/null
+++ b/input/regression/compound-time-signature-style.ly
@@ -0,0 +1,14 @@
+\version "2.19.16"
+
+\header {
+    texidoc = "Simple-fraction components of a compound time signature are numeric regardless of the time signature style.
+"
+}
+
+\relative b' {
+  \compoundMeter #'(2 2) b1
+  \compoundMeter #'(4 4) b1
+  \compoundMeter #'((1 1) (2 2)) b\breve
+  \compoundMeter #'((2 2) (4 4)) b\breve
+  \compoundMeter #'((4 4) (3 3 2 8)) b\breve
+}

diff --git a/input/regression/time-signature-mensural.ly b/input/regression/time-signature-mensural.ly
new file mode 100644 (file)
index 0000000..3f80eb2
--- /dev/null
+++ b/input/regression/time-signature-mensural.ly
@@ -0,0 +1,35 @@
+\version "2.19.16"
+
+\header {
+  texidoc = "This test covers the mensural and neomensural time signature styles."
+}
+
+% N.B. It's strange that these warnings are doubled.
+#(ly:expect-warning "time signature symbol `mensural11' not found")
+#(ly:expect-warning "time signature symbol `mensural11' not found")
+#(ly:expect-warning "time signature symbol `neomensural11' not found")
+#(ly:expect-warning "time signature symbol `neomensural11' not found")
+
+\layout { indent = 0 }
+
+testMusic = \relative f' {
+    \time 4/4 \partial 4 f4
+    \time 2/2 \partial 4 f4
+    \time 6/4 \partial 4 f4
+    \time 6/8 \partial 4 f4
+    \time 3/2 \partial 4 f4
+    \time 3/4 \partial 4 f4
+    \time 9/4 \partial 4 f4
+    \time 9/8 \partial 4 f4
+    \time 4/8 \partial 4 f4
+    \time 2/4 \partial 4 f4
+    \time 1/1 \partial 4 f4
+}
+
+\new Staff {
+    \override Staff.TimeSignature.break-visibility = ##(#f #t #t)
+    \override Staff.TimeSignature.style = #'mensural
+    \testMusic \break
+    \override Staff.TimeSignature.style = #'neomensural
+    \testMusic \break
+}