* expr.c (gfc_copy_shape_excluding): Change && to ||.