source file of the GNU LilyPond music typesetter
- (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+ (c) 1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
+ #include <typeinfo>
#include "music.hh"
+#include "music-list.hh"
#include "debug.hh"
+#include "musical-pitch.hh"
-MInterval
-Music::time_int() const
+Music::Music()
{
- return MInterval(0,0);
}
-void
-Music::print()const
+
+void
+Music::compress (Moment)
{
- #ifndef NPRINT
- mtor << name() << "{" ;
- do_print();
- mtor << "}\n";
- #endif
}
+
void
-Music::transpose(Melodic_req const*)
+Music::do_print() const
{
-
}
-void
-Music::translate(Moment )
+Moment
+Music::length_mom () const
{
+ return 0;
}
void
-Music::do_print()const
+Music::print() const
+{
+#ifndef NPRINT
+ if (! flower_dstream)
+ return ;
+ DEBUG_OUT << classname(this) << "{";
+
+ do_print();
+ DEBUG_OUT << "}\n";
+#endif
+}
+
+Musical_pitch
+Music::to_relative_octave (Musical_pitch m)
{
+ return m;
}
-IMPLEMENT_STATIC_NAME(Music);
+void
+Music::transpose (Musical_pitch )
+{
+}
-
-Music::Music(){}