]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/define-event-function.ly
0778c2121b1bad2b5c09da715e23354a05a1e7d1
[lilypond.git] / input / regression / define-event-function.ly
1 \version "2.15.13"
2
3 \header{
4
5   texidoc= "Tests @code{define-event-function} by creating a trivial
6 function converting a markup into a dynamic script post-event.  As
7 opposed to music functions, a direction indicator is not required."
8
9 }
10
11 \layout { ragged-right = ##t }
12
13 dynScript =
14 #(define-event-function (parser location text) (markup?)
15    (make-dynamic-script text))
16
17 \relative c' {
18   c1\dynScript pp
19   c^\dynScript "fp"
20   c_\dynScript "spz"
21 }
22