lilypond-1.5.24

diff --git a/input/regression/beam-quanting.ly b/input/regression/beam-quanting.ly
new file mode 100644 (file)
index 0000000..8339c34
--- /dev/null
+++ b/input/regression/beam-quanting.ly
@@ -0,0 +1,30 @@
+\header {
+
+texidoc = "Beam quanting can be twiddled using grob
+properties. The following example shows how Y and DY can be
+unquantised and quantised to 0 and 4 respectively."
+
+}
+
+\version "1.5.23"
+
+%{
+Have some fun beam quanting
+%}
+
+% no y quantising
+#(define (beam-vertical-position-quants m dy x y) '())
+
+% rediculous dy quanting
+#(define (beam-height-quants x y) '(0 4))
+
+\score {
+    \notes\relative c'{
+        \property Voice.Beam \override #'height-quants = #beam-height-quants
+        \property Voice.Beam \override #'vertical-position-quant-function =
+       #beam-vertical-position-quants
+        c8 c c c
+        c8 e g a
+        c,8 f b e
+    }
+}