OLD | NEW |
1 /* | 1 /* |
2 This file is part of LilyPond, the GNU music typesetter. | 2 This file is part of LilyPond, the GNU music typesetter. |
3 | 3 |
4 Copyright (C) 1997--2011 Jan Nieuwenhuizen <janneke@gnu.org> | 4 Copyright (C) 1997--2011 Jan Nieuwenhuizen <janneke@gnu.org> |
5 | 5 |
6 LilyPond is free software: you can redistribute it and/or modify | 6 LilyPond is free software: you can redistribute it and/or modify |
7 it under the terms of the GNU General Public License as published by | 7 it under the terms of the GNU General Public License as published by |
8 the Free Software Foundation, either version 3 of the License, or | 8 the Free Software Foundation, either version 3 of the License, or |
9 (at your option) any later version. | 9 (at your option) any later version. |
10 | 10 |
(...skipping 33 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
44 { | 44 { |
45 junk_pointers (audio_elements_); | 45 junk_pointers (audio_elements_); |
46 } | 46 } |
47 | 47 |
48 void | 48 void |
49 Performance::output (Midi_stream &midi_stream) const | 49 Performance::output (Midi_stream &midi_stream) const |
50 { | 50 { |
51 int tracks_ = audio_staffs_.size (); | 51 int tracks_ = audio_staffs_.size (); |
52 | 52 |
53 midi_stream.write (Midi_header (1, tracks_, 384)); | 53 midi_stream.write (Midi_header (1, tracks_, 384)); |
54 if (be_verbose_global) | 54 debug_output (_ ("Track...") + " ", false); |
55 progress_indication (_ ("Track...") + " "); | |
56 | 55 |
57 for (vsize i = 0; i < audio_staffs_.size (); i++) | 56 for (vsize i = 0; i < audio_staffs_.size (); i++) |
58 { | 57 { |
59 Audio_staff *s = audio_staffs_[i]; | 58 Audio_staff *s = audio_staffs_[i]; |
60 if (be_verbose_global) | 59 debug_output ("[" + to_string (i), true); |
61 progress_indication ("[" + to_string (i)); | |
62 s->output (midi_stream, i, ports_); | 60 s->output (midi_stream, i, ports_); |
63 if (be_verbose_global) | 61 debug_output ("]", false); |
64 progress_indication ("]"); | |
65 } | 62 } |
66 } | 63 } |
67 | 64 |
68 void | 65 void |
69 Performance::add_element (Audio_element *p) | 66 Performance::add_element (Audio_element *p) |
70 { | 67 { |
71 audio_elements_.push_back (p); | 68 audio_elements_.push_back (p); |
72 } | 69 } |
73 | 70 |
74 void | 71 void |
(...skipping 16 matching lines...) Expand all Loading... |
91 void | 88 void |
92 Performance::process () | 89 Performance::process () |
93 { | 90 { |
94 } | 91 } |
95 | 92 |
96 Performance * | 93 Performance * |
97 unsmob_performance (SCM x) | 94 unsmob_performance (SCM x) |
98 { | 95 { |
99 return dynamic_cast<Performance *> (unsmob_music_output (x)); | 96 return dynamic_cast<Performance *> (unsmob_music_output (x)); |
100 } | 97 } |
OLD | NEW |