2002-07-13 Han-Wen <hanwen@cs.uu.nl>

[lilypond.git] / lily / duration.cc

diff --git a/lily/duration.cc b/lily/duration.cc
index 2ba674802e5f1f8d7bb389450fbaafd9b2f130fc..28b41a021068bd7d4cb60ac965d5ca6bacdf399f 100644 (file)
--- a/lily/duration.cc
+++ b/lily/duration.cc
@@ -70,7 +70,14 @@ Duration::length_mom () const
 String
 Duration::str () const
 {
-  String s =  to_str (durlog_i_) + to_str ('.', dots_i_);
+  String s;
+
+  if (durlog_i_ < 0  )
+    s = "log = "  + to_str (durlog_i_);
+  else
+    s = to_str (1 << durlog_i_);
+  
+  s += to_str ('.', dots_i_);
   if (factor_ != Moment (Rational (1,1)))
     {
       s += "*" + factor_.str ();
@@ -88,8 +95,6 @@ Duration::mark_smob (SCM)
 }
 
 IMPLEMENT_SIMPLE_SMOBS (Duration);
-
-
 int
 Duration::print_smob (SCM s, SCM port, scm_print_state *)
 {