source file of the GNU LilyPond music typesetter
- (c) 1997--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 1997--2009 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
#include "note-head.hh"
#include <cmath>
#include <cctype>
#include <algorithm> // min, max
+
using namespace std;
#include "directional-element-interface.hh"
-#include "dots.hh"
#include "font-interface.hh"
#include "international.hh"
-#include "lookup.hh"
-#include "misc.hh"
-#include "music.hh"
-#include "output-def.hh"
-#include "rhythmic-head.hh"
-#include "staff-symbol-referencer.hh"
-#include "staff-symbol.hh"
#include "warn.hh"
+#include "grob.hh"
static Stencil
internal_print (Grob *me, string *font_char)
return att;
}
-MAKE_SCHEME_CALLBACK(Note_head, calc_stem_attachment, 1);
+MAKE_SCHEME_CALLBACK (Note_head, calc_stem_attachment, 1);
SCM
Note_head::calc_stem_attachment (SCM smob)
{
return ly_offset2scm (get_stem_attachment (fm, key));
}
-int
-Note_head::get_balltype (Grob *me)
-{
- SCM s = me->get_property ("duration-log");
- return scm_is_number (s) ? min (int (scm_to_int (s)), 2) : 0;
-}
-ADD_INTERFACE (Note_head, "note-head-interface",
- "Note head",
+ADD_INTERFACE (Note_head,
+ "Note head.",
/* properties */
"note-names "