diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2018-01-30 18:20:27 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2018-01-30 18:20:27 +0000 |
| commit | b6019ab18c777ee68508ce0c7a289043d2f60bcd (patch) | |
| tree | eb77e21bf7cc1d3cd93e0b4e6997833f98ca8035 /libgfortran/m4 | |
| parent | cacb4a794f079490a56eb99294947ba5acb4269a (diff) | |
re PR fortran/37577 ([meta-bug] change internal array descriptor format for better syntax, C interop TR, rank 15)
2018-01-30 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/37577
* libgfortran.h: Remove GFC_DTYPE_DERIVED_1, GFC_DTYPE_DERIVED_2,
GFC_DTYPE_DERIVED_4, GFC_DTYPE_DERIVED_8 and GFC_DTYPE_DERIVED_16.
* m4/cshift1.m4: Remove GFC_DTYPE_DERIVED_1.
* generated/cshift1_16.c: Regenerated.
* generated/cshift1_4.c: Regenerated.
* generated/cshift1_8.c: Regenerated.
* intrinsics/cshift0.c: Remove GFC_DTYPE_DERIVED_1.
* intrinsics/pack_generic.c (pack): Move handling of other types
into separate switch statement.
* intrinsics/spread_generic.c (spread): Likewise.
(spread_scalar): Likewise.
* intrinsics/unpack_generic.c (unpack1): Likewise.
(unpack0): Likewise.
* runtime/in_pack_generic.c (internal_pack): Likewise.
* runtime/in_unpack_generic.c (internal_unpack): Likewise.
From-SVN: r257195
Diffstat (limited to 'libgfortran/m4')
| -rw-r--r-- | libgfortran/m4/cshift1.m4 | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/libgfortran/m4/cshift1.m4 b/libgfortran/m4/cshift1.m4 index 07241a506a6..bf1c7478404 100644 --- a/libgfortran/m4/cshift1.m4 +++ b/libgfortran/m4/cshift1.m4 @@ -121,7 +121,6 @@ cshift1 (gfc_array_char * const restrict ret, { case GFC_DTYPE_LOGICAL_1: case GFC_DTYPE_INTEGER_1: - case GFC_DTYPE_DERIVED_1: cshift1_'atype_kind`_i1 ((gfc_array_i1 *)ret, (gfc_array_i1 *) array, h, pwhich); return; |