#include "side-position-interface.hh"
#include "directional-element-interface.hh"
#include "lookup.hh"
-#include "tuplet-bracket.hh"
+#include "bracket.hh"
+#include "lily-imports.hh"
/*
this is too complicated. Yet another version of side-positioning,
SCM
Volta_bracket_interface::print (SCM smob)
{
- Spanner *me = Spanner::unsmob (smob);
+ Spanner *me = unsmob<Spanner> (smob);
Spanner *orig_span = dynamic_cast<Spanner *> (me->original ());
bool broken_first_bracket = orig_span && (orig_span->broken_intos_[0]
== (Spanner *)me);
Offset start;
start[X_AXIS] = me->spanner_length () - left;
- /*
- ugh, Tuplet_bracket should use Horizontal_bracket, not the other way around.
- */
Stencil total
- = Tuplet_bracket::make_bracket (me, Y_AXIS, start,
- edge_height, empty, flare, shorten);
+ = Bracket::make_bracket (me, Y_AXIS, start, edge_height, empty,
+ flare, shorten);
if (!orig_span || broken_first_bracket)
{
SCM properties = me->get_property_alist_chain (SCM_EOL);
SCM snum = Text_interface::interpret_markup (layout->self_scm (),
properties, text);
- Stencil num = *Stencil::unsmob (snum);
+ Stencil num = *unsmob<Stencil> (snum);
num.align_to (Y_AXIS, UP);
num.translate_axis (-0.5, Y_AXIS);
total.add_at_edge (X_AXIS, LEFT, num, - num.extent (X_AXIS).length ()
else
str = "|";
- no_vertical_end |= ly_scm2bool (scm_call_1 (ly_lily_module_constant ("volta-bracket::calc-hook-visibility"),
- ly_string2scm (str)));
+ no_vertical_end |= ly_scm2bool (Lily::volta_bracket_calc_hook_visibility
+ (ly_string2scm (str)));
if (no_vertical_end || no_vertical_start)
{