release: 1.0.12

[lilypond.git] / lily / time-signature.cc

diff --git a/lily/time-signature.cc b/lily/time-signature.cc
index e882c5558287c66756e293761c04368d0331c08f..931766ccc815f3bcd9d69971de1e6e7ff835b802 100644 (file)
--- a/lily/time-signature.cc
+++ b/lily/time-signature.cc
@@ -1,11 +1,19 @@
+/*   
+  time-signature.cc --  implement Time_signature
+  
+  source file of the GNU LilyPond music typesetter
+  
+  (c) 1996--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+  
+ */
+
 #include "scalar.hh"
 #include "molecule.hh"
 #include "time-signature.hh"
 #include "paper-def.hh"
 #include "lookup.hh"
 
-Time_signature::Time_signature (Array<Scalar>a)
-  :args (a)
+Time_signature::Time_signature ()
 {
   breakable_b_ = true;
 }
@@ -13,7 +21,13 @@ Time_signature::Time_signature (Array<Scalar>a)
 Molecule*
 Time_signature::brew_molecule_p() const
 {
-  Atom s = lookup_l ()->time_signature (args);
+  Atom s;
+  if (time_sig_type_str_.length_i ())
+    {
+      s = lookup_l ()-> special_time_signature (time_sig_type_str_);
+    }
+  else
+    s = lookup_l ()->time_signature (args_);
   s.translate_axis (-s.extent()[Y_AXIS].center (), Y_AXIS);
   return new Molecule (Atom (s));
 }