source file of the GNU LilyPond music typesetter
(c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
*/
#include "pointer-group-interface.hh"
Pointer_group_interface::count (Grob *me, SCM sym)
{
Grob_array *arr = unsmob_grob_array (me->internal_get_object (sym));
- return arr ? arr->size() : 0;
+ return arr ? arr->size () : 0;
}
void
add_grob (me, sym, unsmob_grob (p));
}
-
void
Pointer_group_interface::add_grob (Grob *me, SCM sym, Grob *p)
{
}
arr->add (p);
}
-
+
static Link_array<Grob> empty_array;
Link_array<Grob> const &
Grob_array *arr = unsmob_grob_array (x);
return arr ? arr->array () : empty_array;
}
-
Link_array<Grob> const &
internal_extract_grob_array (Grob const *elt, SCM symbol)
Grob_array *arr = unsmob_grob_array (elt->internal_get_object (symbol));
Link_array<Item> items;
for (int i = 0; arr && i < arr->size (); i++)
- {
- items.push (arr->item (i));
- }
+ items.push (arr->item (i));
return items;
}