(c) 2001--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
+#include "accidental-interface.hh"
#include "font-interface.hh"
#include "item.hh"
-#include "stencil.hh"
-#include "accidental-interface.hh"
#include "output-def.hh"
#include "pitch.hh"
+#include "stencil.hh"
/*
TODO: insert support for smaller cautionaries, tie-break-reminders.
Grob *tie = unsmob_grob (me->get_property ("tie"));
if (tie && !tie->original_)
- {
- me->suicide ();
- }
+ me->suicide ();
return SCM_UNSPECIFIED;
}
*/
}
}
-
+
if (!boxes.size ())
boxes.push (b);
return boxes;
}
-
/*
* Some styles do not provide all flavours of accidentals, e.g. there
* is currently no sharp accidental in vaticana style. In these cases
{
if (alteration == DOUBLE_FLAT
|| alteration == DOUBLE_SHARP)
- {
- return to_string (alteration);
- }
+ return to_string (alteration);
if (style == "hufnagel")
switch (alteration)
SCM scm_style = me->get_property ("style");
String style;
if (scm_is_symbol (scm_style))
- {
- style = ly_symbol2string (scm_style);
- }
+ style = ly_symbol2string (scm_style);
else
- {
- /*
- preferably no name for the default style.
- */
- style = "";
- }
+ /*
+ preferably no name for the default style.
+ */
+ style = "";
Font_metric *fm = 0;
if (smaller)
Stencil acc (fm->find_by_name ("accidentals." + font_char));
if (acc.is_empty ())
- {
- me->warning (_f ("accidental `%s' not found", font_char));
- }
+ me->warning (_f ("accidental `%s' not found", font_char));
else
- {
- mol.add_at_edge (X_AXIS, RIGHT, acc, 0.1, 0);
- }
+ mol.add_at_edge (X_AXIS, RIGHT, acc, 0.1, 0);
}
if (parens)
/*
TODO: should move inside-slur into item?
-
*/
ADD_INTERFACE (Accidental_interface, "accidental-interface",
"a single accidental",