]> git.donarmstrong.com Git - lilypond.git/blob - input/regression/music-function.ly
b62a5faad4fbf947c80fe9c03e1479c1a9b114ea
[lilypond.git] / input / regression / music-function.ly
1 \header
2 {
3 texidoc = "Music function are generic music transformation functions,
4 which can be used to extend music syntax seamlessly."
5
6 }
7 \version "2.3.17"
8
9 #(define myBar
10   (ly:make-music-function
11    (list string?)
12    (lambda (where type)
13     (context-spec-music
14      (context-spec-music (make-property-set 'whichBar type) 'Timing)
15      'Score))
16     
17     ))
18
19 \score{
20      {
21         d4 \myBar #"|:" d4
22         
23     }
24 }
25