1 ;;;; framework-tex.scm --
3 ;;;; source file of the GNU LilyPond music typesetter
5 ;;;; (c) 2004 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 (define-module (scm framework-texstr)
8 #:export (output-framework-tex
9 output-classic-framework-tex))
11 (use-modules (ice-9 regex)
20 (define (header filename)
22 \\input{lilypond-tex-metrics}
23 \\documentclass{article}
24 \\lilyglobalscale{1.0}
25 \\lilymetricsfile{~a.lpm}
35 (define-public (output-framework outputter book scopes fields basename )
36 (let* ((paper (ly:paper-book-paper book))
37 (pages (ly:paper-book-pages book))
39 (ly:outputter-dump-string outputter (header basename))
42 (ly:outputter-dump-stencil outputter page))
44 (ly:outputter-dump-string outputter (footer))))
48 (define-public (convert-to-ps . args) #t)
49 (define-public (convert-to-pdf . args) #t)
50 (define-public (convert-to-png . args) #t)
51 (define-public (convert-to-dvi . args) #t)
52 (define-public (convert-to-tex . args) #t)