release: 0.1.8

[lilypond.git] / lily / text-def.cc

diff --git a/lily/text-def.cc b/lily/text-def.cc
index cd2961b65e429f57c6d3ed9adb7ec44798a9f8f2..e0de0eb79bb25ca334eb3c4a3d6b6dcd8bfcc97f 100644 (file)
--- a/lily/text-def.cc
+++ b/lily/text-def.cc
@@ -1,31 +1,63 @@
+/*
+  text-def.cc -- implement Text_def
+
+  source file of the GNU LilyPond music typesetter
+
+  (c) 1996,1997 Han-Wen Nienhuys <hanwen@stack.nl>
+*/
+
 #include "debug.hh"
 #include "lookup.hh"
 #include "paper-def.hh"
 #include "molecule.hh"
 #include "text-def.hh"
+#include "dimen.hh"
+
+Interval
+Text_def::width (Paper_def * p) const
+{
+    Atom a = get_atom (p,0);
+
+    Real guess_width_f = text_str_.length_i() * a.sym_.dim.x ().length (); // ugh
+    Interval i (0, guess_width_f);
+    i += - (align_i_ + 1)* i.center();
+    return i;
+}
+
+void
+Text_def::do_print() const
+{
+#ifndef NPRINT
+    DOUT << "align " <<align_i_ << " `" << text_str_ << "'";
+#endif
+}
 
 Text_def::Text_def()
 {   
     align_i_ = 1;                      // right
     style_str_ = "roman";
-    defined_ch_c_l_ = 0;
 }
+
 bool
-Text_def::compare(Text_def const &def)
+Text_def::do_equal_b (General_script_def const *gdef) const
 {
-    return align_i_ == def.align_i_ && text_str_ == def.text_str_
-       && style_str_ == def.style_str_;
+    Text_def const *def= (Text_def*)gdef;
+    return align_i_ == def->align_i_ && text_str_ == def->text_str_
+       && style_str_ == def->style_str_;
 }
 
 Atom
-Text_def::create_atom(Paper_def*p) const
+Text_def::get_atom (Paper_def *p, int) const
 {
-    return p->lookup_l()->text(style_str_, text_str_, -align_i_);
+    return p->lookup_l()->text (style_str_, text_str_, -align_i_);
 }
 
 void
 Text_def::print() const
 {
-    mtor << "Text `" << text_str_ << "\', style " <<
+    DOUT << "Text `" << text_str_ << "\', style " <<
        style_str_ << "align " << align_i_ << '\n';
 }
+
+
+IMPLEMENT_IS_TYPE_B1(Text_def,General_script_def);