lily/part-combine-part-iterator.cc

   1 /*
   2   This file is part of LilyPond, the GNU music typesetter.
   3
   4   Copyright (C) 2015 Daniel Eble <dan@faithful.be>
   5
   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
   8   the Free Software Foundation, either version 3 of the License, or
   9   (at your option) any later version.
  10
  11   LilyPond is distributed in the hope that it will be useful,
  12   but WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14   GNU General Public License for more details.
  15
  16   You should have received a copy of the GNU General Public License
  17   along with LilyPond.  If not, see <http://www.gnu.org/licenses/>.
  18 */
  19
  20 #include "change-sequence-iterator.hh"
  21 #include "context.hh"
  22
  23 class Part_combine_part_iterator : public Change_sequence_iterator
  24 {
  25 public:
  26   DECLARE_SCHEME_CALLBACK (constructor, ());
  27   Part_combine_part_iterator () {}
  28
  29 private:
  30   virtual void change_to (const string &id);
  31   Context *find_voice(const string &id);
  32 };
  33
  34 void
  35 Part_combine_part_iterator::change_to (const string &id)
  36 {
  37   Context *voice = find_voice (id);
  38   if (voice)
  39     substitute_outlet (get_outlet (), voice);
  40   else
  41     {
  42       string s = "can not find Voice context: ";
  43       s += id;
  44       programming_error (s);
  45     }
  46 }
  47
  48 Context *
  49 Part_combine_part_iterator::find_voice (const string &id)
  50 {
  51   // Find a Voice among the siblings of the current outlet.  (Well, this might
  52   // also find a sibling's descendant, but that should not be a problem.)
  53   Context *c = get_outlet ()->get_parent_context ();
  54   if (c)
  55     return find_context_below (c, ly_symbol2scm("Voice"), id);
  56   programming_error ("no parent context");
  57   return 0;
  58 }
  59
  60 IMPLEMENT_CTOR_CALLBACK (Part_combine_part_iterator);