-/*
- Perform substitution on GROB_LIST using a constant amount of stack.
-*/
-Link_array<Grob> temporary_substition_array;
-void
-substitute_grob_array (Grob_array *grob_arr, Grob_array * new_arr)
-{
- Link_array<Grob> &old_grobs (grob_arr->array_reference ());
- Link_array<Grob> *new_grobs (new_arr == grob_arr
- ? &temporary_substition_array
- : &new_arr->array_reference ());
-
- new_grobs->set_size (old_grobs.size ());
- Grob **array = (Grob**) new_grobs->accesses();
- Grob **ptr = array;
- for (int i = 0; i < old_grobs.size (); i++)
- {
- Grob *orig = old_grobs[i];
- Grob *new_grob = substitute_grob (orig);
- if (new_grob)
- {
- *ptr ++ = new_grob;
- }
- }
-
- new_grobs->set_size (ptr - array);
- if (new_arr == grob_arr)
- {
- new_arr->set_array (*new_grobs);
- }
-}
-