LEFT | RIGHT |
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) 2000--2012 Han-Wen Nienhuys <hanwen@xs4all.nl> | 4 Copyright (C) 2000--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 458 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
469 vector<Grob *> relevant_grobs; | 469 vector<Grob *> relevant_grobs; |
470 SCM pure_relevant_p = ly_lily_module_constant ("pure-relevant?"); | 470 SCM pure_relevant_p = ly_lily_module_constant ("pure-relevant?"); |
471 | 471 |
472 for (vsize i = 0; i < elts.size (); i++) | 472 for (vsize i = 0; i < elts.size (); i++) |
473 { | 473 { |
474 if (to_boolean (scm_apply_1 (pure_relevant_p, elts[i]->self_scm (), SCM_EO
L))) | 474 if (to_boolean (scm_apply_1 (pure_relevant_p, elts[i]->self_scm (), SCM_EO
L))) |
475 relevant_grobs.push_back (elts[i]); | 475 relevant_grobs.push_back (elts[i]); |
476 | 476 |
477 if (Item *it = dynamic_cast<Item *> (elts[i])) | 477 if (Item *it = dynamic_cast<Item *> (elts[i])) |
478 { | 478 { |
479 for(LEFT_and_RIGHT(d)) | 479 for (LEFT_and_RIGHT (d)) |
480 { | 480 { |
481 Item *piece = it->find_prebroken_piece (d); | 481 Item *piece = it->find_prebroken_piece (d); |
482 if (piece && to_boolean (scm_apply_1 (pure_relevant_p, piece->self
_scm (), SCM_EOL))) | 482 if (piece && to_boolean (scm_apply_1 (pure_relevant_p, piece->self
_scm (), SCM_EOL))) |
483 relevant_grobs.push_back (piece); | 483 relevant_grobs.push_back (piece); |
484 } | 484 } |
485 } | 485 } |
486 } | 486 } |
487 | 487 |
488 vector_sort (relevant_grobs, pure_staff_priority_less); | 488 vector_sort (relevant_grobs, pure_staff_priority_less); |
489 SCM grobs_scm = Grob_array::make_array (); | 489 SCM grobs_scm = Grob_array::make_array (); |
(...skipping 372 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
862 "pure-relevant-spanners " | 862 "pure-relevant-spanners " |
863 "pure-Y-common " | 863 "pure-Y-common " |
864 "staff-affinity " | 864 "staff-affinity " |
865 "staff-grouper " | 865 "staff-grouper " |
866 "staff-staff-spacing " | 866 "staff-staff-spacing " |
867 "system-Y-offset " | 867 "system-Y-offset " |
868 "vertical-skylines " | 868 "vertical-skylines " |
869 "X-common " | 869 "X-common " |
870 "Y-common " | 870 "Y-common " |
871 ); | 871 ); |
LEFT | RIGHT |