OLD | NEW |
1 /* | 1 /* |
2 This file is part of LilyPond, the GNU music typesetter. | 2 This file is part of LilyPond, the GNU music typesetter. |
3 | 3 |
4 Copyright (C) 1997--2012 Han-Wen Nienhuys <hanwen@xs4all.nl> | 4 Copyright (C) 1997--2012 Han-Wen Nienhuys <hanwen@xs4all.nl> |
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 61 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
72 { | 72 { |
73 for (SCM s = scm_cdr (object_cbs); scm_is_pair (s); s = scm_cdr (s)) | 73 for (SCM s = scm_cdr (object_cbs); scm_is_pair (s); s = scm_cdr (s)) |
74 set_object (scm_caar (s), scm_cdar (s)); | 74 set_object (scm_caar (s), scm_cdar (s)); |
75 } | 75 } |
76 } | 76 } |
77 | 77 |
78 if (get_property_data ("X-extent") == SCM_EOL) | 78 if (get_property_data ("X-extent") == SCM_EOL) |
79 set_property ("X-extent", Grob::stencil_width_proc); | 79 set_property ("X-extent", Grob::stencil_width_proc); |
80 if (get_property_data ("Y-extent") == SCM_EOL) | 80 if (get_property_data ("Y-extent") == SCM_EOL) |
81 set_property ("Y-extent", Grob::stencil_height_proc); | 81 set_property ("Y-extent", Grob::stencil_height_proc); |
| 82 if (get_property_data ("vertical-skylines") == SCM_EOL) |
| 83 set_property ("vertical-skylines", Grob::simple_vertical_skylines_from_stenc
il_proc); |
| 84 if (get_property_data ("horizontal-skylines") == SCM_EOL) |
| 85 set_property ("horizontal-skylines", Grob::simple_horizontal_skylines_from_s
tencil_proc); |
82 } | 86 } |
83 | 87 |
84 Grob::Grob (Grob const &s) | 88 Grob::Grob (Grob const &s) |
85 : dim_cache_ (s.dim_cache_) | 89 : dim_cache_ (s.dim_cache_) |
86 { | 90 { |
87 original_ = (Grob *) & s; | 91 original_ = (Grob *) & s; |
88 self_scm_ = SCM_EOL; | 92 self_scm_ = SCM_EOL; |
89 | 93 |
90 immutable_property_alist_ = s.immutable_property_alist_; | 94 immutable_property_alist_ = s.immutable_property_alist_; |
91 mutable_property_alist_ = SCM_EOL; | 95 mutable_property_alist_ = SCM_EOL; |
(...skipping 705 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
797 "before-line-breaking " | 801 "before-line-breaking " |
798 "cause " | 802 "cause " |
799 "color " | 803 "color " |
800 "cross-staff " | 804 "cross-staff " |
801 "id " | 805 "id " |
802 "extra-X-extent " | 806 "extra-X-extent " |
803 "extra-Y-extent " | 807 "extra-Y-extent " |
804 "extra-offset " | 808 "extra-offset " |
805 "footnote-music " | 809 "footnote-music " |
806 "forced-spacing " | 810 "forced-spacing " |
| 811 "horizontal-skylines " |
807 "interfaces " | 812 "interfaces " |
808 "layer " | 813 "layer " |
809 "meta " | 814 "meta " |
810 "minimum-X-extent " | 815 "minimum-X-extent " |
811 "minimum-Y-extent " | 816 "minimum-Y-extent " |
812 "outside-staff-horizontal-padding " | 817 "outside-staff-horizontal-padding " |
813 "outside-staff-padding " | 818 "outside-staff-padding " |
814 "outside-staff-priority " | 819 "outside-staff-priority " |
815 "pure-Y-offset-in-progress " | 820 "pure-Y-offset-in-progress " |
816 "rotation " | 821 "rotation " |
| 822 "skyline-horizontal-padding " |
817 "springs-and-rods " | 823 "springs-and-rods " |
818 "staff-symbol " | 824 "staff-symbol " |
819 "stencil " | 825 "stencil " |
820 "transparent " | 826 "transparent " |
| 827 "vertical-skylines " |
821 "whiteout " | 828 "whiteout " |
822 ); | 829 ); |
823 | 830 |
824 /**************************************************************** | 831 /**************************************************************** |
825 CALLBACKS | 832 CALLBACKS |
826 ****************************************************************/ | 833 ****************************************************************/ |
827 | 834 |
828 static SCM | 835 static SCM |
829 grob_stencil_extent (Grob *me, Axis a) | 836 grob_stencil_extent (Grob *me, Axis a) |
830 { | 837 { |
(...skipping 90 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
921 if (Align_interface::has_interface (commony)) | 928 if (Align_interface::has_interface (commony)) |
922 return true; | 929 return true; |
923 | 930 |
924 for (Grob *g = this; g && g != commony; g = g->get_parent (Y_AXIS)) | 931 for (Grob *g = this; g && g != commony; g = g->get_parent (Y_AXIS)) |
925 if (Align_interface::has_interface (g)) | 932 if (Align_interface::has_interface (g)) |
926 return true; | 933 return true; |
927 | 934 |
928 return false; | 935 return false; |
929 } | 936 } |
930 | 937 |
OLD | NEW |