]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/command-request.cc
release: 1.2.6
[lilypond.git] / lily / command-request.cc
index 9fe1c9118be6cbe28213eedcd3274c402bf9a12c..e682c8a4f603d8e3e7d3a6314dee26cd2b7c9a45 100644 (file)
@@ -1,9 +1,9 @@
 /*
-  commandrequest.cc -- implement Nonmusical reqs
+  command-request.cc -- implement non-musical reqs
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+  (c)  1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 */
 
 #include "command-request.hh"
 #include "musical-request.hh"
 
 void
-Command_script_req::do_print() const
-{}
-Command_script_req::Command_script_req(){}
-
-IMPLEMENT_IS_TYPE_B1(Command_script_req,Command_req);
-
-
-IMPLEMENT_IS_TYPE_B1(Cadenza_req, Timing_req);
-
-void
-Cadenza_req::do_print()const
+Cadenza_req::do_print () const
 {
 #ifndef NPRINT
-    mtor << on_b_;
+  DOUT << (int)on_b_;
 #endif
 }
 
 bool
-Cadenza_req::do_equal_b(Request*r)const
+Cadenza_req::do_equal_b (Request const *r) const
 {
-    Cadenza_req*cad =  r->command()->timing()->cadenza();
-    
-    return cad->on_b_ == on_b_;
+  Cadenza_req const*cad =  dynamic_cast <Cadenza_req const *> (r);
+  return cad && cad->on_b_ == on_b_;
 }
 
-Cadenza_req::Cadenza_req(bool b)
+Cadenza_req::Cadenza_req (bool b)
 {
-    on_b_ =b;
+  on_b_ =b;
 }
-/* *************** */
+
 
 
 bool
-Bar_req::do_equal_b(Request*r)const
+Bar_req::do_equal_b (Request const *r) const
 {
-    Bar_req * b = r->command()->bar();
-    return type_str_ == b->type_str_;
+  Bar_req  const* b = dynamic_cast <Bar_req const *> (r);
+  return b && type_str_ == b->type_str_;
 }
 
-
-IMPLEMENT_IS_TYPE_B1(Bar_req,Command_req);
-
 void
-Bar_req::do_print() const
+Bar_req::do_print () const
 {
-    mtor << type_str_;
+#ifndef NPRINT
+  DOUT << type_str_;
+#endif
 }
 
-Bar_req::Bar_req(String s)
+Bar_req::Bar_req (String s)
 {
-    type_str_ = s;
+  type_str_ = s;
 }
 
-Partial_measure_req::Partial_measure_req(Moment m)
+Partial_measure_req::Partial_measure_req (Moment m)
 {
-    duration_ =m;
+  length_mom_ =m;
 }
 
 bool
-Partial_measure_req::do_equal_b(Request* r)const
+Partial_measure_req::do_equal_b (Request const* r) const
 {
-    Partial_measure_req *p = r->command()->timing()->partial();
-
-    return p->duration_ == duration_;
-}
-
-
-IMPLEMENT_IS_TYPE_B1(Timing_req,Command_req);
-
-void
-Timing_req::do_print()const{}
-
+  Partial_measure_req  const*p = dynamic_cast <Partial_measure_req  const*> (r);
 
-IMPLEMENT_IS_TYPE_B1(Command_req,Request);
-
-void
-Command_req::do_print()const{}
-
-IMPLEMENT_IS_TYPE_B1(Disallow_break_req,Command_req);
-
-void
-Disallow_break_req::do_print()const
-{
+  return p&& p->length_mom_ == length_mom_;
 }
-/* *************** */
-
-IMPLEMENT_IS_TYPE_B1(Barcheck_req,Timing_req);
-
-void
-Barcheck_req::do_print() const{}
 
 bool
-Barcheck_req::do_equal_b(Request*)const
+Barcheck_req::do_equal_b (Request const *r) const
 {
-    return true;
+  Barcheck_req  const*b = dynamic_cast<Barcheck_req const*> (r);
+  return b;
 }
-/* *************** */
-
-IMPLEMENT_IS_TYPE_B1(Clef_change_req,Command_req);
 
 void
-Clef_change_req::do_print() const
+Clef_change_req::do_print () const
 {
 #ifndef NPRINT
-    mtor << clef_str_ ;
+  DOUT << clef_str_ ;
 #endif
 }
 
-Clef_change_req::Clef_change_req(String s)
-{
-    clef_str_ = s;
-}
-/* *************** */
-
-IMPLEMENT_IS_TYPE_B1(Group_feature_req,Command_req);
-
-void
-Group_feature_req::do_print() const
+Clef_change_req::Clef_change_req (String s)
 {
-#ifndef NPRINT
-    mtor << type_str_ << "=" << value_str_;
-#endif
+  clef_str_ = s;
 }
 
-/* *************** */
-
-
-IMPLEMENT_IS_TYPE_B1(Partial_measure_req,Timing_req);
-
 void
-Partial_measure_req::do_print() const
+Partial_measure_req::do_print () const
 {
-    mtor << duration_;
+  DOUT << length_mom_;
 }
 
-
-IMPLEMENT_IS_TYPE_B1(Meter_change_req,Timing_req);
-
 void
-Meter_change_req::do_print() const
+Time_signature_change_req::do_print () const
 {
 #ifndef NPRINT
-    mtor << beats_i_ << "/" << one_beat_i_;
+  DOUT << beats_i_ << "/" << one_beat_i_;
 #endif
 }
 
 bool
