+2004-09-23 Han-Wen Nienhuys <hanwen@xs4all.nl>
+
+ * lily/note-head.cc: remove Note_head::extent.
+
2004-09-23 Graham Percival <gperlist@shaw.ca>
* Documentation/user/tutorial.itely: do manual style 2-space
{
public:
DECLARE_SCHEME_CALLBACK (print, (SCM ));
- static Interval head_extent (Grob*, Axis);
DECLARE_SCHEME_CALLBACK (brew_ez_stencil, (SCM));
DECLARE_SCHEME_CALLBACK (extent, (SCM,SCM));
static bool has_interface (Grob*);
return Interval (0,0);
}
-/*
- This is necessary to prevent a cyclic dependency: the appearance of
- the ledgers depends on positioning, so the Grob::get_stencil () can
- not be used for determining the note head extent.
-
- */
-MAKE_SCHEME_CALLBACK (Note_head,extent,2);
-SCM
-Note_head::extent (SCM smob, SCM axis)
-{
- Grob *me = unsmob_grob (smob);
-
- return ly_interval2scm (head_extent (me, (Axis) scm_to_int (axis)));
-}
-
MAKE_SCHEME_CALLBACK (Note_head,brew_ez_stencil,1);
SCM
Note_head::brew_ez_stencil (SCM smob)
(style . default)
(print-function . ,Note_head::print)
(glyph-name-procedure . ,find-notehead-symbol)
- (X-extent-callback . ,Note_head::extent)
- (Y-extent-callback . ,Note_head::extent)
(Y-offset-callbacks . (,Staff_symbol_referencer::callback))
(meta . ((interfaces . (font-interface note-head-interface
ambitus-interface
(print-function . ,Note_head::print)
(ligature-primitive-callback . ,Note_head::print)
(glyph-name-procedure . ,find-notehead-symbol)
- (X-extent-callback . ,Note_head::extent)
- (Y-extent-callback . ,Note_head::extent)
(Y-offset-callbacks . (,Staff_symbol_referencer::callback))
(stem-attachment-function . ,note-head-style->attachment-coordinates)
(meta . ((interfaces . (rhythmic-grob-interface
Multi_measure_rest::percent
Multi_measure_rest::print
Multi_measure_rest::set_spacing_rods
- Note_head::extent
Note_head::print
Note_head::brew_ez_stencil
Ottava_bracket::print