]> git.donarmstrong.com Git - lilypond.git/blob - lily/untransposable-music.cc
* lily/include/music.hh (class Music): unvirtualize transpose().
[lilypond.git] / lily / untransposable-music.cc
1 /*   
2 untransposable-music.cc --  implement Untransposable_music
3
4 source file of the GNU LilyPond music typesetter
5
6 (c) 2001--2004  Han-Wen Nienhuys <hanwen@cs.uu.nl>
7
8  */
9
10 #include "untransposable-music.hh"
11
12 Pitch
13 Untransposable_music::to_relative_octave (Pitch p)
14 {
15   return p;
16 }
17
18 ADD_MUSIC (Untransposable_music);
19
20 Untransposable_music::Untransposable_music (SCM init)
21   : Music_wrapper (init)
22 {
23
24 }