X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fduration.cc;h=413ac889ec497e7447b5e443c8e783b3704513dd;hb=cf4b1202d9f3d891a98ebab7d5df0d5cfb7f8ad8;hp=f2d79799dee81707d0e304b4536787b6b38d7ecc;hpb=75eebcb49e52d296b1da3e1074e0825d2c780db4;p=lilypond.git diff --git a/lily/duration.cc b/lily/duration.cc index f2d79799de..413ac889ec 100644 --- a/lily/duration.cc +++ b/lily/duration.cc @@ -60,10 +60,10 @@ Duration::get_length () const return mom * factor_; } -String +string Duration::to_string () const { - String s; + string s; if (durlog_ < 0) s = "log = " + ::to_string (durlog_); @@ -91,7 +91,7 @@ Duration::print_smob (SCM s, SCM port, scm_print_state *) Duration *r = (Duration *) SCM_CELL_WORD_1 (s); scm_puts ("#to_string ().to_str0 ()), port); + scm_display (scm_makfrom0str (r->to_string ().c_str ()), port); scm_puts (" >", port); return 1;