]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/regression/music-function-string-markup.ly
resolve merge
[lilypond.git] / input / regression / music-function-string-markup.ly
diff --git a/input/regression/music-function-string-markup.ly b/input/regression/music-function-string-markup.ly
new file mode 100644 (file)
index 0000000..849539a
--- /dev/null
@@ -0,0 +1,17 @@
+\version "2.14.0"
+
+\header {
+  texidoc = "Music functions accept strings as markup arguments
+when using the type predicate @code{markup?}
+"
+}
+
+testFunc =
+#(define-music-function (parser location text music) (markup? ly:music?)
+   ;; dummy function, does nothing
+   music)
+
+\relative c' {
+  \testFunc "test string"
+  c2 <c \testFunc "test string" e>
+}