X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpaper-column.cc;h=b30c7de32fec89688d4e0d5e2b0893bca07bc73c;hb=5b4b0d6e9a197e8f9eb085b7c2ad78b8be3e5cfc;hp=bb827db18b72fe183cc0d7b9a59ea706710f572a;hpb=aa3b078b76a1e8457388b022ff5d1fc0c4820d3b;p=lilypond.git diff --git a/lily/paper-column.cc b/lily/paper-column.cc index bb827db18b..b30c7de32f 100644 --- a/lily/paper-column.cc +++ b/lily/paper-column.cc @@ -3,27 +3,29 @@ source file of the GNU LilyPond music typesetter - (c) 1997--2007 Han-Wen Nienhuys + (c) 1997--2008 Han-Wen Nienhuys */ #include "paper-column.hh" -#include "moment.hh" -#include "paper-score.hh" -#include "warn.hh" #include "axis-group-interface.hh" -#include "spaceable-grob.hh" -#include "text-interface.hh" -#include "lookup.hh" +#include "break-align-interface.hh" #include "font-interface.hh" -#include "output-def.hh" -#include "pointer-group-interface.hh" #include "grob-array.hh" -#include "system.hh" -#include "spring.hh" #include "lookup.hh" +#include "lookup.hh" +#include "moment.hh" +#include "output-def.hh" +#include "paper-score.hh" +#include "pointer-group-interface.hh" #include "separation-item.hh" +#include "skyline-pair.hh" +#include "spaceable-grob.hh" +#include "spring.hh" #include "string-convert.hh" +#include "system.hh" +#include "text-interface.hh" +#include "warn.hh" Grob * Paper_column::clone () const @@ -152,9 +154,30 @@ Paper_column::minimum_distance (Grob *left, Grob *right) } while (flip (&d) != LEFT); + skys[RIGHT].merge (Separation_item::conditional_skyline (right, left)); + return max (0.0, skys[LEFT].distance (skys[RIGHT])); } +Interval +Paper_column::break_align_width (Grob *me) +{ + Grob *p = me->get_parent (X_AXIS); + + if (is_musical (me)) + { + me->programming_error ("tried to get break-align-width of a non-musical column"); + return Interval (0, 0) + me->relative_coordinate (p, X_AXIS); + } + + Grob *align = Pointer_group_interface::find_grob (me, ly_symbol2scm ("elements"), + Break_alignment_interface::has_interface); + if (!align) + return Interval (0, 0) + me->relative_coordinate (p, X_AXIS); + + return align->extent (p, X_AXIS); +} + /* Print a vertical line and the rank number, to aid debugging. */ @@ -292,19 +315,18 @@ Paper_column::before_line_breaking (SCM grob) ADD_INTERFACE (Paper_column, - "@code{Paper_column} objects form the top-most X-parents for items." - " The are two types of columns: musical columns, where are attached to, and " - " non-musical columns, where bar-lines, clefs etc. are attached to. " - " The spacing engine determines the X-positions of these objects." - - "\n\n" - "They are\n" - " numbered, the first (leftmost) is column 0. Numbering happens before\n" - " line-breaking, and columns are not renumbered after line breaking.\n" - " Since many columns go unused, you should only use the rank field to\n" - " get ordering information. Two adjacent columns may have\n" - " non-adjacent numbers.\n", - + "@code{Paper_column} objects form the top-most X@tie{}parents" + " for items. There are two types of columns: musical columns," + " where are attached to, and non-musical columns, where" + " bar-lines, clefs, etc., are attached to. The spacing engine" + " determines the X@tie{}positions of these objects.\n" + "\n" + "They are numbered, the first (leftmost) is column@tie{}0." + " Numbering happens before line breaking, and columns are not" + " renumbered after line breaking. Since many columns go" + " unused, you should only use the rank field to get ordering" + " information. Two adjacent columns may have non-adjacent" + " numbers.", /* properties */ "between-cols " @@ -323,5 +345,6 @@ ADD_INTERFACE (Paper_column, "shortest-starter-duration " "spacing " "used " - "when "); + "when " + );