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--2011 Han-Wen Nienhuys <hanwen@xs4all.nl> | 3 ;;;; Copyright (C) 1998--2011 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 509 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
520 (break-align-symbol . clef) | 520 (break-align-symbol . clef) |
521 (break-visibility . ,begin-of-line-visible) | 521 (break-visibility . ,begin-of-line-visible) |
522 (glyph-name . ,ly:clef::calc-glyph-name) | 522 (glyph-name . ,ly:clef::calc-glyph-name) |
523 (non-musical . #t) | 523 (non-musical . #t) |
524 (space-alist . ((cue-clef . (extra-space . 2.0)) | 524 (space-alist . ((cue-clef . (extra-space . 2.0)) |
525 (staff-bar . (extra-space . 0.7)) | 525 (staff-bar . (extra-space . 0.7)) |
526 (key-cancellation . (minimum-space . 3.5)) | 526 (key-cancellation . (minimum-space . 3.5)) |
527 (key-signature . (minimum-space . 3.5)) | 527 (key-signature . (minimum-space . 3.5)) |
528 (time-signature . (minimum-space . 4.2)) | 528 (time-signature . (minimum-space . 4.2)) |
529 (first-note . (minimum-fixed-space . 5.0)) | 529 (first-note . (minimum-fixed-space . 5.0)) |
530 » » » (next-note . (extra-space . 0.5)) | 530 » » » (next-note . (extra-space . 1.0)) |
531 (right-edge . (extra-space . 0.5)))) | 531 (right-edge . (extra-space . 0.5)))) |
532 (stencil . ,ly:clef::print) | 532 (stencil . ,ly:clef::print) |
533 (Y-offset . ,ly:staff-symbol-referencer::callback) | 533 (Y-offset . ,ly:staff-symbol-referencer::callback) |
534 (meta . ((class . Item) | 534 (meta . ((class . Item) |
535 (interfaces . (break-aligned-interface | 535 (interfaces . (break-aligned-interface |
536 clef-interface | 536 clef-interface |
537 font-interface | 537 font-interface |
538 staff-symbol-referencer-interface)))))) | 538 staff-symbol-referencer-interface)))))) |
539 | 539 |
540 (ClusterSpanner | 540 (ClusterSpanner |
(...skipping 45 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
586 (font-size . -4) | 586 (font-size . -4) |
587 (glyph-name . ,ly:clef::calc-glyph-name) | 587 (glyph-name . ,ly:clef::calc-glyph-name) |
588 (non-musical . #t) | 588 (non-musical . #t) |
589 (full-size-change . #t) | 589 (full-size-change . #t) |
590 (space-alist . ((staff-bar . (minimum-space . 2.7)) | 590 (space-alist . ((staff-bar . (minimum-space . 2.7)) |
591 (key-cancellation . (minimum-space . 3.5)) | 591 (key-cancellation . (minimum-space . 3.5)) |
592 (key-signature . (minimum-space . 3.5)) | 592 (key-signature . (minimum-space . 3.5)) |
593 (time-signature . (minimum-space . 4.2)) | 593 (time-signature . (minimum-space . 4.2)) |
594 (custos . (minimum-space . 0.0)) | 594 (custos . (minimum-space . 0.0)) |
595 (first-note . (minimum-fixed-space . 3.0)) | 595 (first-note . (minimum-fixed-space . 3.0)) |
596 » » » (next-note . (extra-space . 0.5)) | 596 » » » (next-note . (extra-space . 1.0)) |
597 (right-edge . (extra-space . 0.5)))) | 597 (right-edge . (extra-space . 0.5)))) |
598 (stencil . ,ly:clef::print) | 598 (stencil . ,ly:clef::print) |
599 (Y-offset . ,ly:staff-symbol-referencer::callback) | 599 (Y-offset . ,ly:staff-symbol-referencer::callback) |
600 (meta . ((class . Item) | 600 (meta . ((class . Item) |
601 (interfaces . (break-aligned-interface | 601 (interfaces . (break-aligned-interface |
602 clef-interface | 602 clef-interface |
603 font-interface | 603 font-interface |
604 staff-symbol-referencer-interface)))))) | 604 staff-symbol-referencer-interface)))))) |
605 | 605 |
606 (CueEndClef | 606 (CueEndClef |
607 . ( | 607 . ( |
608 (avoid-slur . inside) | 608 (avoid-slur . inside) |
609 (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-a
nchor) | 609 (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-a
nchor) |
610 (break-align-symbol . cue-end-clef) | 610 (break-align-symbol . cue-end-clef) |
611 (break-visibility . ,begin-of-line-invisible) | 611 (break-visibility . ,begin-of-line-invisible) |
612 (font-size . -4) | 612 (font-size . -4) |
613 (glyph-name . ,ly:clef::calc-glyph-name) | 613 (glyph-name . ,ly:clef::calc-glyph-name) |
614 (non-musical . #t) | 614 (non-musical . #t) |
615 (full-size-change . #t) | 615 (full-size-change . #t) |
616 (space-alist . ((clef . (extra-space . 0.7)) | 616 (space-alist . ((clef . (extra-space . 0.7)) |
617 (cue-clef . (extra-space . 0.7)) | 617 (cue-clef . (extra-space . 0.7)) |
618 (staff-bar . (extra-space . 0.7)) | 618 (staff-bar . (extra-space . 0.7)) |
619 (key-cancellation . (minimum-space . 3.5)) | 619 (key-cancellation . (minimum-space . 3.5)) |
620 (key-signature . (minimum-space . 3.5)) | 620 (key-signature . (minimum-space . 3.5)) |
621 (time-signature . (minimum-space . 4.2)) | 621 (time-signature . (minimum-space . 4.2)) |
622 (first-note . (minimum-fixed-space . 5.0)) | 622 (first-note . (minimum-fixed-space . 5.0)) |
623 » » » (next-note . (extra-space . 0.5)) | 623 » » » (next-note . (extra-space . 1.0)) |
624 (right-edge . (extra-space . 0.5)))) | 624 (right-edge . (extra-space . 0.5)))) |
625 (stencil . ,ly:clef::print) | 625 (stencil . ,ly:clef::print) |
626 (Y-offset . ,ly:staff-symbol-referencer::callback) | 626 (Y-offset . ,ly:staff-symbol-referencer::callback) |
627 (meta . ((class . Item) | 627 (meta . ((class . Item) |
628 (interfaces . (break-aligned-interface | 628 (interfaces . (break-aligned-interface |
629 clef-interface | 629 clef-interface |
630 font-interface | 630 font-interface |
631 staff-symbol-referencer-interface)))))) | 631 staff-symbol-referencer-interface)))))) |
632 | 632 |
633 (Custos | 633 (Custos |
(...skipping 243 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
877 text-script-interface)))))) | 877 text-script-interface)))))) |
878 | 878 |
879 (FootnoteItem | 879 (FootnoteItem |
880 . ( | 880 . ( |
881 (annotation-balloon . #f) | 881 (annotation-balloon . #f) |
882 (annotation-line . #t) | 882 (annotation-line . #t) |
883 (break-visibility . ,inherit-y-parent-visibility) | 883 (break-visibility . ,inherit-y-parent-visibility) |
884 (footnote-text . ,(grob::calc-property-by-copy 'footnote-text)) | 884 (footnote-text . ,(grob::calc-property-by-copy 'footnote-text)) |
885 (stencil . ,ly:balloon-interface::print) | 885 (stencil . ,ly:balloon-interface::print) |
886 (text . ,(grob::calc-property-by-copy 'text)) | 886 (text . ,(grob::calc-property-by-copy 'text)) |
| 887 (X-extent . #f) |
887 (Y-extent . #f) | 888 (Y-extent . #f) |
888 (X-offset . ,(grob::calc-property-by-copy 'X-offset)) | 889 (X-offset . ,(grob::calc-property-by-copy 'X-offset)) |
889 (Y-offset . ,(grob::calc-property-by-copy 'Y-offset)) | 890 (Y-offset . ,(grob::calc-property-by-copy 'Y-offset)) |
890 (meta . ((class . Item) | 891 (meta . ((class . Item) |
891 (interfaces . (balloon-interface | 892 (interfaces . (balloon-interface |
892 footnote-interface | 893 footnote-interface |
893 font-interface | 894 font-interface |
894 text-interface)))))) | 895 text-interface)))))) |
895 | 896 |
896 (FootnoteSpanner | 897 (FootnoteSpanner |
897 . ( | 898 . ( |
898 (annotation-balloon . #f) | 899 (annotation-balloon . #f) |
899 (annotation-line . #t) | 900 (annotation-line . #t) |
900 (footnote-text . ,(grob::calc-property-by-copy 'footnote-text)) | 901 (footnote-text . ,(grob::calc-property-by-copy 'footnote-text)) |
901 (spanner-placement . ,LEFT) | 902 (spanner-placement . ,LEFT) |
902 (stencil . ,ly:balloon-interface::print-spanner) | 903 (stencil . ,ly:balloon-interface::print-spanner) |
903 (text . ,(grob::calc-property-by-copy 'text)) | 904 (text . ,(grob::calc-property-by-copy 'text)) |
| 905 (X-extent . #f) |
904 (Y-extent . #f) | 906 (Y-extent . #f) |
905 (X-offset . ,(grob::calc-property-by-copy 'X-offset)) | 907 (X-offset . ,(grob::calc-property-by-copy 'X-offset)) |
906 (Y-offset . ,(grob::calc-property-by-copy 'Y-offset)) | 908 (Y-offset . ,(grob::calc-property-by-copy 'Y-offset)) |
907 (meta . ((class . Spanner) | 909 (meta . ((class . Spanner) |
908 (interfaces . (balloon-interface | 910 (interfaces . (balloon-interface |
909 footnote-interface | 911 footnote-interface |
910 footnote-spanner-interface | 912 footnote-spanner-interface |
911 font-interface | 913 font-interface |
912 text-interface)))))) | 914 text-interface)))))) |
913 | 915 |
914 (FretBoard | 916 (FretBoard |
915 . ( | 917 . ( |
916 (after-line-breaking . ,ly:chord-name::after-line-breaking) | 918 (after-line-breaking . ,ly:chord-name::after-line-breaking) |
917 (fret-diagram-details . ((finger-code . below-string))) | 919 (fret-diagram-details . ((finger-code . below-string))) |
918 (stencil . ,fret-board::calc-stencil) | 920 (stencil . ,fret-board::calc-stencil) |
919 (extra-spacing-height . (0.2 . -0.2)) | 921 (extra-spacing-height . (0.2 . -0.2)) |
| 922 (extra-spacing-width . (-0.5 . 0.5)) |
920 (meta . ((class . Item) | 923 (meta . ((class . Item) |
921 (interfaces . (chord-name-interface | 924 (interfaces . (chord-name-interface |
922 font-interface | 925 font-interface |
923 fret-diagram-interface | 926 fret-diagram-interface |
924 rhythmic-grob-interface)))))) | 927 rhythmic-grob-interface)))))) |
925 | 928 |
926 | 929 |
927 (Glissando | 930 (Glissando |
928 . ( | 931 . ( |
929 (after-line-breaking . ,ly:spanner::kill-zero-spanned-time) | 932 (after-line-breaking . ,ly:spanner::kill-zero-spanned-time) |
930 » (bound-details . ((right . ((attach-dir . ,CENTER) | 933 » (bound-details . ((right . ((attach-dir . ,LEFT) |
931 » » » » (padding . 1.5) | 934 » » » » (end-on-accidental . #t) |
| 935 » » » » (padding . 0.5) |
932 )) | 936 )) |
933 » » » (left . ((attach-dir . ,CENTER) | 937 » » » (left . ((attach-dir . ,RIGHT) |
934 » » » » (padding . 1.5) | 938 » » » » (padding . 0.5) |
935 )) | 939 )) |
936 )) | 940 )) |
937 (gap . 0.5) | 941 (gap . 0.5) |
938 (left-bound-info . ,ly:line-spanner::calc-left-bound-info) | 942 (left-bound-info . ,ly:line-spanner::calc-left-bound-info) |
939 (normalized-endpoints . ,ly:spanner::calc-normalized-endpoints) | 943 (normalized-endpoints . ,ly:spanner::calc-normalized-endpoints) |
940 (right-bound-info . ,ly:line-spanner::calc-right-bound-info) | 944 (right-bound-info . ,ly:line-spanner::calc-right-bound-info) |
941 (simple-Y . #t) | 945 (simple-Y . #t) |
942 (stencil . ,ly:line-spanner::print) | 946 (stencil . ,ly:line-spanner::print) |
943 (style . line) | 947 (style . line) |
944 (X-extent . #f) | 948 (X-extent . #f) |
(...skipping 117 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1062 (break-align-symbol . key-cancellation) | 1066 (break-align-symbol . key-cancellation) |
1063 (break-visibility . ,begin-of-line-invisible) | 1067 (break-visibility . ,begin-of-line-invisible) |
1064 (glyph-name-alist . ,cancellation-glyph-name-alist) | 1068 (glyph-name-alist . ,cancellation-glyph-name-alist) |
1065 (non-musical . #t) | 1069 (non-musical . #t) |
1066 (space-alist . ( | 1070 (space-alist . ( |
1067 (time-signature . (extra-space . 1.25)) | 1071 (time-signature . (extra-space . 1.25)) |
1068 (staff-bar . (extra-space . 0.6)) | 1072 (staff-bar . (extra-space . 0.6)) |
1069 (key-signature . (extra-space . 0.5)) | 1073 (key-signature . (extra-space . 0.5)) |
1070 (cue-clef . (extra-space . 0.5)) | 1074 (cue-clef . (extra-space . 0.5)) |
1071 (right-edge . (extra-space . 0.5)) | 1075 (right-edge . (extra-space . 0.5)) |
1072 » » » (first-note . (fixed-space . 2.5)))) | 1076 » » » (first-note . (semi-fixed-space . 2.5)))) |
1073 (stencil . ,ly:key-signature-interface::print) | 1077 (stencil . ,ly:key-signature-interface::print) |
1074 (extra-spacing-width . (0.0 . 0.5)) | 1078 (extra-spacing-width . (0.0 . 0.5)) |
1075 (Y-offset . ,ly:staff-symbol-referencer::callback) | 1079 (Y-offset . ,ly:staff-symbol-referencer::callback) |
1076 (meta . ((class . Item) | 1080 (meta . ((class . Item) |
1077 (interfaces . (break-aligned-interface | 1081 (interfaces . (break-aligned-interface |
1078 font-interface | 1082 font-interface |
1079 key-cancellation-interface | 1083 key-cancellation-interface |
1080 key-signature-interface | 1084 key-signature-interface |
1081 staff-symbol-referencer-interface)))))) | 1085 staff-symbol-referencer-interface)))))) |
1082 | 1086 |
1083 (KeySignature | 1087 (KeySignature |
1084 . ( | 1088 . ( |
1085 (avoid-slur . inside) | 1089 (avoid-slur . inside) |
1086 (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-a
nchor) | 1090 (break-align-anchor . ,ly:break-aligned-interface::calc-extent-aligned-a
nchor) |
1087 (break-align-symbol . key-signature) | 1091 (break-align-symbol . key-signature) |
1088 (break-visibility . ,begin-of-line-visible) | 1092 (break-visibility . ,begin-of-line-visible) |
1089 (glyph-name-alist . ,standard-alteration-glyph-name-alist) | 1093 (glyph-name-alist . ,standard-alteration-glyph-name-alist) |
1090 (non-musical . #t) | 1094 (non-musical . #t) |
1091 (space-alist . ( | 1095 (space-alist . ( |
1092 (time-signature . (extra-space . 1.15)) | 1096 (time-signature . (extra-space . 1.15)) |
1093 (staff-bar . (extra-space . 1.1)) | 1097 (staff-bar . (extra-space . 1.1)) |
1094 (cue-clef . (extra-space . 0.5)) | 1098 (cue-clef . (extra-space . 0.5)) |
1095 (right-edge . (extra-space . 0.5)) | 1099 (right-edge . (extra-space . 0.5)) |
1096 » » » (first-note . (fixed-space . 2.5)))) | 1100 » » » (first-note . (semi-fixed-space . 2.5)))) |
1097 (stencil . ,ly:key-signature-interface::print) | 1101 (stencil . ,ly:key-signature-interface::print) |
1098 (extra-spacing-width . (0.0 . 0.5)) | 1102 (extra-spacing-width . (0.0 . 0.5)) |
1099 (Y-offset . ,ly:staff-symbol-referencer::callback) | 1103 (Y-offset . ,ly:staff-symbol-referencer::callback) |
1100 (meta . ((class . Item) | 1104 (meta . ((class . Item) |
1101 (interfaces . (break-aligned-interface | 1105 (interfaces . (break-aligned-interface |
1102 font-interface | 1106 font-interface |
1103 key-signature-interface | 1107 key-signature-interface |
1104 staff-symbol-referencer-interface)))))) | 1108 staff-symbol-referencer-interface)))))) |
1105 | 1109 |
1106 | 1110 |
(...skipping 177 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1284 (Y-offset . ,ly:side-position-interface::y-aligned-side) | 1288 (Y-offset . ,ly:side-position-interface::y-aligned-side) |
1285 (X-offset . ,(ly:make-simple-closure | 1289 (X-offset . ,(ly:make-simple-closure |
1286 `(,+ | 1290 `(,+ |
1287 ,(ly:make-simple-closure | 1291 ,(ly:make-simple-closure |
1288 (list ly:break-alignable-interface::self-align-callbac
k)) | 1292 (list ly:break-alignable-interface::self-align-callbac
k)) |
1289 ,(ly:make-simple-closure | 1293 ,(ly:make-simple-closure |
1290 (list ly:self-alignment-interface::x-aligned-on-self))
))) | 1294 (list ly:self-alignment-interface::x-aligned-on-self))
))) |
1291 (self-alignment-X . ,LEFT) | 1295 (self-alignment-X . ,LEFT) |
1292 (break-align-symbols . (time-signature)) | 1296 (break-align-symbols . (time-signature)) |
1293 (non-break-align-symbols . (multi-measure-rest-interface)) | 1297 (non-break-align-symbols . (multi-measure-rest-interface)) |
1294 (non-musical . #t) | |
1295 (meta . ((class . Item) | 1298 (meta . ((class . Item) |
1296 (interfaces . (break-alignable-interface | 1299 (interfaces . (break-alignable-interface |
1297 font-interface | 1300 font-interface |
1298 metronome-mark-interface | 1301 metronome-mark-interface |
1299 self-alignment-interface | 1302 self-alignment-interface |
1300 side-position-interface | 1303 side-position-interface |
1301 text-interface)))))) | 1304 text-interface)))))) |
1302 | 1305 |
1303 (MultiMeasureRest | 1306 (MultiMeasureRest |
1304 . ( | 1307 . ( |
1305 (expand-limit . 10) | 1308 (expand-limit . 10) |
1306 (hair-thickness . 2.0) | 1309 (hair-thickness . 2.0) |
| 1310 (round-up-exceptions . ()) |
1307 (padding . 1) | 1311 (padding . 1) |
1308 (spacing-pair . (break-alignment . break-alignment)) | 1312 (spacing-pair . (break-alignment . break-alignment)) |
1309 (springs-and-rods . ,ly:multi-measure-rest::set-spacing-rods) | 1313 (springs-and-rods . ,ly:multi-measure-rest::set-spacing-rods) |
1310 (staff-position . 0) | |
1311 (stencil . ,ly:multi-measure-rest::print) | 1314 (stencil . ,ly:multi-measure-rest::print) |
1312 (thick-thickness . 6.6) | 1315 (thick-thickness . 6.6) |
1313 ;; See Wanske pp. 125 | 1316 ;; See Wanske pp. 125 |
1314 » (usable-duration-logs . (0 -1 -2 -3)) | 1317 » (usable-duration-logs . ,(iota 4 -3)) |
1315 (Y-offset . ,ly:staff-symbol-referencer::callback) | 1318 (Y-offset . ,ly:staff-symbol-referencer::callback) |
1316 (meta . ((class . Spanner) | 1319 (meta . ((class . Spanner) |
1317 (interfaces . (font-interface | 1320 (interfaces . (font-interface |
1318 multi-measure-interface | 1321 multi-measure-interface |
1319 multi-measure-rest-interface | 1322 multi-measure-rest-interface |
1320 rest-interface | 1323 rest-interface |
1321 staff-symbol-referencer-interface)))))) | 1324 staff-symbol-referencer-interface)))))) |
1322 | 1325 |
1323 (MultiMeasureRestNumber | 1326 (MultiMeasureRestNumber |
1324 . ( | 1327 . ( |
(...skipping 81 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1406 (Y-extent . ,ly:axis-group-interface::height) | 1409 (Y-extent . ,ly:axis-group-interface::height) |
1407 (meta . ((class . Item) | 1410 (meta . ((class . Item) |
1408 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 1411 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
1409 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) | 1412 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) |
1410 (interfaces . (axis-group-interface | 1413 (interfaces . (axis-group-interface |
1411 note-collision-interface)))))) | 1414 note-collision-interface)))))) |
1412 | 1415 |
1413 (NoteColumn | 1416 (NoteColumn |
1414 . ( | 1417 . ( |
1415 (axes . (,X ,Y)) | 1418 (axes . (,X ,Y)) |
| 1419 (bound-alignment-interfaces . (rhythmic-head-interface stem-interface)) |
1416 (horizontal-skylines . ,ly:separation-item::calc-skylines) | 1420 (horizontal-skylines . ,ly:separation-item::calc-skylines) |
1417 (skyline-vertical-padding . 0.15) | 1421 (skyline-vertical-padding . 0.15) |
1418 (X-extent . ,ly:axis-group-interface::width) | 1422 (X-extent . ,ly:axis-group-interface::width) |
1419 (Y-extent . ,ly:axis-group-interface::height) | 1423 (Y-extent . ,ly:axis-group-interface::height) |
1420 (meta . ((class . Item) | 1424 (meta . ((class . Item) |
1421 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 1425 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
1422 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) | 1426 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) |
1423 (interfaces . (axis-group-interface | 1427 (interfaces . (axis-group-interface |
1424 note-column-interface | 1428 note-column-interface |
1425 separation-item-interface)))))) | 1429 separation-item-interface)))))) |
(...skipping 84 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1510 ottava-bracket-interface | 1514 ottava-bracket-interface |
1511 side-position-interface | 1515 side-position-interface |
1512 text-interface)))))) | 1516 text-interface)))))) |
1513 | 1517 |
1514 | 1518 |
1515 (PaperColumn | 1519 (PaperColumn |
1516 . ( | 1520 . ( |
1517 (allow-loose-spacing . #t) | 1521 (allow-loose-spacing . #t) |
1518 (axes . (,X)) | 1522 (axes . (,X)) |
1519 (before-line-breaking . ,ly:paper-column::before-line-breaking) | 1523 (before-line-breaking . ,ly:paper-column::before-line-breaking) |
| 1524 (bound-alignment-interfaces . (note-column-interface)) |
1520 (horizontal-skylines . ,ly:separation-item::calc-skylines) | 1525 (horizontal-skylines . ,ly:separation-item::calc-skylines) |
1521 (keep-inside-line . #t) | 1526 (keep-inside-line . #t) |
1522 ;; (stencil . ,ly:paper-column::print) | 1527 ;; (stencil . ,ly:paper-column::print) |
1523 (X-extent . ,ly:axis-group-interface::width) | 1528 (X-extent . ,ly:axis-group-interface::width) |
1524 | 1529 |
1525 ;; debugging | 1530 ;; debugging |
1526 ;; (font-size . -6) (font-name . "sans") (Y-extent
. #f) | 1531 ;; (font-size . -6) (font-name . "sans") (Y-extent
. #f) |
1527 (meta . ((class . Paper_column) | 1532 (meta . ((class . Paper_column) |
1528 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) | 1533 (object-callbacks . ((pure-Y-common . ,ly:axis-group-interface:
:calc-pure-y-common) |
1529 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) | 1534 (pure-relevant-grobs . ,ly:axis-group-inte
rface::calc-pure-relevant-grobs))) |
(...skipping 174 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1704 (Script | 1709 (Script |
1705 . ( | 1710 . ( |
1706 (add-stem-support . #t) | 1711 (add-stem-support . #t) |
1707 (cross-staff . ,ly:script-interface::calc-cross-staff) | 1712 (cross-staff . ,ly:script-interface::calc-cross-staff) |
1708 (direction . ,ly:script-interface::calc-direction) | 1713 (direction . ,ly:script-interface::calc-direction) |
1709 (font-encoding . fetaMusic) | 1714 (font-encoding . fetaMusic) |
1710 (positioning-done . ,ly:script-interface::calc-positioning-done) | 1715 (positioning-done . ,ly:script-interface::calc-positioning-done) |
1711 (side-axis . ,Y) | 1716 (side-axis . ,Y) |
1712 | 1717 |
1713 ;; padding set in script definitions. | 1718 ;; padding set in script definitions. |
| 1719 (slur-padding . 0.2) |
1714 (staff-padding . 0.25) | 1720 (staff-padding . 0.25) |
1715 | 1721 |
1716 (stencil . ,ly:script-interface::print) | 1722 (stencil . ,ly:script-interface::print) |
1717 (X-offset . ,script-interface::calc-x-offset) | 1723 (X-offset . ,script-interface::calc-x-offset) |
1718 (Y-offset . ,ly:side-position-interface::y-aligned-side) | 1724 (Y-offset . ,ly:side-position-interface::y-aligned-side) |
1719 (meta . ((class . Item) | 1725 (meta . ((class . Item) |
1720 (interfaces . (font-interface | 1726 (interfaces . (font-interface |
1721 script-interface | 1727 script-interface |
1722 side-position-interface)))))) | 1728 side-position-interface)))))) |
1723 | 1729 |
(...skipping 185 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1909 | 1915 |
1910 ;; We use the normal minima as minimum for the ideal lengths, | 1916 ;; We use the normal minima as minimum for the ideal lengths, |
1911 ;; and the extreme minima as abolute minimum length. | 1917 ;; and the extreme minima as abolute minimum length. |
1912 | 1918 |
1913 (direction . ,ly:stem::calc-direction) | 1919 (direction . ,ly:stem::calc-direction) |
1914 (duration-log . ,stem::calc-duration-log) | 1920 (duration-log . ,stem::calc-duration-log) |
1915 (flag . ,ly:stem::calc-flag) | 1921 (flag . ,ly:stem::calc-flag) |
1916 (length . ,ly:stem::calc-length) | 1922 (length . ,ly:stem::calc-length) |
1917 (neutral-direction . ,DOWN) | 1923 (neutral-direction . ,DOWN) |
1918 (positioning-done . ,ly:stem::calc-positioning-done) | 1924 (positioning-done . ,ly:stem::calc-positioning-done) |
| 1925 (stem-begin-position . ,ly:stem::calc-stem-begin-position) |
1919 (stem-end-position . ,ly:stem::calc-stem-end-position) | 1926 (stem-end-position . ,ly:stem::calc-stem-end-position) |
1920 (stem-info . ,ly:stem::calc-stem-info) | 1927 (stem-info . ,ly:stem::calc-stem-info) |
1921 (stencil . ,ly:stem::print) | 1928 (stencil . ,ly:stem::print) |
1922 (thickness . 1.3) | 1929 (thickness . 1.3) |
1923 (X-extent . ,ly:stem::width) | 1930 (X-extent . ,ly:stem::width) |
1924 (X-offset . ,ly:stem::offset-callback) | 1931 (X-offset . ,ly:stem::offset-callback) |
1925 (Y-extent . ,ly:stem::height) | 1932 (Y-extent . ,ly:stem::height) |
1926 (Y-offset . ,ly:staff-symbol-referencer::callback) | 1933 (Y-offset . ,ly:staff-symbol-referencer::callback) |
1927 (meta . ((class . Item) | 1934 (meta . ((class . Item) |
1928 (interfaces . (font-interface | 1935 (interfaces . (font-interface |
1929 stem-interface)))))) | 1936 stem-interface)))))) |
1930 | 1937 |
1931 (StemTremolo | 1938 (StemTremolo |
1932 . ( | 1939 . ( |
1933 (beam-thickness . 0.48) ; staff-space | 1940 (beam-thickness . 0.48) ; staff-space |
1934 (beam-width . ,ly:stem-tremolo::calc-width) ; staff-space | 1941 (beam-width . ,ly:stem-tremolo::calc-width) ; staff-space |
1935 (slope . ,ly:stem-tremolo::calc-slope) | 1942 (slope . ,ly:stem-tremolo::calc-slope) |
1936 (stencil . ,ly:stem-tremolo::print) | 1943 (stencil . ,ly:stem-tremolo::print) |
1937 (shape . ,ly:stem-tremolo::calc-shape) | 1944 (shape . ,ly:stem-tremolo::calc-shape) |
1938 (X-extent . ,ly:stem-tremolo::width) | 1945 (X-extent . ,ly:stem-tremolo::width) |
1939 (Y-extent . ,ly:stem-tremolo::height) | |
1940 (meta . ((class . Item) | 1946 (meta . ((class . Item) |
1941 (interfaces . (stem-tremolo-interface)))))) | 1947 (interfaces . (stem-tremolo-interface)))))) |
1942 | 1948 |
1943 (StringNumber | 1949 (StringNumber |
1944 . ( | 1950 . ( |
1945 (avoid-slur . around) | 1951 (avoid-slur . around) |
1946 (font-encoding . fetaText) | 1952 (font-encoding . fetaText) |
1947 (font-size . -5) ; don't overlap when next to heads. | 1953 (font-size . -5) ; don't overlap when next to heads. |
1948 (padding . 0.5) | 1954 (padding . 0.5) |
1949 (script-priority . 100) | 1955 (script-priority . 100) |
(...skipping 281 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2231 (avoid-slur . inside) | 2237 (avoid-slur . inside) |
2232 (break-align-anchor | 2238 (break-align-anchor |
2233 . ,ly:break-aligned-interface::calc-extent-aligned-anchor) | 2239 . ,ly:break-aligned-interface::calc-extent-aligned-anchor) |
2234 (break-align-symbol . time-signature) | 2240 (break-align-symbol . time-signature) |
2235 (break-align-anchor-alignment . ,LEFT) | 2241 (break-align-anchor-alignment . ,LEFT) |
2236 (break-visibility . ,all-visible) | 2242 (break-visibility . ,all-visible) |
2237 (extra-spacing-height . (-1.0 . 1.0)) | 2243 (extra-spacing-height . (-1.0 . 1.0)) |
2238 (non-musical . #t) | 2244 (non-musical . #t) |
2239 (space-alist . ( | 2245 (space-alist . ( |
2240 (cue-clef . (extra-space . 1.5)) | 2246 (cue-clef . (extra-space . 1.5)) |
2241 » » » (first-note . (fixed-space . 2.0)) | 2247 » » » (first-note . (semi-fixed-space . 2.0)) |
2242 (right-edge . (extra-space . 0.5)) | 2248 (right-edge . (extra-space . 0.5)) |
2243 (staff-bar . (minimum-space . 2.0)))) | 2249 (staff-bar . (minimum-space . 2.0)))) |
2244 (stencil . ,ly:time-signature::print) | 2250 (stencil . ,ly:time-signature::print) |
2245 (style . C) | 2251 (style . C) |
2246 (meta . ((class . Item) | 2252 (meta . ((class . Item) |
2247 (interfaces . (break-aligned-interface | 2253 (interfaces . (break-aligned-interface |
2248 font-interface | 2254 font-interface |
2249 time-signature-interface)))))) | 2255 time-signature-interface)))))) |
2250 | 2256 |
2251 (TrillPitchAccidental | 2257 (TrillPitchAccidental |
(...skipping 327 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2579 | 2585 |
2580 ;; Sometimes we have grobs with (Y-extent . ,ly:grob::stencil-height) | 2586 ;; Sometimes we have grobs with (Y-extent . ,ly:grob::stencil-height) |
2581 ;; and the print function is not pure, but there is a easy way to | 2587 ;; and the print function is not pure, but there is a easy way to |
2582 ;; figure out the Y-extent from the print function. | 2588 ;; figure out the Y-extent from the print function. |
2583 (define pure-print-to-height-conversions | 2589 (define pure-print-to-height-conversions |
2584 `( | 2590 `( |
2585 (,ly:arpeggio::print . ,ly:arpeggio::pure-height) | 2591 (,ly:arpeggio::print . ,ly:arpeggio::pure-height) |
2586 (,ly:arpeggio::brew-chord-bracket . ,ly:arpeggio::pure-height) | 2592 (,ly:arpeggio::brew-chord-bracket . ,ly:arpeggio::pure-height) |
2587 (,ly:arpeggio::brew-chord-slur . ,ly:arpeggio::pure-height) | 2593 (,ly:arpeggio::brew-chord-slur . ,ly:arpeggio::pure-height) |
2588 (,ly:hairpin::print . ,ly:hairpin::pure-height) | 2594 (,ly:hairpin::print . ,ly:hairpin::pure-height) |
| 2595 (,ly:stem-tremolo::print . ,ly:stem-tremolo::pure-height) |
2589 (,ly:volta-bracket-interface::print . ,volta-bracket-interface::pure-height)
)) | 2596 (,ly:volta-bracket-interface::print . ,volta-bracket-interface::pure-height)
)) |
2590 | 2597 |
2591 ;; ly:grob::stencil-extent is safe if the print callback is safe too | 2598 ;; ly:grob::stencil-extent is safe if the print callback is safe too |
2592 (define (pure-stencil-height grob start stop) | 2599 (define (pure-stencil-height grob start stop) |
2593 (let* ((sten (ly:grob-property-data grob 'stencil)) | 2600 (let* ((sten (ly:grob-property-data grob 'stencil)) |
2594 (pure-height-callback (assoc-get sten pure-print-to-height-conversions)
)) | 2601 (pure-height-callback (assoc-get sten pure-print-to-height-conversions)
)) |
2595 (cond ((or | 2602 (cond ((or |
2596 (ly:stencil? sten) | 2603 (ly:stencil? sten) |
2597 (memq sten pure-print-callbacks)) | 2604 (memq sten pure-print-callbacks)) |
2598 (ly:grob::stencil-height grob)) | 2605 (ly:grob::stencil-height grob)) |
2599 ((procedure? pure-height-callback) | 2606 ((procedure? pure-height-callback) |
2600 (pure-height-callback grob start stop)) | 2607 (pure-height-callback grob start stop)) |
2601 (else | 2608 (else |
2602 '(0 . 0))))) | 2609 '(0 . 0))))) |
2603 | 2610 |
2604 ;; Sometimes, a pure callback will be chained to a non-pure callback via | 2611 ;; Sometimes, a pure callback will be chained to a non-pure callback via |
2605 ;; chain_offset_callback, in which case this provides a default by simply | 2612 ;; chain_offset_callback, in which case this provides a default by simply |
2606 ;; passing through the value from the pure callback. | 2613 ;; passing through the value from the pure callback. |
2607 (define (pure-chain-offset-callback grob start end prev-offset) prev-offset) | 2614 (define (pure-chain-offset-callback grob start end prev-offset) prev-offset) |
2608 | 2615 |
2609 (define pure-conversions-alist | 2616 (define pure-conversions-alist |
2610 `( | 2617 `( |
2611 (,ly:accidental-interface::height . ,ly:accidental-interface::pure-height) | 2618 (,ly:accidental-interface::height . ,ly:accidental-interface::pure-height) |
2612 (,ly:axis-group-interface::calc-staff-staff-spacing . ,ly:axis-group-interfa
ce::calc-pure-staff-staff-spacing) | 2619 (,ly:axis-group-interface::calc-staff-staff-spacing . ,ly:axis-group-interfa
ce::calc-pure-staff-staff-spacing) |
2613 (,ly:axis-group-interface::height . ,ly:axis-group-interface::pure-height) | 2620 (,ly:axis-group-interface::height . ,ly:axis-group-interface::pure-height) |
| 2621 (,ly:beam::rest-collision-callback . ,ly:beam::pure-rest-collision-callback) |
2614 (,ly:grob::stencil-height . ,pure-stencil-height) | 2622 (,ly:grob::stencil-height . ,pure-stencil-height) |
2615 (,ly:hara-kiri-group-spanner::y-extent . ,ly:hara-kiri-group-spanner::pure-h
eight) | 2623 (,ly:hara-kiri-group-spanner::y-extent . ,ly:hara-kiri-group-spanner::pure-h
eight) |
2616 (,ly:rest-collision::force-shift-callback-rest . ,pure-chain-offset-callback
) | 2624 (,ly:rest-collision::force-shift-callback-rest . ,pure-chain-offset-callback
) |
2617 (,ly:rest::height . ,ly:rest::pure-height) | 2625 (,ly:rest::height . ,ly:rest::pure-height) |
2618 (,ly:self-alignment-interface::y-aligned-on-self . ,ly:self-alignment-interf
ace::pure-y-aligned-on-self) | 2626 (,ly:self-alignment-interface::y-aligned-on-self . ,ly:self-alignment-interf
ace::pure-y-aligned-on-self) |
2619 (,ly:side-position-interface::y-aligned-side . ,ly:side-position-interface::
pure-y-aligned-side) | 2627 (,ly:side-position-interface::y-aligned-side . ,ly:side-position-interface::
pure-y-aligned-side) |
2620 (,ly:slur::height . ,ly:slur::pure-height) | 2628 (,ly:slur::height . ,ly:slur::pure-height) |
2621 (,ly:slur::outside-slur-callback . ,ly:slur::pure-outside-slur-callback) | 2629 (,ly:slur::outside-slur-callback . ,ly:slur::pure-outside-slur-callback) |
2622 (,ly:stem::height . ,ly:stem::pure-height) | 2630 (,ly:stem::height . ,ly:stem::pure-height) |
2623 (,ly:system::height . ,ly:system::calc-pure-height))) | 2631 (,ly:system::height . ,ly:system::calc-pure-height))) |
(...skipping 27 matching lines...) Expand all Loading... |
2651 (if (not (procedure? unpure)) | 2659 (if (not (procedure? unpure)) |
2652 unpure | 2660 unpure |
2653 (if (memq unpure pure-functions) | 2661 (if (memq unpure pure-functions) |
2654 (apply unpure args) | 2662 (apply unpure args) |
2655 (let ((pure (assq unpure pure-conversions-alist))) | 2663 (let ((pure (assq unpure pure-conversions-alist))) |
2656 (if pure | 2664 (if pure |
2657 (apply (cdr pure) | 2665 (apply (cdr pure) |
2658 (append | 2666 (append |
2659 (list (car args) start end) | 2667 (list (car args) start end) |
2660 (cdr args))))))))) | 2668 (cdr args))))))))) |
LEFT | RIGHT |