]> git.donarmstrong.com Git - lilypond.git/blob - input/test/scheme-interactions.ly
* lily/identifier-smob.cc (unpack_identifier): new file.
[lilypond.git] / input / test / scheme-interactions.ly
1
2 \header {
3
4     texidoc = "With @code{ly-id}, you can pass of the result of
5 Scheme expressions as lilypond input. Within a Scheme expression, you
6 can use, define or change lilypond variables. "
7
8 }
9
10
11 foo = \notes \transpose c' { d''4-. }
12 bra = \notes \transpose c' { e'4-. }
13
14 \score { 
15   \context Voice \notes\relative c' {
16       c4
17       #(ly-id (make-sequential-music (list foo foo foo )))
18       #(begin (define baz (make-simultaneous-music (list foo bra)))
19         (empty-music))
20       c4
21       \baz
22       c4
23   }
24 }