- if (!script_l_arr_.size())
- return;
-
- /* up+inside, up+outside, down+inside, down+outside */
- Array<Script*> placed_l_arr_a[4];
- for (int i=0; i < script_l_arr_.size(); i++) {
- Script*s_l = script_l_arr_[i];
- placed_l_arr_a[idx( s_l->inside_staff_b_ , s_l->dir_i_) ].push(s_l);
+ Grob* me = unsmob_grob (smob);
+ Drul_array<SCM> scripts (SCM_EOL, SCM_EOL);
+ Link_array<Grob> staff_sided;
+
+ for (SCM s = me->get_grob_property( "scripts"); gh_pair_p (s); s = gh_cdr( s))
+ {
+ Grob *sc = unsmob_grob (gh_car (s));
+
+ if (!sc->has_offset_callback_b (Side_position_interface::aligned_side_proc, X_AXIS))
+ staff_sided.push (sc);