From: David Kastrup <dak@gnu.org>
Date: Fri, 27 Sep 2013 16:22:35 +0000 (+0200)
Subject: Add regtest for Grace_auto_beam_engraver
X-Git-Tag: release/2.17.28-1~6
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=62f371d80be2d5c98452d7feb447b6c19bfc5ce6;p=lilypond.git

Add regtest for Grace_auto_beam_engraver
---

diff --git a/input/regression/grace-auto-beam-engraver.ly b/input/regression/grace-auto-beam-engraver.ly
new file mode 100644
index 0000000000..4e7ff31b57
--- /dev/null
+++ b/input/regression/grace-auto-beam-engraver.ly
@@ -0,0 +1,40 @@
+\version "2.17.28"
+
+\header
+{
+  texidoc = "A separate @samp{Grace_auto_beam_engraver} initiates
+autobeaming at the start of each @code{\\grace} command."
+}
+
+\layout { short-indent = 1\cm  indent = 2\cm }
+
+music = {
+  \mark "manual"
+  \relative c'' {
+    \grace {a8[ b] } a1 
+    \grace {a8[ b c b gis] } a1 
+    \grace {a8[ b c32 b c16 gis] } a1
+    \grace {a8[ b c16 d] c4 b8[ gis] } a1
+    \grace {a8[ b c16 d] c4 b8 a b\fermata a16[ gis] } a1
+  } \break
+  \mark "automatic"
+  \relative c'' {
+    \grace {a8 b } a1
+    \grace {a8 b c b gis } a1
+    \grace {a8 b c32 b c16 gis } a1
+    \grace {a8 b c16 d c4 b8 gis } a1
+    \grace {a8 b c16 d c4 b8 a b\fermata a16 gis } a1
+  }
+}
+
+\score {
+  <<
+    \new Staff \with { instrumentName = \markup \center-column
+		       { without engraver } }
+    \new Voice \with { \remove "Grace_auto_beam_engraver" }
+               \music
+    \new Staff \with { instrumentName = \markup \center-column
+		       { with engraver } }
+    \new Voice \music
+  >>
+}