]> git.donarmstrong.com Git - lilypond.git/blob - lily/text-item.cc
release: 1.2.12
[lilypond.git] / lily / text-item.cc
1 /*   
2   text-item.cc -- implement Text_item
3
4   source file of the GNU LilyPond music typesetter
5   
6   (c) 1998--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
7   
8  */
9
10 #include "text-item.hh"
11 #include "debug.hh"
12 #include "molecule.hh"
13 #include "paper-def.hh"
14 #include "lookup.hh"
15
16 Molecule*
17 Text_item::do_brew_molecule_p () const
18 {
19   Molecule a= paper_l ()->lookup_l(0)->text (style_str_,text_str_, paper_l ()); 
20
21   return new Molecule (a);
22 }
23
24 Text_item::Text_item ()
25 {
26   style_str_ = "roman";
27 }
28
29 void
30 Text_item::do_print () const
31 {
32   DEBUG_OUT <<  "text= " << text_str_;
33 }