re PR fortran/37577 ([meta-bug] change internal array descriptor format for better...
[gcc.git] / libgfortran / generated / cshift1_16.c
index e6921ac6899ed8497c5fdaa1804e901ab25c949f..44746b37e63ec2afd3388c25d6ebb10e5f466435 100644 (file)
@@ -120,7 +120,6 @@ cshift1 (gfc_array_char * const restrict ret,
   {
     case GFC_DTYPE_LOGICAL_1:
     case GFC_DTYPE_INTEGER_1:
-    case GFC_DTYPE_DERIVED_1:
       cshift1_16_i1 ((gfc_array_i1 *)ret, (gfc_array_i1 *) array,
                        h, pwhich);
       return;