X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fnote-head-scheme.cc;h=f3cd1f3d34b9677af7c75927e2330e4724ae73e6;hb=14a83281378f7c0642ffe88870828933b5f206b6;hp=57919802694ae70582e83e21bf0ffa0106149746;hpb=e9a308e9c6002900fc336733950a0175bcbcc333;p=lilypond.git diff --git a/lily/note-head-scheme.cc b/lily/note-head-scheme.cc index 5791980269..f3cd1f3d34 100644 --- a/lily/note-head-scheme.cc +++ b/lily/note-head-scheme.cc @@ -3,7 +3,7 @@ source file of the GNU LilyPond music typesetter - (c) 2006--2007 Han-Wen Nienhuys + (c) 2006--2009 Han-Wen Nienhuys */ @@ -11,14 +11,14 @@ #include "font-metric.hh" -LY_DEFINE(ly_note_head__stem_attachment, "ly:note-head::stem-attachment", +LY_DEFINE (ly_note_head__stem_attachment, "ly:note-head::stem-attachment", 2, 0, 0, (SCM font_metric, SCM glyph_name), - "Get attachment in @var{font-metric} for attaching a stem to notehead " - "@var{glyph-name}.") + "Get attachment in @var{font-metric} for attaching a stem to" + " notehead @var{glyph-name}.") { LY_ASSERT_SMOB (Font_metric, font_metric, 1); Font_metric *fm = unsmob_metrics (font_metric); - LY_ASSERT_TYPE(scm_is_string,glyph_name, 2); + LY_ASSERT_TYPE (scm_is_string, glyph_name, 2); return ly_offset2scm (Note_head::get_stem_attachment (fm, ly_scm2string (glyph_name))); }