2 grob-info.cc -- implement Grob_info
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2005 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "grob-info.hh"
13 #include "translator-group.hh"
16 Grob_info::Grob_info ()
23 Grob_info::music_cause ()
25 SCM cause = grob_->get_property ("cause");
26 return unsmob_music (cause);
30 Grob_info::origin_contexts (Translator* end) const
32 Context * t = origin_trans_->context ();
33 Link_array<Context> r;
36 t = t->get_parent_context ();
37 } while (t && t != end->context ());