source file of the GNU LilyPond music typesetter
- (c) 2003--2004 Han-Wen Nienhuys <hanwen@xs4all.nl>
+ (c) 2003--2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
*/
Recording_group_engraver::derived_mark () const
{
Engraver_group_engraver::derived_mark();
+ scm_gc_mark (now_events_);
scm_gc_mark (accumulator_);
}
SCM proc = get_property ("recordEventSequence");
if (ly_c_procedure_p (proc))
- scm_call_2 (proc, context ()->self_scm (), ly_cdr (accumulator_));
+ scm_call_2 (proc, context ()->self_scm (), scm_cdr (accumulator_));
}
bool
}
-ENTER_DESCRIPTION (Recording_group_engraver,
+ADD_TRANSLATOR (Recording_group_engraver,
"Engraver_group_engraver that records all music events "
"for this context. Calls the procedure "
"in @code{recordEventSequence} when finished.",