SCM arr_scm = Grob_array::make_array ();
Grob_array *ga = unsmob_grob_array (arr_scm);
for (SCM s = lst; scm_is_pair (s); s = scm_cdr (s))
SCM arr_scm = Grob_array::make_array ();
Grob_array *ga = unsmob_grob_array (arr_scm);
for (SCM s = lst; scm_is_pair (s); s = scm_cdr (s))