input/regression/music-head.ly

   1 \header
   2 {
   3 texidoc = "Music heads are generic music transformation functions,
   4 which can be used to extend music syntax seamlessly."
   5
   6 }
   7 \version "2.3.1"
   8
   9 #(define myBar
  10   (ly:make-music-head
  11    (lambda (where type)
  12     (context-spec-music
  13      (context-spec-music (make-property-set whichBar type) 'Timing)
  14      'Score))
  15    (list string?)
  16
  17     ))
  18
  19 \score{
  20     \notes {
  21         d4 \myBar #"|:" d4
  22
  23     }
  24 }
  25