+++ /dev/null
-/*
- chord-tremolo-engraver.hh -- declare Chord_tremolo_engraver
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
- Jan Nieuwenhuizen <janneke@gnu.org>
-*/
-
-
-#ifndef Chord_tremolo_ENGRAVER_HH
-#define Chord_tremolo_ENGRAVER_HH
-
-#include "engraver.hh"
-#include "drul-array.hh"
-
-/**
- Generate an abbreviation beam. Eat stems.
-
- UGH. Derive me from Beam_engraver.
-
- */
-class Chord_tremolo_engraver : public Engraver
-{
-public:
- VIRTUAL_COPY_CONS(Translator);
-
-
- Chord_tremolo_engraver();
-
-protected:
- virtual void do_removal_processing();
- virtual void do_process_requests();
- virtual bool do_try_music (Music*);
- virtual void acknowledge_element (Score_element_info);
- virtual void do_pre_move_processing();
- virtual void do_post_move_processing();
-
-private:
- void typeset_beam ();
- Drul_array<Chord_tremolo_req*> reqs_drul_;
- Chord_tremolo_req* prev_start_req_;
- Beam* abeam_p_;
- Beam* finished_abeam_p_;
-};
-
-#endif // Chord_tremolo_ENGRAVER_HH
+++ /dev/null
-/*
- stem-engraver.hh -- declare Stem_engraver
-
- source file of the GNU LilyPond music typesetter
-
- (c) 1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-*/
-
-
-#ifndef STEM_GRAV_HH
-#define STEM_GRAV_HH
-
-#include "engraver.hh"
-
-/**
- Make stems upon receiving noteheads.
- */
-class Stem_engraver : public Engraver
-{
- int default_abbrev_i_;
- Stem *stem_p_;
- Stem_tremolo *abbrev_p_;
- Rhythmic_req *rhythmic_req_l_;
- Tremolo_req* abbrev_req_l_;
-protected:
- virtual void do_creation_processing ();
- virtual void acknowledge_element (Score_element_info);
- virtual void do_pre_move_processing ();
- virtual bool do_try_music (Music*);
-
-public:
- VIRTUAL_COPY_CONS(Translator);
- Stem_engraver();
-
-};
-
-#endif // STEM_GRAV_HH
+++ /dev/null
-/*
- output-property-engraver.cc -- implement Output_property_engraver
-
- source file of the GNU LilyPond music typesetter
-
- (c) 2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
-
- */
-
-#include "output-property.hh"
-#include "engraver.hh"
-
-class Output_property_engraver : public Engraver
-{
-public:
- Output_property_engraver();
- VIRTUAL_COPY_CONS(Translator);
-protected:
-
- Link_array<Output_property> props_;
-
- virtual void do_acknowledge_element (Score_element_info);
- virtual bool do_try_music (Music*);
-};
-
-
-Output_property_engraver::do_try_music (Music* m)
-{
- if (Output_property * o = dynamic_cast<Output_property*> (m))
- {
- props_.push (m);
- return true;
- }
- return false;
-}
-
-void
-Output_property_engraver::do_acknowledge_element (Score_element_info i)
-{
- for (int i=props_.size (); i--; )
- {
- Output_property * o = props_[i];
- SCM pred = gh_car (o->pred_sym_val_list_);
- /*
- should typecheck pred.
- */
- SCM result=gh_apply (pred,
- gh_listify (i.elem_l_->self_scm_, SCM_UNDEFINED));
- if (to_boolean (result))
- {
- i.elem_l_->set_elt_property (gh_cadr (o->pred_sym_val_list_),
- gh_caddr (o->pred_sym_val_list_));
- }
- }
-}
-
-void
-Output_property_engraver::do_pre_move_processing ()
-{
- props_.clear ();
-}