lily/interpretation-context-handle.cc

   1 /*
   2   interpretation-context-handle.cc --  implement Interpretation_context_handle
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1999--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7  */
   8
   9 #include "interpretation-context-handle.hh"
  10 #include "translator-group.hh"
  11
  12 Interpretation_context_handle::Interpretation_context_handle ()
  13 {
  14   report_to_ =0;
  15 }
  16
  17 Interpretation_context_handle::Interpretation_context_handle (Interpretation_context_handle const&s)
  18 {
  19   report_to_ =0;
  20   if (s.report_to_)
  21     up (s.report_to_);
  22 }
  23
  24 Interpretation_context_handle*
  25 Interpretation_context_handle::clone () const
  26 {
  27   Interpretation_context_handle* handle = new Interpretation_context_handle;
  28   handle->report_to_ = this->report_to_;
  29   return handle;
  30 }
  31
  32 Interpretation_context_handle::~Interpretation_context_handle ()
  33 {
  34   /*
  35     Don't do
  36
  37     if (report_to_)
  38       down ();
  39
  40     with GC, this is asynchronous.
  41    */
  42 }
  43
  44 void
  45 Interpretation_context_handle::up (Translator_group*t)
  46 {
  47   report_to_ = t;
  48   t->iterator_count_ ++;
  49 }
  50
  51 void
  52 Interpretation_context_handle::down ()
  53 {
  54   report_to_->iterator_count_ --;
  55   report_to_ = 0;
  56 }
  57
  58 void
  59 Interpretation_context_handle::quit ()
  60 {
  61   if (report_to_) report_to_->iterator_count_ --;
  62 }
  63
  64
  65 bool
  66 Interpretation_context_handle::try_music (Music *m)
  67 {
  68   return  report_to_->try_music (m);
  69 }
  70
  71 void
  72 Interpretation_context_handle::operator = (Interpretation_context_handle const &s)
  73 {
  74   set_translator (s.report_to_);
  75 }
  76
  77 void
  78 Interpretation_context_handle::set_translator (Translator_group*trans)
  79 {
  80   if (report_to_ ==trans)
  81     return;
  82   if (report_to_)
  83     down ();
  84   if (trans)
  85     up (trans);
  86 }
  87
  88 Translator_group*
  89 Interpretation_context_handle::report_to ()const
  90 {
  91
  92   return report_to_;
  93 }
  94
  95