/*
duration.hh -- declare Duration
-
- source file of the LilyPond music typesetter
- (c) 1997--2000 Jan Nieuwenhuizen <janneke@gnu.org>
+ source file of the LilyPond music typesetter
+ (c) 1997--2007 Jan Nieuwenhuizen <janneke@gnu.org>
*/
#ifndef DURATION_HH
#define DURATION_HH
-#include "flower-proto.hh"
#include "moment.hh"
-#include "smobs.hh"
/**
A musical duration.
- */
-struct Duration {
+*/
+struct Duration
+{
+public:
+
Duration ();
Duration (int, int);
- String str () const;
- void set_plet (int,int );
+ string to_string () const;
+
Duration compressed (Rational) const;
- Rational length_mom () const ;
- static int compare (Duration const&, Duration const&);
+ Rational get_length () const;
+ Rational factor () const { return factor_; }
+ int duration_log () const;
+ int dot_count () const;
- SCM smobbed_copy () const;
- DECLARE_SCHEME_CALLBACK(less_p, (SCM a, SCM b));
- DECLARE_SIMPLE_SMOBS(Duration,);
+ static int compare (Duration const &, Duration const &);
-public:
- int duration_log ()const;
- int dot_count () const;
-
-private:
- /// Logarithm of the base duration.
- int durlog_i_;
- int dots_i_;
+ DECLARE_SCHEME_CALLBACK (less_p, (SCM a, SCM b));
+ DECLARE_SIMPLE_SMOBS (Duration);
- Moment factor_;
+private:
+ /// Logarithm of the base duration.
+ int durlog_;
+ int dots_;
+ Rational factor_;
};
-#include "compare.hh"
-INSTANTIATE_COMPARE(Duration, Duration::compare);
-Duration*unsmob_duration(SCM);
-// int compare (Array<Duration>*, Array<Duration>*);
+INSTANTIATE_COMPARE (Duration, Duration::compare);
+DECLARE_UNSMOB (Duration, duration);
#endif // DURATION_HH