-Meter_change_req::do_equal_b(Request * r)const
+Time_signature_change_req::do_equal_b (Request const *r) const
 {
-    Meter_change_req * m = r->command()->timing()->meterchange();
-    
-    return m->beats_i_ == beats_i_ 
-       && one_beat_i_ == m->one_beat_i_;
-}
+  Time_signature_change_req  const* m
+    = dynamic_cast <Time_signature_change_req  const*> (r);
 
-Meter_change_req::Meter_change_req()
-{
-    beats_i_ = 0;
-    one_beat_i_ =0;
+  return m && m->beats_i_ == beats_i_
+    && one_beat_i_ == m->one_beat_i_;
 }
 
-void
-Meter_change_req::set(int b,int o)
+Time_signature_change_req::Time_signature_change_req ()
 {
-    beats_i_=b;
-    one_beat_i_=o;
+  beats_i_ = 0;
+  one_beat_i_ =0;
 }
 
 
-Tempo_req::Tempo_req()
+Tempo_req::Tempo_req ()
 {
-    metronome_i_ = 60;
-    dur_. type_i_ = 4;
+  metronome_i_ = 60;
+  dur_. durlog_i_ = 2;
 }
 
 void
-Tempo_req::do_print()const
+Tempo_req::do_print () const
 {
-    mtor << dur_.str() << " = " <<metronome_i_ ;
+  DOUT << dur_.str () << " = " << metronome_i_;
 }
-IMPLEMENT_IS_TYPE_B1(Tempo_req, Timing_req);
-
-bool
-Tempo_req::do_equal_b(Request *r)const
-{
-    Tempo_req *t = r->command()->timing()->tempo();
-    
-    return t->dur_.length()== dur_.length() && metronome_i_ == t->metronome_i_;
-}
-
-/* *************** */
 
 
-IMPLEMENT_IS_TYPE_B1(Measure_grouping_req,Timing_req);
-
-void
-Measure_grouping_req::do_print() const
+bool
+Tempo_req::do_equal_b (Request const *r) const
 {
-    for (int i=0; i < elt_length_arr_.size(); i++) {
-       mtor << beat_i_arr_[i] <<"*" << elt_length_arr_[i]<<" ";
-    }
-}
-
+  Tempo_req const *t = dynamic_cast <Tempo_req const*> (r);
 
-bool 
-Measure_grouping_req::do_equal_b(Request*)const
-{
-    return false;              // todo
+  return t&& t->dur_.length_mom ()== dur_.length_mom () && metronome_i_ == t->metronome_i_;
 }
 
-/* *************** */
 
-void
-Key_change_req::transpose(Melodic_req const & d)const
-{
-    WARN << "don't know how to transpose a key. \n";
-    for (int i=0; i < melodic_p_arr_.size(); i++) {
-       melodic_p_arr_[i]->transpose(d);
-    }
-}
 
 
-IMPLEMENT_IS_TYPE_B1(Key_change_req,Command_req);
 void
-Key_change_req::squash_octaves()
-{
-    for (int i=0; i < melodic_p_arr_.size(); i++) {
-       melodic_p_arr_[i]->octave_i_ = 0;
-    }
-}
-
-void
-Key_change_req::do_print() const
+Key_change_req::do_print () const
 {
 #ifndef NPRINT
-    for (int i=0; i < melodic_p_arr_.size(); i++) {
-       melodic_p_arr_[i]->print();
+  for (int i=0; i < key_.pitch_arr_.size (); i++)
+    {
+      key_.pitch_arr_[i].print ();
     }
 #endif
 }
 
-Key_change_req::Key_change_req()
+Key_change_req::Key_change_req ()
 {
-       minor_b_ = false;
-       multi_octave_b_= false;
 }
 
-Key_change_req::Key_change_req(Key_change_req const&c)
+Break_req::Break_req ()
 {
-       for (int i=0; i < c.melodic_p_arr_.size(); i++) 
-               melodic_p_arr_.push( c.melodic_p_arr_[i]->clone()->musical()->melodic() );
-       minor_b_ = c.minor_b_;
-       multi_octave_b_ = c.multi_octave_b_;
+  penalty_i_ = 0;
 }
 
-Key_change_req::~Key_change_req()
+Mark_req::Mark_req (String s)
 {
-       for (int i=0; i < melodic_p_arr_.size(); i++)
-               delete melodic_p_arr_[i];
+  str_ = s;
 }
 
-int
-Key_change_req::flats_i()
+void
+Mark_req::do_print () const
 {
-       int flats_i = 0;
-       for ( int i = 0; i < melodic_p_arr_.size(); i++ ) {
-               Melodic_req* mel_l = melodic_p_arr_[i]->melodic();
-               assert( mel_l );
-               if ( mel_l->accidental_i_ < 0 )
-                       flats_i -= mel_l->accidental_i_;
-       }
-       return flats_i;
+  DOUT << str_;
 }
-
-int
-Key_change_req::minor_b()
+void
+Key_change_req::transpose (Musical_pitch p)
 {
-       return minor_b_;        
+  key_.transpose (p);
 }
 
-int
-Key_change_req::sharps_i()
-{
-       int sharps_i = 0;
-       for ( int i = 0; i < melodic_p_arr_.size(); i++ ) {
-               Melodic_req* mel_l = melodic_p_arr_[i]->melodic();
-               assert( mel_l );
-               if ( mel_l->accidental_i_ > 0 )
-                       sharps_i+= mel_l->accidental_i_;
-       }
-       return sharps_i;
-}
 
+