Am 27.12.2012 18:55, schrieb David Kastrup:
Marc Hohl <m...@hohlart.de> writes:

[...]

Any hints are highly welcome!
#(string-append ...) is a string.

Maybe you want something like

$(module-ref (current-module) (string->symbol ...))

or

$(ly:parser-lookup parser (string->symbol ...))

Not particularly fond of this kind of interface, though.
David, thanks for your quick answer!

For the record: I defined

#(define (clo-score prefix) ;; command line option score
   (let ((option (symbol->string
           (or (ly:get-option 'score)
               'Full))))

        (ly:parser-lookup parser
          (string->symbol
            (string-append prefix option)))))

so I can use

testScoreA = \score { ... }

testScoreB = \score { ... }

testScoreFull = \score { ... }

\score {
  $(clo-score "testScore")
}

Not fully elegant, but a working solution for my next bigger project ...

Regards,

Marc






_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to