OLD | NEW |
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--2020 Han-Wen Nienhuys <hanwen@xs4all.nl> | 3 ;;;; Copyright (C) 1998--2020 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 899 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
910 (springs-and-rods . ,ly:spanner::set-spacing-rods) | 910 (springs-and-rods . ,ly:spanner::set-spacing-rods) |
911 (stencil . ,ly:line-spanner::print) | 911 (stencil . ,ly:line-spanner::print) |
912 (style . dashed-line) | 912 (style . dashed-line) |
913 (vertical-skylines . ,grob::unpure-vertical-skylines-from-stencil) | 913 (vertical-skylines . ,grob::unpure-vertical-skylines-from-stencil) |
914 (meta . ((class . Spanner) | 914 (meta . ((class . Spanner) |
915 (interfaces . (dynamic-interface | 915 (interfaces . (dynamic-interface |
916 dynamic-text-spanner-interface | 916 dynamic-text-spanner-interface |
917 font-interface | 917 font-interface |
918 line-interface | 918 line-interface |
919 line-spanner-interface | 919 line-spanner-interface |
920 ;for now, LilyPond never will typeset | 920 ;; for now, LilyPond never will typeset |
921 ;these without a DynamicLineSpanner | 921 ;; these without a DynamicLineSpanner |
922 ;as their controlling element | 922 ;; as their controlling element |
923 ;so, they do not need the | 923 ;; so, they do not need the |
924 ;outside-staff-interface | 924 ;; outside-staff-interface |
925 spanner-interface | 925 spanner-interface |
926 text-interface)))))) | 926 text-interface)))))) |
927 | 927 |
928 | 928 |
929 (Episema | 929 (Episema |
930 . ( | 930 . ( |
931 (bound-details . ((left . ((Y . 0) | 931 (bound-details . ((left . ((Y . 0) |
932 (padding . 0) | 932 (padding . 0) |
933 (attach-dir . ,LEFT) | 933 (attach-dir . ,LEFT) |
934 )) | 934 )) |
(...skipping 1975 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
2910 ;; make sure that \property Foo.Bar =\turnOff doesn't complain | 2910 ;; make sure that \property Foo.Bar =\turnOff doesn't complain |
2911 | 2911 |
2912 (for-each (lambda (x) | 2912 (for-each (lambda (x) |
2913 ;; (display (car x)) (newline) | 2913 ;; (display (car x)) (newline) |
2914 | 2914 |
2915 (set-object-property! (car x) 'translation-type? ly:grob-properties?
) | 2915 (set-object-property! (car x) 'translation-type? ly:grob-properties?
) |
2916 (set-object-property! (car x) 'is-grob? #t)) | 2916 (set-object-property! (car x) 'is-grob? #t)) |
2917 all-grob-descriptions) | 2917 all-grob-descriptions) |
2918 | 2918 |
2919 (set! all-grob-descriptions (sort all-grob-descriptions alist<?)) | 2919 (set! all-grob-descriptions (sort all-grob-descriptions alist<?)) |
OLD | NEW |