source file of the GNU LilyPond music typesetter
- (c) 2000--2001 Jan Nieuwenhuizen <janneke@gnu.org>
+ (c) 2000--2003 Jan Nieuwenhuizen <janneke@gnu.org>
*/
#include "engraver.hh"
#include "item.hh"
-#include "musical-request.hh"
+#include "event.hh"
#include "translator-group.hh"
class Thread_devnull_engraver : public Engraver
{
public:
- VIRTUAL_COPY_CONS (Translator);
+ TRANSLATOR_DECLARATIONS(Thread_devnull_engraver);
protected:
virtual void acknowledge_grob (Grob_info);
};
-ADD_THIS_TRANSLATOR (Thread_devnull_engraver);
+
void
Thread_devnull_engraver::acknowledge_grob (Grob_info i)
{
SCM s = get_property ("devNullThread");
+
#if 0
/* No need, next if will never be true */
if (s == ly_symbol2scm ("never"))
return;
#endif
- if (s == ly_symbol2scm ("allways")
+ if (s == ly_symbol2scm ("always")
|| (s == SCM_EOL
- && daddy_trans_l_->id_str_.left_str (3) == "two"
- && (to_boolean (get_property ("unison"))
- || to_boolean (get_property ("unisilence")))
- && to_boolean (get_property ("soloADue"))))
+ && to_boolean (get_property ("soloADue"))
+ && ((daddy_trans_->id_string_.left_string (3) == "two"
+ && (to_boolean (get_property ("unison"))
+ || to_boolean (get_property ("unisilence"))))
+
+ /* Maybe this should be optional? */
+ || to_boolean (get_property ("othersolo")))))
{
- /* Ugh, we can suicide them, but they remain living */
- i.elem_l_->suicide ();
+ i.grob_->suicide ();
}
}
+Thread_devnull_engraver::Thread_devnull_engraver(){}
+
+ENTER_DESCRIPTION(Thread_devnull_engraver,
+/* descr */ "Kill elements whenever we are Voice called `two' and either "
+"unison, unisilence or soloADue is set.@footnote{On unix systems, the "
+"file @file{/dev/null} is special device: anything written to it is "
+"discarded.}. This engraver works closely together with the part "
+"combiner. When the part combiner notices that two threads are "
+"identical, it tells the @code{Thread_devnull_engraver} to discard "
+"everything in the second thread. "
+,
+/* creats*/ "",
+/* accepts */ "",
+/* acks */ "grob-interface",
+/* reads */ "",
+/* write */ "");