X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fsystem-start-delimiter.cc;h=c3fe50250a0a9e0bc20de549bffe1bb99c91a828;hb=e73f6ade4a00c4c002d4b62c90a8d93caa4cb7d2;hp=add769a97d39dd2617510caffd619e8e3d248b2c;hpb=ca9adb6c593ce8ec74a59a6a5be74c0fdb382f48;p=lilypond.git diff --git a/lily/system-start-delimiter.cc b/lily/system-start-delimiter.cc index add769a97d..c3fe50250a 100644 --- a/lily/system-start-delimiter.cc +++ b/lily/system-start-delimiter.cc @@ -3,23 +3,21 @@ source file of the GNU LilyPond music typesetter - (c) 2000--2005 Han-Wen Nienhuys + (c) 2000--2006 Han-Wen Nienhuys */ #include "system-start-delimiter.hh" - - -#include "spanner.hh" +#include "text-interface.hh" +#include "all-font-metrics.hh" #include "axis-group-interface.hh" -#include "output-def.hh" #include "font-interface.hh" -#include "all-font-metrics.hh" -#include "staff-symbol-referencer.hh" -#include "lookup.hh" #include "item.hh" #include "line-interface.hh" - +#include "lookup.hh" +#include "output-def.hh" #include "pointer-group-interface.hh" +#include "spanner.hh" +#include "staff-symbol-referencer.hh" Stencil System_start_delimiter::staff_bracket (Grob *me, Real height) @@ -57,7 +55,7 @@ Stencil System_start_delimiter::line_bracket (Grob *me, Real height) { Real thick - = me->layout ()->get_dimension (ly_symbol2scm ("linethickness")) + = me->layout ()->get_dimension (ly_symbol2scm ("line-thickness")) * robust_scm2double (me->get_property ("thickness"), 1); Real w = 0.8; @@ -80,7 +78,7 @@ System_start_delimiter::line_bracket (Grob *me, Real height) Stencil System_start_delimiter::simple_bar (Grob *me, Real h) { - Real lt = me->layout ()->get_dimension (ly_symbol2scm ("linethickness")); + Real lt = me->layout ()->get_dimension (ly_symbol2scm ("line-thickness")); Real w = lt * robust_scm2double (me->get_property ("thickness"), 1); return Lookup::round_filled_box (Box (Interval (0, w), Interval (-h / 2, h / 2)), lt); @@ -96,7 +94,7 @@ System_start_delimiter::print (SCM smob) Interval ext; int non_empty_count = 0; - for (int i = elts.size (); i--;) + for (vsize i = elts.size (); i--;) { Spanner *sp = dynamic_cast (elts[i]); @@ -144,15 +142,16 @@ System_start_delimiter::staff_brace (Grob *me, Real y) /* We go through the style sheet to lookup the font file name. This is better than using find_font directly, esp. because that triggers mktextfm for non-existent -> fonts. */ + fonts. */ SCM fam = scm_cons (ly_symbol2scm ("font-encoding"), ly_symbol2scm ("fetaBraces")); SCM alist = scm_list_n (fam, SCM_UNDEFINED); fm = select_font (me->layout (), scm_list_n (alist, SCM_UNDEFINED)); - int lo = 0; - int hi = max (fm->count () - 1, 2); + int + lo = 0; + int hi = max ((int) fm->count () - 1, 2); /* do a binary search for each Y, not very efficient, but passable? */ Box b; @@ -175,13 +174,12 @@ System_start_delimiter::staff_brace (Grob *me, Real y) return stil; } -ADD_INTERFACE (System_start_delimiter, "system-start-delimiter-interface", +ADD_INTERFACE (System_start_delimiter, "The brace, bracket or bar in front of the system. " , /* properties */ "collapse-height " "style " - "staff-hierarchy " "thickness " );