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) 1996--2019 Han-Wen Nienhuys <hanwen@xs4all.nl> | 4 Copyright (C) 1996--2019 Han-Wen Nienhuys <hanwen@xs4all.nl> |
5 Jan Nieuwenhuizen <janneke@gnu.org> | 5 Jan Nieuwenhuizen <janneke@gnu.org> |
6 | 6 |
7 TODO: This is way too hairy | 7 TODO: This is way too hairy |
8 | 8 |
9 TODO: fix naming. | 9 TODO: fix naming. |
10 | 10 |
(...skipping 73 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
84 | 84 |
85 int | 85 int |
86 Stem::get_beaming (Grob *me, Direction d) | 86 Stem::get_beaming (Grob *me, Direction d) |
87 { | 87 { |
88 SCM pair = me->get_property ("beaming"); | 88 SCM pair = me->get_property ("beaming"); |
89 if (!scm_is_pair (pair)) | 89 if (!scm_is_pair (pair)) |
90 return 0; | 90 return 0; |
91 | 91 |
92 SCM lst = index_get_cell (pair, d); | 92 SCM lst = index_get_cell (pair, d); |
93 | 93 |
94 int len = scm_ilength (lst); // -1 for dotted lists! | 94 int len = int (scm_ilength (lst)); // -1 for dotted lists! |
95 return max (len, 0); | 95 return max (len, 0); |
96 } | 96 } |
97 | 97 |
98 Interval | 98 Interval |
99 Stem::head_positions (Grob *me) | 99 Stem::head_positions (Grob *me) |
100 { | 100 { |
101 if (head_count (me)) | 101 if (head_count (me)) |
102 { | 102 { |
103 Drul_array<Grob *> e (extremal_heads (me)); | 103 Drul_array<Grob *> e (extremal_heads (me)); |
104 return Interval (Staff_symbol_referencer::get_position (e[DOWN]), | 104 return Interval (Staff_symbol_referencer::get_position (e[DOWN]), |
(...skipping 1101 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
1206 ideal_y_ = shortest_y_ = 0; | 1206 ideal_y_ = shortest_y_ = 0; |
1207 dir_ = CENTER; | 1207 dir_ = CENTER; |
1208 } | 1208 } |
1209 | 1209 |
1210 void | 1210 void |
1211 Stem_info::scale (Real x) | 1211 Stem_info::scale (Real x) |
1212 { | 1212 { |
1213 ideal_y_ *= x; | 1213 ideal_y_ *= x; |
1214 shortest_y_ *= x; | 1214 shortest_y_ *= x; |
1215 } | 1215 } |
OLD | NEW |