source file of the GNU LilyPond music typesetter
- (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+ (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "music.hh"
#include "music-list.hh"
#include "debug.hh"
+#include "musical-pitch.hh"
MInterval
Music::time_int() const
{
- return MInterval(0,0);
+ return MInterval (0,0);
}
+
void
-Music::print()const
+Music::print() const
{
#ifndef NPRINT
- mtor << name() << "{" ;
- do_print();
- mtor << "}\n";
+ if (! check_debug)
+ return ;
+ DOUT << name() << "{";
+ if (translator_type_str_.length_i ())
+ DOUT << translator_type_str_ << " = " << translator_id_str_;
+ do_print();
+ DOUT << "}\n";
#endif
}
void
-Music::transpose(Melodic_req const*)
+Music::transpose (Musical_pitch )
{
-
+
}
void
-Music::translate(Moment )
+Music::translate (Moment)
{
}
void
-Music::do_print()const
+Music::do_print() const
{
}
-IMPLEMENT_STATIC_NAME(Music);
+
IMPLEMENT_IS_TYPE_B(Music);
-
+
Music::Music()
{
- parent_music_l_ =0;
}
-IMPLEMENT_IS_TYPE_B1(Change_reg,Music)
-IMPLEMENT_STATIC_NAME(Change_reg);
+Musical_pitch
+Music::to_relative_octave (Musical_pitch m)
+{
+ return m;
+}
+
+