SCM
grob_list_to_grob_array (SCM lst)
{
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
grob_list_to_grob_array (SCM lst)
{
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))