Imported Upstream version 2.14.2

[lilypond.git] / input / regression / music-function-post-event.ly

diff --git a/input/regression/music-function-post-event.ly b/input/regression/music-function-post-event.ly
new file mode 100644 (file)
index 0000000..77346dc
--- /dev/null
+++ b/input/regression/music-function-post-event.ly
@@ -0,0 +1,22 @@
+\version "2.14.0"
+
+\header
+{
+
+  texidoc = "Music functions may be attached to notes;
+in this case they must be introduced by a direction
+indicator.  If a non-neutral direction is given (i.e.
+anything else than a dash), then the 'direction property
+of the resulting object is set accordingly."
+
+}
+
+dynScript =
+#(define-music-function (parser location text) (string?)
+   (make-dynamic-script text))
+
+\relative c' {
+  c1-\dynScript "pp"
+  c^\dynScript "fp"
+  c_\dynScript "spz"
+}