]> git.donarmstrong.com Git - lilypond.git/blob - lily/music.cc
5b33f57c54ad4e8b1dcd709992b15ea49685c37b
[lilypond.git] / lily / music.cc
1 /*
2   music.cc -- implement Music
3
4   source file of the GNU LilyPond music typesetter
5
6   (c)  1997--1998 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9
10 #include "music.hh"
11 #include "music-list.hh"
12 #include "debug.hh"
13 #include "musical-pitch.hh"
14
15 MInterval
16 Music::time_int() const
17 {
18   return MInterval (0,0);
19 }
20
21 void
22 Music::print() const
23 {
24 #ifndef NPRINT
25   if (! check_debug)
26     return ;
27   DOUT << name() << "{";
28   if  (translator_type_str_.length_i ())
29     DOUT << translator_type_str_ << " = " << translator_id_str_;
30   do_print();
31   DOUT << "}\n";
32 #endif
33 }
34
35 void
36 Music::transpose (Musical_pitch )
37 {
38   
39 }
40
41 void
42 Music::translate (Moment)
43 {
44 }
45
46 void
47 Music::do_print() const
48 {
49 }
50
51
52 IMPLEMENT_IS_TYPE_B(Music);
53
54
55
56   
57 Music::Music()
58 {
59   parent_music_l_ =0;
60 }
61
62 Musical_pitch
63 Music::to_relative_octave (Musical_pitch m)
64 {
65   return m;
66 }
67
68