+2002-06-18 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+
+ * lily/parser.yy (open_request_parens): add input locations to
+ open and close parens.
+
2002-06-17 Chris Jackson <chris@fluffhouse.org.uk>
* lily/tuplet-bracket.cc:
A musical duration.
*/
struct Duration {
+public:
+
Duration ();
Duration (int, int);
String str () const;
- void set_plet (int,int );
+
Duration compressed (Rational) const;
Rational length_mom () const ;
+
+
+ int duration_log ()const;
+ int dot_count () const;
+
static int compare (Duration const&, Duration const&);
SCM smobbed_copy () const;
DECLARE_SCHEME_CALLBACK (less_p, (SCM a, SCM b));
DECLARE_SIMPLE_SMOBS (Duration,);
-
-public:
- int duration_log ()const;
- int dot_count () const;
private:
/// Logarithm of the base duration.
Rhythmic_req::length_mom () const
{
Duration *d = unsmob_duration (get_mus_property ("duration"));
- if (!d){
- Moment m ;
- programming_error("Rhythmic_req has no duration");
- return m;
- }
+ if (!d)
+ {
+ Moment m ;
+ programming_error("Rhythmic_req has no duration");
+ return m;
+ }
+
return d->length_mom ();
}
Span_req* s= new Span_req;
$$ = s;
s->set_mus_property ("span-type", ly_str02scm ( "slur"));
+ s->set_spot (THIS->here_input());
}
| E_OPEN {
Span_req* s= new Span_req;
$$ = s;
s->set_mus_property ("span-type", ly_str02scm ( "phrasing-slur"));
+ s->set_spot (THIS->here_input());
}
| E_SMALLER {
Span_req*s =new Span_req;
$$ = s;
s->set_mus_property ("span-type", ly_str02scm ( "crescendo"));
+ s->set_spot (THIS->here_input());
}
| E_BIGGER {
Span_req*s =new Span_req;
$$ = s;
s->set_mus_property ("span-type", ly_str02scm ("decrescendo"));
+ s->set_spot (THIS->here_input());
}
;
E_EXCLAMATION {
Span_req *s = new Span_req;
s->set_mus_property ("span-type", ly_str02scm ( "crescendo"));
+ s->set_spot (THIS->here_input());
$$ = s;
}
Span_req* s= new Span_req;
$$ = s;
s->set_mus_property ("span-type", ly_str02scm ( "slur"));
+ s->set_spot (THIS->here_input());
+
}
| E_CLOSE {
Span_req* s= new Span_req;
$$ = s;
s->set_mus_property ("span-type", ly_str02scm ( "phrasing-slur"));
+ s->set_spot (THIS->here_input());
}
;