]> git.donarmstrong.com Git - lilypond.git/blob - lily/header.cc
release: 1.0.1
[lilypond.git] / lily / header.cc
1 /*
2   header.cc -- implement Header
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7 */
8
9 #include "string.hh"
10 #include "dictionary-iter.hh"
11 #include "header.hh"
12 #include "main.hh"
13
14 extern char const *lily_version_number_sz();
15
16
17 String
18 Header::TeX_string() const
19 {
20   String s;
21
22   s+= "\\def\\LilyIdString{"  + lily_id_str_ + "}";
23   
24   for (Dictionary_iter<String> i(*this); i.ok(); i++) 
25     {
26       s += "\\def\\mudela" + i.key() + "{" + i.val() + "}";
27     }
28   return s;
29 }
30
31 Header::Header ()
32 {
33   lily_id_str_ = "Lily was here, " +
34     String (lily_version_number_sz ());
35 }