2004-11-19 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ * input/example-[1-3].ly: simplify.
+
+ * lily/cluster-engraver.cc (try_music): react to busy-playing-event
+
* scm/output-ps.scm (new-text): new function. Use glyphshow to
show glyphs.
% Type:
%
% lilypond example-1
-% xdvi example-1 # or your dvi viewer here
+% xpdf example-1 # or your PDF viewer here
%
%%
%% user-manual.
%%
-\score {
- \context Voice \relative c {
- c' d e f g a b c
- }
- \layout { }
- \midi { }
+\relative {
+ c d e f g a b c
}
% Type:
%
% lilypond example-2
-% xdvi example-2 # or your dvi viewer here
+% xpdf example-2 # or your PDF viewer here
%
%%
%% user-manual.
%%
-\score {
- \context Voice \relative c {
- a''2 ~ a4( e8[ )e] a,16[ a a a]
- }
- \layout { }
- \midi { }
+\relative {
+ a'2 ~ a4( e8[ )e] a,16[ a a a]
}
-#(ly:set-option 'old-relative)
\version "2.4.0"
-one = \relative c{
- c'' d e f
+one = \relative {
+ c' d e f
}
-two = \relative c{
+two = \relative {
\clef "bass"
- c'2 g2
+ c2 g2
}
-\score{
- <<
- \one
- \two
- >>
- \layout{}
- \midi{}
-}
+<<
+ \new Staff \one
+ \new Staff \two
+>>
+
% A full example with two staves
%
% Type:
%
% lilypond example-3
-% xdvi example-3 # or your dvi viewer here
+% xpdf example-3 # or your PDF viewer here
%%
%% For learning LilyPond, please read the tutorial, included in the
void typeset_grobs ();
Spanner *spanner_;
- Spanner * finished_spanner_ ;
+ Spanner *finished_spanner_ ;
};
Cluster_spanner_engraver::Cluster_spanner_engraver ()
cluster_notes_.push (m);
return true;
}
+ else if (m->is_mus_type ("busy-playing-event"))
+ return cluster_notes_.size ();
+
return false;
}
Cluster_spanner_engraver::stop_translation_timestep ()
{
typeset_grobs ();
-
cluster_notes_.clear ();
-
}
void
ENTER_DESCRIPTION (Cluster_spanner_engraver,
/* descr */ "Engraves a cluster using Spanner notation ",
/* creats*/ "ClusterSpanner ClusterSpannerBeacon",
-/* accepts */ "cluster-note-event",
+/* accepts */ "cluster-note-event busy-playing-event",
/* acks */ "note-column-interface",
/* reads */ "",
/* write */ "");