X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fmoment.cc;h=1f32fb80eb76aa859fb6e4c140b4a38db77c52dd;hb=a5c48845f77d2d691f1674bb6daa8dd9d364268c;hp=8b866922a891de15371d7f10b261ed7e2d8a2596;hpb=a98b4affe11787c3e30b1e23dd363de64b940a80;p=lilypond.git diff --git a/lily/moment.cc b/lily/moment.cc index 8b866922a8..1f32fb80eb 100644 --- a/lily/moment.cc +++ b/lily/moment.cc @@ -3,7 +3,7 @@ source file of the GNU LilyPond music typesetter - (c) 1999--2005 Han-Wen Nienhuys + (c) 1999--2006 Han-Wen Nienhuys */ #include "moment.hh" @@ -33,6 +33,7 @@ Moment::Moment (Rational m) } #include "ly-smobs.icc" + IMPLEMENT_SIMPLE_SMOBS (Moment); IMPLEMENT_TYPE_P (Moment, "ly:moment?"); @@ -48,8 +49,8 @@ Moment::print_smob (SCM s, SCM port, scm_print_state *) Moment *r = (Moment *) SCM_CELL_WORD_1 (s); scm_puts ("#to_string (); - scm_puts ((char *)str.to_str0 (), port); + string str = r->to_string (); + scm_puts ((char *)str.c_str (), port); scm_puts (">", port); return 1; @@ -152,14 +153,12 @@ Moment::set_infinite (int k) main_part_.set_infinite (k); } -String +string Moment::to_string () const { - String s = main_part_.to_string (); + string s = main_part_.to_string (); if (grace_part_) - { - s += "G" + grace_part_.to_string (); - } + s += "G" + grace_part_.to_string (); return s; } @@ -173,8 +172,8 @@ Moment::operator - () const } #ifdef STREAM_SUPPORT -std::ostream & -operator << (std::ostream &os, Moment const &m) +ostream & +operator << (ostream &os, Moment const &m) { os << m.to_string (); return os;