From: Janek Warchoł <janek.lilypond@gmail.com>
Date: Tue, 14 Feb 2012 17:00:22 +0000 (+0100)
Subject: Add a regtest for breve extent (fix 1814)
X-Git-Tag: release/2.15.30-1~20
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=21bdfb67d92cf1f0b25329d5c1194dcdb66a29f0;hp=e8bb4dcdf244ccda234b63df0a78635cf066be4c;p=lilypond.git

Add a regtest for breve extent (fix 1814)

Checks if breves (esp. double-lined) don't collide with themselves
and accidentals.
---

diff --git a/input/regression/breve-extent.ly b/input/regression/breve-extent.ly
new file mode 100644
index 0000000000..46bb51097a
--- /dev/null
+++ b/input/regression/breve-extent.ly
@@ -0,0 +1,31 @@
+\version "2.15.13"
+
+\header  {
+  texidoc = "LilyPond knows that breves and longas are wider than whole notes
+  (because of vertical lines on their sides).  Breves and longas don't collide
+  with accidentals, barlines, neighbor notes etc.  The distance between
+  accidental and note is the same for whole notes, breves and longas."
+}
+
+{ 
+  gis'1
+  gis'\breve*1/2
+  gis'\longa*1/4
+  \override NoteHead #'style = #'altdefault 
+  gis'\breve*1/2
+}
+
+\score {
+    \new Staff {
+      \repeat unfold 8 { a'\breve*1/16 }
+      \override NoteHead #'style = #'altdefault 
+      \repeat unfold 8 { a'\breve*1/16 }
+    }
+    \layout {
+        \context {
+            \Score
+            \override SpacingSpanner
+            #'common-shortest-duration = #(ly:make-moment 1 1 )
+        }
+    }
+}