]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/music.cc
patch::: 1.3.59.uu2.jcn1
[lilypond.git] / lily / music.cc
index ffecc3fafd5bc812a5748d3bdc760c7d2c95462a..7b6cf607329ecbb3e19cde1901761949d314afcf 100644 (file)
@@ -3,9 +3,10 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c)  1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
+ #include <typeinfo>
 
 #include "music.hh"
 #include "music-list.hh"
@@ -36,13 +37,12 @@ void
 Music::print() const
 {
 #ifndef NPRINT
-  if (! check_debug)
+  if (! flower_dstream)
     return ;
-  DOUT << classname(this) << "{";
-  if  (translator_type_str_.length_i ())
-    DOUT << translator_type_str_ << " = " << translator_id_str_;
+  DEBUG_OUT << classname(this) << "{";
+  
   do_print();
-  DOUT << "}\n";
+  DEBUG_OUT << "}\n";
 #endif
 }
 
@@ -52,6 +52,7 @@ Music::to_relative_octave (Musical_pitch m)
   return m;
 }
 
+
 void
 Music::transpose (Musical_pitch )
 {