Re: markup to string function?

[Jan-Peter Voigt]

Hello again,

maybe my answer is a bit off your topic, because I think you are looking 
for a C function. But still, markups are lists in scheme, so you might 
use libguile to access this function in C:

--snip--
#(define (markup->string mup conc)
        (let ((result ""))
             ;;(display "(")
             (map (lambda (x)
                          (begin
                            ;;(display "> ")(display conc)(display "\n")
                            (if (eq? x concat-markup)(set! conc #t))
                            (if (list? x)
                                (set! result
                                  (if (or conc (string=? result ""))
                                      (string-append result 
(markup->string x conc))
                                      (string-append result " " 
(markup->string x conc)))))
                            (if (string? x)
                                (set! result
                                  (if (or conc (string=? result ""))
                                      (string-append result x)
                                      (string-append result " " x))))
                            result))
                  mup)
             ;;(display ")")
             result)
)
#(define-markup-command (plain-text layout props arg)(markup?)
                        (interpret-markup layout props (markup 
(markup->string arg #f))))

ttt = \markup { \italic "Title of " \bold \concat {"the" " " "piece"} }

\header {
  title = \ttt
  subtitle = \markup { \normal-text { \italic { \plain-text \ttt } } }
}
\relative c' {
  c
}
--snip--

Regards,
Jan-Peter