]> git.donarmstrong.com Git - lilypond.git/blobdiff - scm/ly-syntax-constructors.scm
* python/convertrules.py (conv): warning on \tempo{}
[lilypond.git] / scm / ly-syntax-constructors.scm
index f4d23debdbfbbde88884fce1b441c773e92ee116..23befc939e7b0605b556e465f4afed901cde5936 100644 (file)
   (make-music 'TransposedMusic
              'element (ly:music-transpose music pitch)))
 
+(define-ly-syntax-simple (tempo duration tempo)
+  (context-spec-music
+   (make-sequential-music
+    (list
+     (make-property-set 'tempoWholesPerMinute
+                       (ly:moment-mul (ly:make-moment tempo 1)
+                                      (ly:duration-length duration)))
+     (make-property-set 'tempoUnitDuration duration)
+     (make-property-set 'tempoUnitCount tempo)))
+   'Score))
+
 (define-ly-syntax-simple (skip-music dur)
   (make-music 'SkipMusic
              'duration dur))