input/regression/music-function.ly

   1 \header
   2 {
   3
   4 texidoc = "Music function are generic music transformation functions,
   5 which can be used to extend music syntax seamlessly.  Here we
   6 demonstrate a @code{\myBar} function, which works similar to
   7 @code{\bar}, but is implemented completely in Scheme."
   8
   9 }
  10 \version "2.4.0"
  11
  12 #(define myBar
  13   (ly:make-music-function
  14    (list string?)
  15    (lambda (where type)
  16     (context-spec-music
  17      (context-spec-music (make-property-set 'whichBar type) 'Timing)
  18      'Score))
  19     ))
  20
  21 \layout { raggedright = ##t }
  22
  23 {
  24     d4 \myBar #"|:" d4
  25 }
  26