source file of the LilyPond music typesetter
- (c) 1997--2005 Jan Nieuwenhuizen <janneke@gnu.org>
- Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--2007 Jan Nieuwenhuizen <janneke@gnu.org>
+ Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "duration.hh"
{
Rational mom (1 << abs (durlog_));
- if (durlog_> 0)
+ if (durlog_ > 0)
mom = Rational (1) / mom;
Rational delta = mom;
return mom * factor_;
}
-String
+string
Duration::to_string () const
{
- String s;
+ string s;
if (durlog_ < 0)
s = "log = " + ::to_string (durlog_);
Duration *r = (Duration *) SCM_CELL_WORD_1 (s);
scm_puts ("#<Duration ", port);
- scm_display (scm_makfrom0str (r->to_string ().to_str0 ()), port);
+ scm_display (ly_string2scm (r->to_string ()), port);
scm_puts (" >", port);
return 1;