X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Finclude%2Fgroup-interface.hh;h=7a428ee150ec2363f7ea1b3774eba55a61e809b1;hb=c89f780d0c5c221e766ee6e818dcd85307fffaae;hp=55519b0123a6e8dc37d0d6f921792a5869a7e475;hpb=b1323f33e9aa4b9eea05eefb8755c907d4d762d4;p=lilypond.git diff --git a/lily/include/group-interface.hh b/lily/include/group-interface.hh index 55519b0123..7a428ee150 100644 --- a/lily/include/group-interface.hh +++ b/lily/include/group-interface.hh @@ -1,20 +1,16 @@ -/* +/* group-interface.hh -- declare Group_interface - + source file of the GNU LilyPond music typesetter - - (c) 1999--2004 Han-Wen Nienhuys - - */ + + (c) 1999--2007 Han-Wen Nienhuys +*/ #ifndef GROUP_INTERFACE_HH #define GROUP_INTERFACE_HH -#include "lily-proto.hh" -#include "string.hh" -#include "lily-guile.hh" - #include "grob.hh" +#include "std-string.hh" /** Look at Score element ELT as thing which has a list property called NAME_. Normally the list would contain Grobs, but @@ -26,34 +22,9 @@ struct Group_interface { public: - static int count (Grob* , String); - static void add_thing (Grob*, SCM, SCM); - static void add_thing (Grob*, String nm, SCM); -}; - -struct Pointer_group_interface : public Group_interface { -public: - static void add_grob (Grob*, SCM nm, Grob*e); + static int count (Grob *, SCM); + static void add_thing (Grob *, SCM, SCM); }; -template -Link_array -Pointer_group_interface__extract_grobs (Grob const *elt, T *, const char* name) -{ - Link_array arr; - - for (SCM s = elt->get_property (name); gh_pair_p (s); s = gh_cdr (s)) - { - SCM e = gh_car (s); - arr.push (dynamic_cast (unsmob_grob (e))); - } - - arr.reverse (); - return arr; -} - - - - #endif /* GROUP_INTERFACE_HH */