LEFT | RIGHT |
1 ;;;; This file is part of LilyPond, the GNU music typesetter. | 1 ;;;; This file is part of LilyPond, the GNU music typesetter. |
2 ;;;; | 2 ;;;; |
3 ;;;; Copyright (C) 1998--2012 Han-Wen Nienhuys <hanwen@xs4all.nl> | 3 ;;;; Copyright (C) 1998--2012 Han-Wen Nienhuys <hanwen@xs4all.nl> |
4 ;;;; Jan Nieuwenhuizen <janneke@gnu.org> | 4 ;;;; Jan Nieuwenhuizen <janneke@gnu.org> |
5 ;;;; | 5 ;;;; |
6 ;;;; LilyPond is free software: you can redistribute it and/or modify | 6 ;;;; LilyPond is free software: you can redistribute it and/or modify |
7 ;;;; it under the terms of the GNU General Public License as published by | 7 ;;;; it under the terms of the GNU General Public License as published by |
8 ;;;; the Free Software Foundation, either version 3 of the License, or | 8 ;;;; the Free Software Foundation, either version 3 of the License, or |
9 ;;;; (at your option) any later version. | 9 ;;;; (at your option) any later version. |
10 ;;;; | 10 ;;;; |
(...skipping 252 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
263 ((class . Item) | 263 ((class . Item) |
264 (interfaces . (break-alignable-interface | 264 (interfaces . (break-alignable-interface |
265 font-interface | 265 font-interface |
266 self-alignment-interface | 266 self-alignment-interface |
267 side-position-interface | 267 side-position-interface |
268 text-interface)))))) | 268 text-interface)))))) |
269 | 269 |
270 (BassFigure | 270 (BassFigure |
271 . ( | 271 . ( |
272 (stencil . ,ly:text-interface::print) | 272 (stencil . ,ly:text-interface::print) |
273 (vertical-skylines . ,ly:grob::simple-vertical-skylines-from-possibly-tr
ansparent-stencil) | |
274 (meta . ((class . Item) | 273 (meta . ((class . Item) |
275 (interfaces . (bass-figure-interface | 274 (interfaces . (bass-figure-interface |
276 font-interface | 275 font-interface |
277 rhythmic-grob-interface | 276 rhythmic-grob-interface |
278 text-interface)))))) | 277 text-interface)))))) |
279 | 278 |
280 (BassFigureAlignment | 279 (BassFigureAlignment |
281 . ( | 280 . ( |
282 (axes . (,Y)) | 281 (axes . (,Y)) |
283 (padding . 0.2) | 282 (padding . 0.2) |
(...skipping 1005 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1289 (extra-spacing-width . (0.0 . 0.0)) | 1288 (extra-spacing-width . (0.0 . 0.0)) |
1290 ;; Recede in height for purposes of note spacing, | 1289 ;; Recede in height for purposes of note spacing, |
1291 ;; so notes in melismata can be freely spaced above lyrics | 1290 ;; so notes in melismata can be freely spaced above lyrics |
1292 (extra-spacing-height . (0.2 . -0.2)) | 1291 (extra-spacing-height . (0.2 . -0.2)) |
1293 (font-series . medium) | 1292 (font-series . medium) |
1294 (font-size . 1.0) | 1293 (font-size . 1.0) |
1295 (self-alignment-X . ,CENTER) | 1294 (self-alignment-X . ,CENTER) |
1296 (stencil . ,lyric-text::print) | 1295 (stencil . ,lyric-text::print) |
1297 (text . ,(grob::calc-property-by-copy 'text)) | 1296 (text . ,(grob::calc-property-by-copy 'text)) |
1298 (word-space . 0.6) | 1297 (word-space . 0.6) |
| 1298 (skyline-horizontal-padding . 0.1) |
1299 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) | 1299 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) |
1300 (X-offset . ,ly:self-alignment-interface::aligned-on-x-parent) | 1300 (X-offset . ,ly:self-alignment-interface::aligned-on-x-parent) |
1301 (meta . ((class . Item) | 1301 (meta . ((class . Item) |
1302 (interfaces . (font-interface | 1302 (interfaces . (font-interface |
1303 lyric-syllable-interface | 1303 lyric-syllable-interface |
1304 rhythmic-grob-interface | 1304 rhythmic-grob-interface |
1305 self-alignment-interface | 1305 self-alignment-interface |
1306 text-interface)))))) | 1306 text-interface)))))) |
1307 | 1307 |
1308 (MeasureGrouping | 1308 (MeasureGrouping |
(...skipping 23 matching lines...) Expand all Loading... |
1332 (meta . ((class . Spanner) | 1332 (meta . ((class . Spanner) |
1333 (interfaces . (font-interface | 1333 (interfaces . (font-interface |
1334 mensural-ligature-interface)))))) | 1334 mensural-ligature-interface)))))) |
1335 | 1335 |
1336 (MetronomeMark | 1336 (MetronomeMark |
1337 . ( | 1337 . ( |
1338 (after-line-breaking . ,ly:side-position-interface::move-to-extremal-sta
ff) | 1338 (after-line-breaking . ,ly:side-position-interface::move-to-extremal-sta
ff) |
1339 (break-visibility . ,end-of-line-invisible) | 1339 (break-visibility . ,end-of-line-invisible) |
1340 (direction . ,UP) | 1340 (direction . ,UP) |
1341 (extra-spacing-width . (+inf.0 . -inf.0)) | 1341 (extra-spacing-width . (+inf.0 . -inf.0)) |
| 1342 (outside-staff-horizontal-padding . 0.12) |
1342 (outside-staff-priority . 1000) | 1343 (outside-staff-priority . 1000) |
1343 (padding . 0.8) | 1344 (padding . 0.8) |
1344 (side-axis . ,Y) | 1345 (side-axis . ,Y) |
1345 (stencil . ,ly:text-interface::print) | 1346 (stencil . ,ly:text-interface::print) |
1346 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) | 1347 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) |
1347 (Y-offset . ,ly:side-position-interface::y-aligned-side) | 1348 (Y-offset . ,ly:side-position-interface::y-aligned-side) |
1348 (X-offset . ,(ly:make-simple-closure | 1349 (X-offset . ,(ly:make-simple-closure |
1349 `(,+ | 1350 `(,+ |
1350 ,(ly:make-simple-closure | 1351 ,(ly:make-simple-closure |
1351 (list ly:break-alignable-interface::self-align-callbac
k)) | 1352 (list ly:break-alignable-interface::self-align-callbac
k)) |
(...skipping 224 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1576 | 1577 |
1577 | 1578 |
1578 (PaperColumn | 1579 (PaperColumn |
1579 . ( | 1580 . ( |
1580 (allow-loose-spacing . #t) | 1581 (allow-loose-spacing . #t) |
1581 (axes . (,X)) | 1582 (axes . (,X)) |
1582 (before-line-breaking . ,ly:paper-column::before-line-breaking) | 1583 (before-line-breaking . ,ly:paper-column::before-line-breaking) |
1583 (bound-alignment-interfaces . (note-column-interface)) | 1584 (bound-alignment-interfaces . (note-column-interface)) |
1584 (horizontal-skylines . ,ly:separation-item::calc-skylines) | 1585 (horizontal-skylines . ,ly:separation-item::calc-skylines) |
1585 (keep-inside-line . #t) | 1586 (keep-inside-line . #t) |
| 1587 ; 0.08 comes from spacing-horizontal-skyline.ly |
| 1588 ; allows double flat of F to be nestled over dots of C |
| 1589 (skyline-vertical-padding . 0.08) |
1586 ;; (stencil . ,ly:paper-column::print) | 1590 ;; (stencil . ,ly:paper-column::print) |
1587 (X-extent . ,ly:axis-group-interface::width) | 1591 (X-extent . ,ly:axis-group-interface::width) |
1588 | 1592 |
1589 ;; debugging | 1593 ;; debugging |
1590 ;; (font-size . -6) (font-name . "sans") (Y-extent
. #f) | 1594 ;; (font-size . -6) (font-name . "sans") (Y-extent
. #f) |
1591 (meta . ((class . Paper_column) | 1595 (meta . ((class . Paper_column) |
1592 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 1596 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
1593 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) | 1597 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) |
1594 (interfaces . (axis-group-interface | 1598 (interfaces . (axis-group-interface |
1595 font-interface | 1599 font-interface |
(...skipping 87 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1683 (RehearsalMark | 1687 (RehearsalMark |
1684 . ( | 1688 . ( |
1685 (after-line-breaking . ,ly:side-position-interface::move-to-extremal-sta
ff) | 1689 (after-line-breaking . ,ly:side-position-interface::move-to-extremal-sta
ff) |
1686 (baseline-skip . 2) | 1690 (baseline-skip . 2) |
1687 (break-align-symbols . (staff-bar clef)) | 1691 (break-align-symbols . (staff-bar clef)) |
1688 (break-visibility . ,end-of-line-invisible) | 1692 (break-visibility . ,end-of-line-invisible) |
1689 (direction . ,UP) | 1693 (direction . ,UP) |
1690 (extra-spacing-width . (+inf.0 . -inf.0)) | 1694 (extra-spacing-width . (+inf.0 . -inf.0)) |
1691 (font-size . 2) | 1695 (font-size . 2) |
1692 (non-musical . #t) | 1696 (non-musical . #t) |
| 1697 (outside-staff-horizontal-padding . 0.12) |
1693 (outside-staff-priority . 1500) | 1698 (outside-staff-priority . 1500) |
1694 (padding . 0.8) | 1699 (padding . 0.8) |
1695 (self-alignment-X . ,CENTER) | 1700 (self-alignment-X . ,CENTER) |
1696 (stencil . ,ly:text-interface::print) | 1701 (stencil . ,ly:text-interface::print) |
1697 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) | 1702 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) |
1698 (X-offset . ,(ly:make-simple-closure | 1703 (X-offset . ,(ly:make-simple-closure |
1699 `(,+ | 1704 `(,+ |
1700 ,(ly:make-simple-closure | 1705 ,(ly:make-simple-closure |
1701 (list ly:break-alignable-interface::self-align-callbac
k)) | 1706 (list ly:break-alignable-interface::self-align-callbac
k)) |
1702 ,(ly:make-simple-closure | 1707 ,(ly:make-simple-closure |
(...skipping 193 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1896 (X-extent . ,ly:span-bar::width) | 1901 (X-extent . ,ly:span-bar::width) |
1897 (Y-extent . (+inf.0 . -inf.0)) | 1902 (Y-extent . (+inf.0 . -inf.0)) |
1898 (meta . ((class . Item) | 1903 (meta . ((class . Item) |
1899 (interfaces . (bar-line-interface | 1904 (interfaces . (bar-line-interface |
1900 font-interface | 1905 font-interface |
1901 span-bar-interface)))))) | 1906 span-bar-interface)))))) |
1902 | 1907 |
1903 (SpanBarStub | 1908 (SpanBarStub |
1904 . ( | 1909 . ( |
1905 (X-extent . ,grob::x-parent-width) | 1910 (X-extent . ,grob::x-parent-width) |
1906 » (Y-extent . ,(ly:make-unpure-pure-container #f ly:axis-group-interface::
pure-height)) | 1911 » (extra-spacing-height . ,pure-from-neighbor-interface::extra-spacing-hei
ght) |
| 1912 » (Y-extent . #f) |
1907 (meta . ((class . Item) | 1913 (meta . ((class . Item) |
1908 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 1914 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
1909 (pure-relevant-grobs . ,ly:pure-from-neigh
bor-interface::calc-pure-relevant-grobs))) | 1915 (pure-relevant-grobs . ,ly:pure-from-neigh
bor-interface::calc-pure-relevant-grobs))) |
1910 (interfaces . (pure-from-neighbor-interface)))))) | 1916 (interfaces . (pure-from-neighbor-interface)))))) |
1911 | 1917 |
1912 (StaffGrouper | 1918 (StaffGrouper |
1913 . ( | 1919 . ( |
1914 (staff-staff-spacing . ((basic-distance . 9) | 1920 (staff-staff-spacing . ((basic-distance . 9) |
1915 (minimum-distance . 7) | 1921 (minimum-distance . 7) |
1916 (padding . 1) | 1922 (padding . 1) |
(...skipping 191 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2108 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 2114 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
2109 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) | 2115 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) |
2110 (interfaces . (axis-group-interface | 2116 (interfaces . (axis-group-interface |
2111 piano-pedal-interface | 2117 piano-pedal-interface |
2112 side-position-interface)))))) | 2118 side-position-interface)))))) |
2113 | 2119 |
2114 (System | 2120 (System |
2115 . ( | 2121 . ( |
2116 (adjacent-pure-heights . ,ly:axis-group-interface::adjacent-pure-heights
) | 2122 (adjacent-pure-heights . ,ly:axis-group-interface::adjacent-pure-heights
) |
2117 (axes . (,X ,Y)) | 2123 (axes . (,X ,Y)) |
| 2124 (outside-staff-placement-directive . left-to-right-polite) |
2118 (skyline-horizontal-padding . 0.5) | 2125 (skyline-horizontal-padding . 0.5) |
2119 (vertical-skylines . ,ly:axis-group-interface::calc-skylines) | 2126 (vertical-skylines . ,ly:axis-group-interface::calc-skylines) |
2120 (X-extent . ,ly:axis-group-interface::width) | 2127 (X-extent . ,ly:axis-group-interface::width) |
2121 (Y-extent . ,ly:system::height) | 2128 (Y-extent . ,ly:system::height) |
2122 (meta . ((class . System) | 2129 (meta . ((class . System) |
2123 (object-callbacks . ((footnotes-before-line-breaking . ,ly:syst
em::footnotes-before-line-breaking) | 2130 (object-callbacks . ((footnotes-before-line-breaking . ,ly:syst
em::footnotes-before-line-breaking) |
2124 (footnotes-after-line-breaking . ,ly:syste
m::footnotes-after-line-breaking) | 2131 (footnotes-after-line-breaking . ,ly:syste
m::footnotes-after-line-breaking) |
2125 (pure-relevant-grobs . ,ly:system::calc-pu
re-relevant-grobs) | 2132 (pure-relevant-grobs . ,ly:system::calc-pu
re-relevant-grobs) |
2126 » » » » (pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common))) | 2133 » » » » (pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
| 2134 » » » » (vertical-skyline-elements . ,ly:system::v
ertical-skyline-elements) |
| 2135 (vertical-alignment . ,ly:system::get-vert
ical-alignment))) |
2127 (interfaces . (axis-group-interface | 2136 (interfaces . (axis-group-interface |
2128 system-interface)))))) | 2137 system-interface)))))) |
2129 | 2138 |
2130 (SystemStartBar | 2139 (SystemStartBar |
2131 . ( | 2140 . ( |
2132 (collapse-height . 5.0) | 2141 (collapse-height . 5.0) |
2133 (direction . ,LEFT) | 2142 (direction . ,LEFT) |
2134 | 2143 |
2135 ;; ugh--hardcoded. | 2144 ;; ugh--hardcoded. |
2136 (padding . -0.1) ;; bar must cover rounded ending of staff line. | 2145 (padding . -0.1) ;; bar must cover rounded ending of staff line. |
(...skipping 85 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2222 staff-symbol-referencer-interface | 2231 staff-symbol-referencer-interface |
2223 tab-note-head-interface | 2232 tab-note-head-interface |
2224 text-interface)))))) | 2233 text-interface)))))) |
2225 | 2234 |
2226 (TextScript | 2235 (TextScript |
2227 . ( | 2236 . ( |
2228 (avoid-slur . around) | 2237 (avoid-slur . around) |
2229 (cross-staff . ,script-or-side-position-cross-staff) | 2238 (cross-staff . ,script-or-side-position-cross-staff) |
2230 (direction . ,DOWN) | 2239 (direction . ,DOWN) |
2231 (extra-spacing-width . (+inf.0 . -inf.0)) | 2240 (extra-spacing-width . (+inf.0 . -inf.0)) |
| 2241 (outside-staff-horizontal-padding . 0.12) |
2232 (outside-staff-priority . 450) | 2242 (outside-staff-priority . 450) |
2233 | 2243 |
2234 ;; sync with Fingering ? | 2244 ;; sync with Fingering ? |
2235 (padding . 0.5) | 2245 (padding . 0.5) |
2236 | 2246 |
2237 (script-priority . 200) | 2247 (script-priority . 200) |
2238 (side-axis . ,Y) | 2248 (side-axis . ,Y) |
2239 (slur-padding . 0.5) | 2249 (slur-padding . 0.5) |
2240 (staff-padding . 0.5) | 2250 (staff-padding . 0.5) |
2241 (stencil . ,ly:text-interface::print) | 2251 (stencil . ,ly:text-interface::print) |
2242 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) | 2252 (vertical-skylines . ,ly:grob::vertical-skylines-from-stencil) |
2243 ;; todo: add X self alignment? | 2253 ;; todo: add X self alignment? |
2244 (X-offset . ,ly:self-alignment-interface::x-aligned-on-self) | 2254 (X-offset . ,ly:self-alignment-interface::x-aligned-on-self) |
2245 (Y-offset . ,ly:side-position-interface::y-aligned-side) | 2255 (Y-offset . ,ly:side-position-interface::y-aligned-side) |
2246 (meta . ((class . Item) | 2256 (meta . ((class . Item) |
2247 (interfaces . (font-interface | 2257 (interfaces . (font-interface |
2248 instrument-specific-markup-interface | 2258 instrument-specific-markup-interface |
2249 self-alignment-interface | 2259 self-alignment-interface |
2250 side-position-interface | 2260 side-position-interface |
2251 text-interface | 2261 text-interface |
2252 text-script-interface)))))) | 2262 text-script-interface)))))) |
2253 | 2263 |
2254 (TextSpanner | 2264 (TextSpanner |
2255 . ( | 2265 . ( |
2256 (bound-details . ((left . ((Y . 0) | 2266 (bound-details . ((left . ((Y . 0) |
2257 (padding . 0.25) | 2267 (padding . 0.25) |
2258 (attach-dir . ,LEFT) | 2268 (attach-dir . ,LEFT) |
2259 )) | 2269 )) |
2260 » » » (left-broken . ((end-on-note . #t))) | 2270 » » » (left-broken . ((attach-dir . ,RIGHT))) |
2261 (right . ((Y . 0) | 2271 (right . ((Y . 0) |
2262 (padding . 0.25) | 2272 (padding . 0.25) |
2263 )) | 2273 )) |
2264 )) | 2274 )) |
2265 (dash-fraction . 0.2) | 2275 (dash-fraction . 0.2) |
2266 (dash-period . 3.0) | 2276 (dash-period . 3.0) |
2267 (direction . ,UP) | 2277 (direction . ,UP) |
2268 (font-shape . italic) | 2278 (font-shape . italic) |
2269 (left-bound-info . ,ly:line-spanner::calc-left-bound-info) | 2279 (left-bound-info . ,ly:line-spanner::calc-left-bound-info) |
2270 (outside-staff-priority . 350) | 2280 (outside-staff-priority . 350) |
(...skipping 259 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2530 axis-group-interface)))))) | 2540 axis-group-interface)))))) |
2531 | 2541 |
2532 (VerticalAxisGroup | 2542 (VerticalAxisGroup |
2533 . ( | 2543 . ( |
2534 (adjacent-pure-heights . ,ly:axis-group-interface::adjacent-pure-heights
) | 2544 (adjacent-pure-heights . ,ly:axis-group-interface::adjacent-pure-heights
) |
2535 (axes . (,Y)) | 2545 (axes . (,Y)) |
2536 (default-staff-staff-spacing . ((basic-distance . 9) | 2546 (default-staff-staff-spacing . ((basic-distance . 9) |
2537 (minimum-distance . 8) | 2547 (minimum-distance . 8) |
2538 (padding . 1))) | 2548 (padding . 1))) |
2539 (nonstaff-unrelatedstaff-spacing . ((padding . 0.5))) | 2549 (nonstaff-unrelatedstaff-spacing . ((padding . 0.5))) |
| 2550 (outside-staff-placement-directive . left-to-right-polite) |
2540 (staff-staff-spacing . ,ly:axis-group-interface::calc-staff-staff-spacin
g) | 2551 (staff-staff-spacing . ,ly:axis-group-interface::calc-staff-staff-spacin
g) |
2541 (stencil . ,ly:axis-group-interface::print) | 2552 (stencil . ,ly:axis-group-interface::print) |
2542 (skyline-horizontal-padding . 0.1) | 2553 (skyline-horizontal-padding . 0.1) |
2543 (vertical-skylines . ,ly:hara-kiri-group-spanner::calc-skylines) | 2554 (vertical-skylines . ,ly:hara-kiri-group-spanner::calc-skylines) |
2544 (X-extent . ,ly:axis-group-interface::width) | 2555 (X-extent . ,ly:axis-group-interface::width) |
2545 (Y-extent . ,ly:hara-kiri-group-spanner::y-extent) | 2556 (Y-extent . ,ly:hara-kiri-group-spanner::y-extent) |
2546 (Y-offset . ,ly:hara-kiri-group-spanner::force-hara-kiri-callback) | 2557 (Y-offset . ,ly:hara-kiri-group-spanner::force-hara-kiri-callback) |
2547 (meta . ((class . Spanner) | 2558 (meta . ((class . Spanner) |
2548 (object-callbacks . ( | 2559 (object-callbacks . ( |
2549 (X-common . ,ly:axis-group-interface::calc
-x-common) | 2560 (X-common . ,ly:axis-group-interface::calc
-x-common) |
2550 (pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 2561 (pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
2551 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) | 2562 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) |
2552 | 2563 |
2553 (interfaces . (axis-group-interface | 2564 (interfaces . (axis-group-interface |
2554 hara-kiri-group-spanner-interface)))))) | 2565 hara-kiri-group-spanner-interface)))))) |
2555 | 2566 |
2556 (VoiceFollower | 2567 (VoiceFollower |
2557 . ( | 2568 . ( |
2558 (after-line-breaking . ,ly:spanner::kill-zero-spanned-time) | 2569 (after-line-breaking . ,ly:spanner::kill-zero-spanned-time) |
2559 (bound-details . ((right . ((attach-dir . ,CENTER) | 2570 (bound-details . ((right . ((attach-dir . ,CENTER) |
2560 (padding . 1.5) | 2571 (padding . 1.5) |
2561 )) | 2572 )) |
2562 (left . ((attach-dir . ,CENTER) | 2573 (left . ((attach-dir . ,CENTER) |
2563 (padding . 1.5) | 2574 (padding . 1.5) |
2564 )) | 2575 )) |
2565 )) | 2576 )) |
| 2577 (cross-staff . #t) |
2566 (gap . 0.5) | 2578 (gap . 0.5) |
2567 (left-bound-info . ,ly:line-spanner::calc-left-bound-info) | 2579 (left-bound-info . ,ly:line-spanner::calc-left-bound-info) |
2568 (non-musical . #t) | 2580 (non-musical . #t) |
2569 (right-bound-info . ,ly:line-spanner::calc-right-bound-info) | 2581 (right-bound-info . ,ly:line-spanner::calc-right-bound-info) |
2570 (stencil . ,ly:line-spanner::print) | 2582 (stencil . ,ly:line-spanner::print) |
2571 (style . line) | 2583 (style . line) |
2572 (X-extent . #f) | 2584 (X-extent . #f) |
2573 (Y-extent . #f) | 2585 (Y-extent . #f) |
2574 (meta . ((class . Spanner) | 2586 (meta . ((class . Spanner) |
2575 (interfaces . (line-interface | 2587 (interfaces . (line-interface |
(...skipping 153 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2729 ;; chain_offset_callback, in which case this provides a default by simply | 2741 ;; chain_offset_callback, in which case this provides a default by simply |
2730 ;; passing through the value from the pure callback. | 2742 ;; passing through the value from the pure callback. |
2731 (define (pure-chain-offset-callback grob start end prev-offset) prev-offset) | 2743 (define (pure-chain-offset-callback grob start end prev-offset) prev-offset) |
2732 | 2744 |
2733 (define pure-conversions-alist | 2745 (define pure-conversions-alist |
2734 `( | 2746 `( |
2735 (,ly:accidental-interface::height . ,ly:accidental-interface::pure-height) | 2747 (,ly:accidental-interface::height . ,ly:accidental-interface::pure-height) |
2736 (,ly:axis-group-interface::calc-staff-staff-spacing . ,ly:axis-group-interfa
ce::calc-pure-staff-staff-spacing) | 2748 (,ly:axis-group-interface::calc-staff-staff-spacing . ,ly:axis-group-interfa
ce::calc-pure-staff-staff-spacing) |
2737 (,ly:axis-group-interface::height . ,ly:axis-group-interface::pure-height) | 2749 (,ly:axis-group-interface::height . ,ly:axis-group-interface::pure-height) |
2738 (,ly:beam::rest-collision-callback . ,ly:beam::pure-rest-collision-callback) | 2750 (,ly:beam::rest-collision-callback . ,ly:beam::pure-rest-collision-callback) |
| 2751 (,ly:flag::calc-y-offset . ,ly:flag::pure-calc-y-offset) |
2739 (,ly:grob::stencil-height . ,pure-stencil-height) | 2752 (,ly:grob::stencil-height . ,pure-stencil-height) |
2740 (,ly:hara-kiri-group-spanner::y-extent . ,ly:hara-kiri-group-spanner::pure-h
eight) | 2753 (,ly:hara-kiri-group-spanner::y-extent . ,ly:hara-kiri-group-spanner::pure-h
eight) |
2741 (,ly:rest-collision::force-shift-callback-rest . ,pure-chain-offset-callback
) | 2754 (,ly:rest-collision::force-shift-callback-rest . ,pure-chain-offset-callback
) |
2742 (,ly:rest::height . ,ly:rest::pure-height) | 2755 (,ly:rest::height . ,ly:rest::pure-height) |
2743 (,ly:self-alignment-interface::y-aligned-on-self . ,ly:self-alignment-interf
ace::pure-y-aligned-on-self) | 2756 (,ly:self-alignment-interface::y-aligned-on-self . ,ly:self-alignment-interf
ace::pure-y-aligned-on-self) |
2744 (,ly:side-position-interface::y-aligned-side . ,ly:side-position-interface::
pure-y-aligned-side) | 2757 (,ly:side-position-interface::y-aligned-side . ,ly:side-position-interface::
pure-y-aligned-side) |
2745 (,ly:slur::height . ,ly:slur::pure-height) | 2758 (,ly:slur::height . ,ly:slur::pure-height) |
2746 (,ly:slur::outside-slur-callback . ,ly:slur::pure-outside-slur-callback) | 2759 (,ly:slur::outside-slur-callback . ,ly:slur::pure-outside-slur-callback) |
2747 (,ly:stem::calc-stem-begin-position . ,ly:stem::pure-calc-stem-begin-positio
n) | 2760 (,ly:stem::calc-stem-begin-position . ,ly:stem::pure-calc-stem-begin-positio
n) |
2748 (,ly:stem::calc-stem-end-position . ,ly:stem::pure-calc-stem-end-position) | 2761 (,ly:stem::calc-stem-end-position . ,ly:stem::pure-calc-stem-end-position) |
2749 (,stem::length . ,stem::pure-length) | 2762 (,stem::length . ,stem::pure-length) |
2750 (,ly:stem::height . ,ly:stem::pure-height) | 2763 (,ly:stem::height . ,ly:stem::pure-height) |
2751 (,ly:stem-tremolo::calc-y-offset . ,ly:stem-tremolo::pure-calc-y-offset) | 2764 (,ly:stem-tremolo::calc-y-offset . ,ly:stem-tremolo::pure-calc-y-offset) |
2752 (,ly:system::height . ,ly:system::calc-pure-height))) | 2765 (,ly:system::height . ,ly:system::calc-pure-height))) |
2753 | 2766 |
2754 (define pure-functions | 2767 (define pure-functions |
2755 (list | 2768 (list |
2756 parenthesize-elements | 2769 parenthesize-elements |
2757 laissez-vibrer::print | 2770 laissez-vibrer::print |
2758 ly:flag::calc-y-offset | |
2759 ly:rest::y-offset-callback | 2771 ly:rest::y-offset-callback |
2760 ly:staff-symbol-referencer::callback | 2772 ly:staff-symbol-referencer::callback |
2761 ly:staff-symbol::height)) | 2773 ly:staff-symbol::height)) |
2762 | 2774 |
2763 (define-public (pure-relevant? grob) | 2775 (define-public (pure-relevant? grob) |
2764 (let ((extent-callback (ly:grob-property-data grob 'Y-extent))) | 2776 (let ((extent-callback (ly:grob-property-data grob 'Y-extent))) |
2765 (not (eq? #f | 2777 (not (eq? #f |
2766 (or | 2778 (or |
2767 (ly:unpure-pure-container? extent-callback) | 2779 (ly:unpure-pure-container? extent-callback) |
2768 (pair? extent-callback) | 2780 (pair? extent-callback) |
(...skipping 26 matching lines...) Expand all Loading... |
2795 (if (not (procedure? unpure)) | 2807 (if (not (procedure? unpure)) |
2796 unpure | 2808 unpure |
2797 (if (memq unpure pure-functions) | 2809 (if (memq unpure pure-functions) |
2798 (apply unpure args) | 2810 (apply unpure args) |
2799 (let ((pure (assq unpure pure-conversions-alist))) | 2811 (let ((pure (assq unpure pure-conversions-alist))) |
2800 (if pure | 2812 (if pure |
2801 (apply (cdr pure) | 2813 (apply (cdr pure) |
2802 (append | 2814 (append |
2803 (list (car args) start end) | 2815 (list (car args) start end) |
2804 (cdr args)))))))))) | 2816 (cdr args)))))))))) |
LEFT | RIGHT |