2 grob-info.cc -- implement Grob_info
4 source file of the GNU LilyPond music typesetter
6 (c) 1997--2003 Han-Wen Nienhuys <hanwen@cs.uu.nl>
10 #include "grob-info.hh"
12 #include "translator-group.hh"
15 Grob_info::Grob_info ()
22 Grob_info::music_cause ()
24 SCM cause = grob_->get_grob_property ("cause");
25 return unsmob_music (cause);
28 Link_array<Translator>
29 Grob_info::origin_transes (Translator* end) const
31 Translator * t = origin_trans_;
32 Link_array<Translator> r;
36 } while (t && t != end->daddy_trans_);