lily/thread-devnull-engraver.cc

   1 /*
   2   thread-devnull-engraver.cc -- implement Thread_devnull_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 2000--2002 Jan Nieuwenhuizen <janneke@gnu.org>
   7 */
   8
   9 #include "engraver.hh"
  10 #include "item.hh"
  11 #include "musical-request.hh"
  12 #include "translator-group.hh"
  13
  14 class Thread_devnull_engraver : public Engraver
  15 {
  16 public:
  17   TRANSLATOR_DECLARATIONS(Thread_devnull_engraver);
  18
  19 protected:
  20   virtual void acknowledge_grob (Grob_info);
  21 };
  22
  23
  24
  25 void
  26 Thread_devnull_engraver::acknowledge_grob (Grob_info i)
  27 {
  28   SCM s = get_property ("devNullThread");
  29 #if 0
  30   /* No need, next if will never be true */
  31   if (s == ly_symbol2scm ("never"))
  32     return;
  33 #endif
  34
  35   if (s == ly_symbol2scm ("allways")
  36       || (s == SCM_EOL
  37           && daddy_trans_l_->id_str_.left_str (3) == "two"
  38           && (to_boolean (get_property ("unison"))
  39               || to_boolean (get_property ("unisilence")))
  40           && to_boolean (get_property ("soloADue"))))
  41     {
  42       /* Ugh, we can suicide them, but they remain living */
  43       i.grob_l_->suicide ();
  44     }
  45 }
  46 Thread_devnull_engraver::Thread_devnull_engraver(){}
  47
  48 ENTER_DESCRIPTION(Thread_devnull_engraver,
  49 /* descr */       "Kill elements whenever we are Voice called `two' and either
  50 unison, unisilence or soloADue is set.@footnote{On unix systems, the
  51 file @file{/dev/null} is special device: anything written to it is
  52 discarded.}. This engraver works closely together with the part
  53 combiner.  When the part combiner notices that two threads are
  54 identical, it tells the @code{Thread_devnull_engraver} to discard
  55 everything in the second thread.
  56 ",
  57 /* creats*/       "",
  58 /* acks  */       "grob-interface",
  59 /* reads */       "",
  60 /* write */       "");