X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fgrace-music.cc;h=3445eab175ea4ecce02b89c296ba7ac0d74f089e;hb=731d3cb1ef66145c13864a4cfc762e8245d60fab;hp=382efcf8bcb14ce824ffd47f4d2af79d5976dbe6;hpb=634ad74db688a5305f001917453c5cd15305c539;p=lilypond.git diff --git a/lily/grace-music.cc b/lily/grace-music.cc index 382efcf8bc..3445eab175 100644 --- a/lily/grace-music.cc +++ b/lily/grace-music.cc @@ -1,10 +1,9 @@ -/* - grace-music.cc -- implement Grace_music - - source file of the GNU LilyPond music typesetter - - (c) 1999--2005 Han-Wen Nienhuys - +/* + grace-music.cc -- implement Grace_music + + source file of the GNU LilyPond music typesetter + + (c) 1999--2009 Han-Wen Nienhuys */ #include "music.hh" @@ -13,15 +12,15 @@ class Grace_music { public: - DECLARE_SCHEME_CALLBACK(start_callback, (SCM)); + DECLARE_SCHEME_CALLBACK (start_callback, (SCM)); }; -MAKE_SCHEME_CALLBACK(Grace_music, start_callback, 1); +MAKE_SCHEME_CALLBACK (Grace_music, start_callback, 1); SCM -Grace_music::start_callback (SCM m) +Grace_music::start_callback (SCM m) { Moment *l = unsmob_moment (Music_wrapper::length_callback (m)); Moment gl; - gl.grace_part_ = -(l->main_part_ + l->grace_part_ ); + gl.grace_part_ = -(l->main_part_ + l->grace_part_); return gl.smobbed_copy (); }