transferring changes

Author: scrasmussen

gcc/fortran/trans-types.c

@@ -2496,8 +2496,8 @@ gfc_get_derived_type (gfc_symbol * derived, int codimen)
 
   if (flag_coarray != GFC_FCOARRAY_LIB
       && derived->from_intmod == INTMOD_ISO_FORTRAN_ENV
-      && derived->intmod_sym_id == ISOFORTRAN_EVENT_TYPE
-      || derived->intmod_sym_id == ISOFORTRAN_TEAM_TYPE))
+      && (derived->intmod_sym_id == ISOFORTRAN_EVENT_TYPE
+	  || derived->intmod_sym_id == ISOFORTRAN_TEAM_TYPE))
     return gfc_get_int_type (gfc_default_integer_kind);
 
   if (derived && derived->attr.flavor == FL_PROCEDURE