diff options
Diffstat (limited to 'libgfortran/generated/shape_i4.c')
| -rw-r--r-- | libgfortran/generated/shape_i4.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/libgfortran/generated/shape_i4.c b/libgfortran/generated/shape_i4.c index c6b4f7f..7a56eee 100644 --- a/libgfortran/generated/shape_i4.c +++ b/libgfortran/generated/shape_i4.c @@ -33,6 +33,8 @@ Boston, MA 02110-1301, USA. */ #include <assert.h> #include "libgfortran.h" +#if defined (HAVE_GFC_INTEGER_4) + extern void shape_4 (gfc_array_i4 * ret, const gfc_array_i4 * array); export_proto(shape_4); @@ -52,3 +54,5 @@ shape_4 (gfc_array_i4 * ret, const gfc_array_i4 * array) array->dim[n].ubound + 1 - array->dim[n].lbound; } } + +#endif |