diff options
| author | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-08-26 12:37:42 +0000 |
|---|---|---|
| committer | fxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-08-26 12:37:42 +0000 |
| commit | 2bcfb66a0ab0be428ac0f370b1fe4508c8eb5470 (patch) | |
| tree | f1c84026400bff374b6122e5c8ae844e7d2a18ad /libgfortran/m4 | |
| parent | 7aea4e7cdcd40d7bd47c64e76325a62191887d1b (diff) | |
| download | gcc-2bcfb66a0ab0be428ac0f370b1fe4508c8eb5470.tar.gz | |
PR fortran/29600
* Makefile.am: Add generated/shape_i{1,2}.c
* Makefile.in: Regenerate.
* generated/shape_i1.c: New generated file.
* generated/shape_i2.c: New generated file.
* generated/shape_i4.c: Regenerate.
* generated/shape_i8.c: Regenerate.
* generated/shape_i16.c: Regenerate.
* gfortran.map (GFORTRAN_1.7): Add _gfortran_shape_{1,2}.
* m4/shape.m4: Fix parameter type.
* gfortran.dg/shape_8.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@227210 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/m4')
| -rw-r--r-- | libgfortran/m4/shape.m4 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/m4/shape.m4 b/libgfortran/m4/shape.m4 index ffdcebe8d8e..e389d92f00b 100644 --- a/libgfortran/m4/shape.m4 +++ b/libgfortran/m4/shape.m4 @@ -32,12 +32,12 @@ include(iparm.m4)dnl `#if defined (HAVE_'rtype_name`) extern void shape_'rtype_kind` ('rtype` * const restrict ret, - const 'rtype` * const restrict array); + const array_t * const restrict array); export_proto(shape_'rtype_kind`); void shape_'rtype_kind` ('rtype` * const restrict ret, - const 'rtype` * const restrict array) + const array_t * const restrict array) { int n; index_type stride; |