-/*
- 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);
- }
-}
-