- Grob *i1 = unsmob_grob (a);
- Grob *i2 = unsmob_grob (b);
-
- /*
- * avoid-staff of slur trumps script priority. If one grob is
- * supposed to be printed outside a slur and another grob inside,
- * we place the inside grob below the outside even if the inside
- * grob has a higher script-priority.
- */
- if (unsmob_grob (i1->get_object ("slur"))
- && unsmob_grob (i2->get_object ("slur")))
- {
- int push1 = pushed_by_slur (i1);
- int push2 = pushed_by_slur (i2);
- if (push1 != push2)
- return push1 < push2 ? SCM_BOOL_T : SCM_BOOL_F;
- }