Lines Matching defs:head2
11242 gfc_ss *head2;
11246 head2 = head;
11248 head2 = gfc_walk_subexpr (head, expr->value.op.op2);
11251 if (head2 == ss)
11252 return head2;
11255 if (head != ss && (expr->value.op.op2 == NULL || head2 != head))
11256 return head2;
11264 head = head2;
11271 else /* head2 == head */
11273 gcc_assert (head2 == head);
11275 head2 = gfc_get_scalar_ss (head2, expr->value.op.op2);
11278 return head2;