2 request.cc -- implement Request
4 source file of the GNU LilyPond music typesetter
6 (c) 1996--2002 Han-Wen Nienhuys <hanwen@cs.uu.nl>
13 Request::equal_b (Request const* r) const
15 return r->do_equal_b (this) || this->do_equal_b (r) ;
19 Request::do_equal_b (Request const*) const
27 set_mus_property ("type", ly_symbol2scm ("request"));
30 Script_req::Script_req ()
32 set_direction (CENTER);
36 Script_req::set_direction (Direction d)
38 set_mus_property ("direction", gh_int2scm (d));
42 Script_req::get_direction () const
44 SCM d = get_mus_property ("direction");
46 return (ly_dir_p (d)) ? to_dir (d) : CENTER;
50 Span_req::get_span_dir () const
52 SCM d = get_mus_property ("span-direction");
54 return (ly_dir_p (d)) ? to_dir (d) : CENTER;
58 Span_req::set_span_dir (Direction d)
60 set_mus_property ("span-direction", gh_int2scm (d));